blob: afb5533dc82eaf05f32a69a8429f180ca6e1606c [file] [log] [blame]
Michael J. Spencer924aa232010-12-09 17:37:42 +00001//===- llvm/Support/Windows/PathV2.inc - Windows Path Impl ------*- C++ -*-===//
Michael J. Spencerdffde992010-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. Spencer3920d3b2010-12-03 17:54:07 +000020#include <fcntl.h>
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +000021#include <io.h>
Michael J. Spencer3920d3b2010-12-03 17:54:07 +000022#include <sys/stat.h>
23#include <sys/types.h>
Michael J. Spencerdffde992010-11-29 22:28:51 +000024
Michael J. Spenceraf45fc02010-12-03 18:03:28 +000025// MinGW doesn't define this.
Michael J. Spencerb39e33f2010-12-03 18:04:11 +000026#ifndef _ERRNO_T_DEFINED
27#define _ERRNO_T_DEFINED
28typedef int errno_t;
Michael J. Spenceraf45fc02010-12-03 18:03:28 +000029#endif
30
Michael J. Spencerbee0c382010-12-01 19:32:01 +000031using namespace llvm;
32
33namespace {
Michael J. Spencer998b4702010-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. Spencer9b391c52010-12-03 07:41:25 +000040 ::GetProcAddress(::GetModuleHandleA("kernel32.dll"),
41 "CreateSymbolicLinkW"));
42
Benjamin Kramer7fb86662010-12-17 18:59:09 +000043 error_code UTF8ToUTF16(StringRef utf8, SmallVectorImpl<wchar_t> &utf16) {
Michael J. Spencerbee0c382010-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. Spencer9d425e72010-12-04 18:45:32 +000049 return windows_error(::GetLastError());
Michael J. Spencerbee0c382010-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. Spencer9d425e72010-12-04 18:45:32 +000059 return windows_error(::GetLastError());
Michael J. Spencerbee0c382010-12-01 19:32:01 +000060
61 // Make utf16 null terminated.
62 utf16.push_back(0);
63 utf16.pop_back();
64
Michael J. Spencer9d425e72010-12-04 18:45:32 +000065 return success;
Michael J. Spencerbee0c382010-12-01 19:32:01 +000066 }
Michael J. Spencer3cb84ef2010-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. Spencer49584662010-12-04 00:32:14 +000071 int len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +000072 utf16, utf16_len,
73 utf8.begin(), 0,
74 NULL, NULL);
75
76 if (len == 0)
Michael J. Spencer9d425e72010-12-04 18:45:32 +000077 return windows_error(::GetLastError());
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +000078
79 utf8.reserve(len);
80 utf8.set_size(len);
81
82 // Now do the actual conversion.
Michael J. Spencer49584662010-12-04 00:32:14 +000083 len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +000084 utf16, utf16_len,
85 utf8.data(), utf8.size(),
86 NULL, NULL);
87
88 if (len == 0)
Michael J. Spencer9d425e72010-12-04 18:45:32 +000089 return windows_error(::GetLastError());
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +000090
91 // Make utf8 null terminated.
92 utf8.push_back(0);
93 utf8.pop_back();
94
Michael J. Spencer9d425e72010-12-04 18:45:32 +000095 return success;
Michael J. Spencer3cb84ef2010-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. Spencer9d425e72010-12-04 18:45:32 +0000103 return windows_error(::GetLastError());
Michael J. Spencer3cb84ef2010-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);
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000111 return success;
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000112 }
113
Michael J. Spencer753cbbb2010-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. Spencerbee0c382010-12-01 19:32:01 +0000123}
124
Michael J. Spencerdffde992010-11-29 22:28:51 +0000125namespace llvm {
126namespace sys {
Michael J. Spencer1522fce2010-12-07 01:22:31 +0000127namespace fs {
Michael J. Spencerdffde992010-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. Spencer9d425e72010-12-04 18:45:32 +0000137 return windows_error(::GetLastError());
Michael J. Spencerdffde992010-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. Spencer49584662010-12-04 00:32:14 +0000152 len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencerdffde992010-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. Spencer49584662010-12-04 00:32:14 +0000163 len = ::WideCharToMultiByte(CP_UTF8, 0,
Michael J. Spencerdffde992010-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. Spencer9d425e72010-12-04 18:45:32 +0000168 return windows_error(::GetLastError());
Michael J. Spencerdffde992010-11-29 22:28:51 +0000169
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000170 return success;
Michael J. Spencerdffde992010-11-29 22:28:51 +0000171}
172
Michael J. Spencerbee0c382010-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. Spencer2dbdeee2010-12-03 01:21:38 +0000177 StringRef f = from.toStringRef(from_storage);
178 StringRef t = to.toStringRef(to_storage);
Michael J. Spencerbee0c382010-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. Spencer9d425e72010-12-04 18:45:32 +0000191 return windows_error(::GetLastError());
Michael J. Spencerbee0c382010-12-01 19:32:01 +0000192
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000193 return success;
Michael J. Spencerbee0c382010-12-01 19:32:01 +0000194}
195
Michael J. Spencerb83769f2010-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. Spencer9d425e72010-12-04 18:45:32 +0000205 error_code ec = windows_error(::GetLastError());
206 if (ec == windows_error::already_exists)
Michael J. Spencerb83769f2010-12-03 05:42:11 +0000207 existed = true;
208 else
209 return ec;
210 } else
211 existed = false;
212
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000213 return success;
Michael J. Spencerb83769f2010-12-03 05:42:11 +0000214}
215
Michael J. Spencerd7b305f2010-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. Spencer9d425e72010-12-04 18:45:32 +0000230 return windows_error(::GetLastError());
Michael J. Spencerd7b305f2010-12-03 05:58:41 +0000231
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000232 return success;
Michael J. Spencerd7b305f2010-12-03 05:58:41 +0000233}
234
Michael J. Spencer9b391c52010-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. Spencer49584662010-12-04 00:32:14 +0000252 if (!create_symbolic_link_api(wide_from.begin(), wide_to.begin(), 0))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000253 return windows_error(::GetLastError());
Michael J. Spencer9b391c52010-12-03 07:41:25 +0000254
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000255 return success;
Michael J. Spencer9b391c52010-12-03 07:41:25 +0000256}
257
Michael J. Spencer106aa732010-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. Spencerabce0732011-01-05 16:39:22 +0000262 file_status st;
263 if (error_code ec = status(path, st))
264 return ec;
265
Michael J. Spencer106aa732010-12-03 17:53:43 +0000266 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
267 path_utf16))
268 return ec;
269
Michael J. Spencerabce0732011-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. Spencer106aa732010-12-03 17:53:43 +0000287
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000288 return success;
Michael J. Spencer106aa732010-12-03 17:53:43 +0000289}
290
Michael J. Spencera50b98c2010-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 Takumi8ee48c52011-01-17 22:41:25 +0000304 if (!::MoveFileExW(wide_from.begin(), wide_to.begin(),
305 MOVEFILE_COPY_ALLOWED | MOVEFILE_REPLACE_EXISTING))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000306 return windows_error(::GetLastError());
Michael J. Spencera50b98c2010-12-03 17:53:55 +0000307
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000308 return success;
Michael J. Spencera50b98c2010-12-03 17:53:55 +0000309}
310
Michael J. Spencer3920d3b2010-12-03 17:54:07 +0000311error_code resize_file(const Twine &path, uint64_t size) {
312 SmallString<128> path_storage;
313 SmallVector<wchar_t, 128> path_utf16;
314
315 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
316 path_utf16))
317 return ec;
318
319 int fd = ::_wopen(path_utf16.begin(), O_BINARY, S_IREAD | S_IWRITE);
320 if (fd == -1)
321 return error_code(errno, generic_category());
Michael J. Spencerdb04b392010-12-03 18:48:56 +0000322#ifdef HAVE__CHSIZE_S
Michael J. Spencer3920d3b2010-12-03 17:54:07 +0000323 errno_t error = ::_chsize_s(fd, size);
Michael J. Spencerdb04b392010-12-03 18:48:56 +0000324#else
325 errno_t error = ::_chsize(fd, size);
326#endif
Michael J. Spencer3920d3b2010-12-03 17:54:07 +0000327 ::close(fd);
328 return error_code(error, generic_category());
329}
330
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000331error_code exists(const Twine &path, bool &result) {
332 SmallString<128> path_storage;
333 SmallVector<wchar_t, 128> path_utf16;
334
335 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
336 path_utf16))
337 return ec;
338
339 DWORD attributes = ::GetFileAttributesW(path_utf16.begin());
340
341 if (attributes == INVALID_FILE_ATTRIBUTES) {
342 // See if the file didn't actually exist.
343 error_code ec = make_error_code(windows_error(::GetLastError()));
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000344 if (ec != windows_error::file_not_found &&
345 ec != windows_error::path_not_found)
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000346 return ec;
347 result = false;
348 } else
349 result = true;
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000350 return success;
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000351}
352
Michael J. Spencerb531f452010-12-03 18:49:13 +0000353error_code equivalent(const Twine &A, const Twine &B, bool &result) {
354 // Get arguments.
355 SmallString<128> a_storage;
356 SmallString<128> b_storage;
357 StringRef a = A.toStringRef(a_storage);
358 StringRef b = B.toStringRef(b_storage);
359
360 // Convert to utf-16.
361 SmallVector<wchar_t, 128> wide_a;
362 SmallVector<wchar_t, 128> wide_b;
363 if (error_code ec = UTF8ToUTF16(a, wide_a)) return ec;
364 if (error_code ec = UTF8ToUTF16(b, wide_b)) return ec;
365
Michael J. Spencer1dd2ee72011-12-12 06:03:33 +0000366 ScopedFileHandle HandleB(
Michael J. Spencerb531f452010-12-03 18:49:13 +0000367 ::CreateFileW(wide_b.begin(),
368 0,
369 FILE_SHARE_DELETE | FILE_SHARE_READ | FILE_SHARE_WRITE,
370 0,
371 OPEN_EXISTING,
372 FILE_FLAG_BACKUP_SEMANTICS,
373 0));
374
Michael J. Spencer1dd2ee72011-12-12 06:03:33 +0000375 ScopedFileHandle HandleA(
Michael J. Spencerb531f452010-12-03 18:49:13 +0000376 ::CreateFileW(wide_a.begin(),
377 0,
378 FILE_SHARE_DELETE | FILE_SHARE_READ | FILE_SHARE_WRITE,
379 0,
380 OPEN_EXISTING,
381 FILE_FLAG_BACKUP_SEMANTICS,
382 0));
383
384 // If both handles are invalid, it's an error.
Michael J. Spencer1dd2ee72011-12-12 06:03:33 +0000385 if (!HandleA && !HandleB)
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000386 return windows_error(::GetLastError());
Michael J. Spencerb531f452010-12-03 18:49:13 +0000387
388 // If only one is invalid, it's false.
Michael J. Spencer1dd2ee72011-12-12 06:03:33 +0000389 if (!HandleA || !HandleB) {
Michael J. Spencerb531f452010-12-03 18:49:13 +0000390 result = false;
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000391 return success;
Michael J. Spencerb531f452010-12-03 18:49:13 +0000392 }
393
394 // Get file information.
395 BY_HANDLE_FILE_INFORMATION InfoA, InfoB;
396 if (!::GetFileInformationByHandle(HandleA, &InfoA))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000397 return windows_error(::GetLastError());
Michael J. Spencerb531f452010-12-03 18:49:13 +0000398 if (!::GetFileInformationByHandle(HandleB, &InfoB))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000399 return windows_error(::GetLastError());
Michael J. Spencerb531f452010-12-03 18:49:13 +0000400
401 // See if it's all the same.
402 result =
403 InfoA.dwVolumeSerialNumber == InfoB.dwVolumeSerialNumber &&
404 InfoA.nFileIndexHigh == InfoB.nFileIndexHigh &&
405 InfoA.nFileIndexLow == InfoB.nFileIndexLow &&
406 InfoA.nFileSizeHigh == InfoB.nFileSizeHigh &&
407 InfoA.nFileSizeLow == InfoB.nFileSizeLow &&
408 InfoA.ftLastWriteTime.dwLowDateTime ==
409 InfoB.ftLastWriteTime.dwLowDateTime &&
410 InfoA.ftLastWriteTime.dwHighDateTime ==
411 InfoB.ftLastWriteTime.dwHighDateTime;
412
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000413 return success;
Michael J. Spencerb531f452010-12-03 18:49:13 +0000414}
415
Michael J. Spencer01a87c42010-12-04 00:31:48 +0000416error_code file_size(const Twine &path, uint64_t &result) {
417 SmallString<128> path_storage;
418 SmallVector<wchar_t, 128> path_utf16;
419
420 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
421 path_utf16))
422 return ec;
423
424 WIN32_FILE_ATTRIBUTE_DATA FileData;
425 if (!::GetFileAttributesExW(path_utf16.begin(),
426 ::GetFileExInfoStandard,
427 &FileData))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000428 return windows_error(::GetLastError());
Michael J. Spencer01a87c42010-12-04 00:31:48 +0000429
430 result =
431 (uint64_t(FileData.nFileSizeHigh) << (sizeof(FileData.nFileSizeLow) * 8))
432 + FileData.nFileSizeLow;
433
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000434 return success;
Michael J. Spencer01a87c42010-12-04 00:31:48 +0000435}
436
Benjamin Kramer2e608c62011-08-20 21:36:38 +0000437static bool isReservedName(StringRef path) {
438 // This list of reserved names comes from MSDN, at:
439 // http://msdn.microsoft.com/en-us/library/aa365247%28v=vs.85%29.aspx
440 static const char *sReservedNames[] = { "nul", "con", "prn", "aux",
441 "com1", "com2", "com3", "com4", "com5", "com6",
442 "com7", "com8", "com9", "lpt1", "lpt2", "lpt3",
443 "lpt4", "lpt5", "lpt6", "lpt7", "lpt8", "lpt9" };
444
445 // First, check to see if this is a device namespace, which always
446 // starts with \\.\, since device namespaces are not legal file paths.
447 if (path.startswith("\\\\.\\"))
448 return true;
449
450 // Then compare against the list of ancient reserved names
451 for (size_t i = 0; i < sizeof(sReservedNames) / sizeof(const char *); ++i) {
452 if (path.equals_lower(sReservedNames[i]))
453 return true;
454 }
455
456 // The path isn't what we consider reserved.
457 return false;
458}
459
Michael J. Spencer470ae132010-12-04 00:32:40 +0000460error_code status(const Twine &path, file_status &result) {
461 SmallString<128> path_storage;
462 SmallVector<wchar_t, 128> path_utf16;
463
NAKAMURA Takumibab2d492011-03-16 02:53:32 +0000464 StringRef path8 = path.toStringRef(path_storage);
Benjamin Kramer2e608c62011-08-20 21:36:38 +0000465 if (isReservedName(path8)) {
NAKAMURA Takumibab2d492011-03-16 02:53:32 +0000466 result = file_status(file_type::character_file);
467 return success;
468 }
469
470 if (error_code ec = UTF8ToUTF16(path8,
Michael J. Spencer470ae132010-12-04 00:32:40 +0000471 path_utf16))
472 return ec;
473
474 DWORD attr = ::GetFileAttributesW(path_utf16.begin());
475 if (attr == INVALID_FILE_ATTRIBUTES)
476 goto handle_status_error;
477
478 // Handle reparse points.
479 if (attr & FILE_ATTRIBUTE_REPARSE_POINT) {
Michael J. Spencer1dd2ee72011-12-12 06:03:33 +0000480 ScopedFileHandle h(
Michael J. Spencer470ae132010-12-04 00:32:40 +0000481 ::CreateFileW(path_utf16.begin(),
482 0, // Attributes only.
483 FILE_SHARE_DELETE | FILE_SHARE_READ | FILE_SHARE_WRITE,
484 NULL,
485 OPEN_EXISTING,
486 FILE_FLAG_BACKUP_SEMANTICS,
487 0));
Michael J. Spencer1dd2ee72011-12-12 06:03:33 +0000488 if (!h)
Michael J. Spencer470ae132010-12-04 00:32:40 +0000489 goto handle_status_error;
490 }
491
492 if (attr & FILE_ATTRIBUTE_DIRECTORY)
493 result = file_status(file_type::directory_file);
494 else
495 result = file_status(file_type::regular_file);
496
497 return success;
498
499handle_status_error:
500 error_code ec = windows_error(::GetLastError());
501 if (ec == windows_error::file_not_found ||
502 ec == windows_error::path_not_found)
503 result = file_status(file_type::file_not_found);
504 else if (ec == windows_error::sharing_violation)
505 result = file_status(file_type::type_unknown);
506 else {
507 result = file_status(file_type::status_error);
508 return ec;
509 }
510
511 return success;
512}
513
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000514error_code unique_file(const Twine &model, int &result_fd,
Argyrios Kyrtzidis814450a2011-07-28 00:29:20 +0000515 SmallVectorImpl<char> &result_path,
516 bool makeAbsolute) {
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000517 // Use result_path as temp storage.
518 result_path.set_size(0);
519 StringRef m = model.toStringRef(result_path);
520
521 SmallVector<wchar_t, 128> model_utf16;
522 if (error_code ec = UTF8ToUTF16(m, model_utf16)) return ec;
523
Argyrios Kyrtzidis814450a2011-07-28 00:29:20 +0000524 if (makeAbsolute) {
525 // Make model absolute by prepending a temp directory if it's not already.
526 bool absolute = path::is_absolute(m);
Michael J. Spencera81ac8f2011-12-08 22:50:09 +0000527
Argyrios Kyrtzidis814450a2011-07-28 00:29:20 +0000528 if (!absolute) {
529 SmallVector<wchar_t, 64> temp_dir;
530 if (error_code ec = TempDir(temp_dir)) return ec;
531 // Handle c: by removing it.
532 if (model_utf16.size() > 2 && model_utf16[1] == L':') {
533 model_utf16.erase(model_utf16.begin(), model_utf16.begin() + 2);
534 }
535 model_utf16.insert(model_utf16.begin(), temp_dir.begin(), temp_dir.end());
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000536 }
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000537 }
538
539 // Replace '%' with random chars. From here on, DO NOT modify model. It may be
540 // needed if the randomly chosen path already exists.
541 SmallVector<wchar_t, 128> random_path_utf16;
542
543 // Get a Crypto Provider for CryptGenRandom.
Michael J. Spencer7eec50b2010-12-06 04:28:13 +0000544 HCRYPTPROV HCPC;
545 if (!::CryptAcquireContextW(&HCPC,
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000546 NULL,
547 NULL,
548 PROV_RSA_FULL,
NAKAMURA Takumiedd09242011-01-17 22:41:34 +0000549 CRYPT_VERIFYCONTEXT))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000550 return windows_error(::GetLastError());
Michael J. Spencer7eec50b2010-12-06 04:28:13 +0000551 ScopedCryptContext CryptoProvider(HCPC);
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000552
553retry_random_path:
554 random_path_utf16.set_size(0);
555 for (SmallVectorImpl<wchar_t>::const_iterator i = model_utf16.begin(),
556 e = model_utf16.end();
557 i != e; ++i) {
558 if (*i == L'%') {
559 BYTE val = 0;
560 if (!::CryptGenRandom(CryptoProvider, 1, &val))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000561 return windows_error(::GetLastError());
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000562 random_path_utf16.push_back("0123456789abcdef"[val & 15]);
563 }
564 else
565 random_path_utf16.push_back(*i);
566 }
567 // Make random_path_utf16 null terminated.
568 random_path_utf16.push_back(0);
569 random_path_utf16.pop_back();
570
571 // Try to create + open the path.
572retry_create_file:
573 HANDLE TempFileHandle = ::CreateFileW(random_path_utf16.begin(),
574 GENERIC_READ | GENERIC_WRITE,
575 FILE_SHARE_READ,
576 NULL,
577 // Return ERROR_FILE_EXISTS if the file
578 // already exists.
579 CREATE_NEW,
580 FILE_ATTRIBUTE_TEMPORARY,
581 NULL);
582 if (TempFileHandle == INVALID_HANDLE_VALUE) {
583 // If the file existed, try again, otherwise, error.
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000584 error_code ec = windows_error(::GetLastError());
585 if (ec == windows_error::file_exists)
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000586 goto retry_random_path;
587 // Check for non-existing parent directories.
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000588 if (ec == windows_error::path_not_found) {
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000589 // Create the directories using result_path as temp storage.
590 if (error_code ec = UTF16ToUTF8(random_path_utf16.begin(),
591 random_path_utf16.size(), result_path))
592 return ec;
593 StringRef p(result_path.begin(), result_path.size());
594 SmallString<64> dir_to_create;
595 for (path::const_iterator i = path::begin(p),
596 e = --path::end(p); i != e; ++i) {
Michael J. Spencer936671b2010-12-07 03:57:37 +0000597 path::append(dir_to_create, *i);
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000598 bool Exists;
599 if (error_code ec = exists(Twine(dir_to_create), Exists)) return ec;
600 if (!Exists) {
601 // If c: doesn't exist, bail.
602 if (i->endswith(":"))
603 return ec;
604
605 SmallVector<wchar_t, 64> dir_to_create_utf16;
606 if (error_code ec = UTF8ToUTF16(dir_to_create, dir_to_create_utf16))
607 return ec;
608
609 // Create the directory.
610 if (!::CreateDirectoryW(dir_to_create_utf16.begin(), NULL))
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000611 return windows_error(::GetLastError());
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000612 }
613 }
614 goto retry_create_file;
615 }
616 return ec;
617 }
618
619 // Set result_path to the utf-8 representation of the path.
620 if (error_code ec = UTF16ToUTF8(random_path_utf16.begin(),
621 random_path_utf16.size(), result_path)) {
622 ::CloseHandle(TempFileHandle);
623 ::DeleteFileW(random_path_utf16.begin());
624 return ec;
625 }
626
627 // Convert the Windows API file handle into a C-runtime handle.
628 int fd = ::_open_osfhandle(intptr_t(TempFileHandle), 0);
629 if (fd == -1) {
630 ::CloseHandle(TempFileHandle);
631 ::DeleteFileW(random_path_utf16.begin());
632 // MSDN doesn't say anything about _open_osfhandle setting errno or
633 // GetLastError(), so just return invalid_handle.
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000634 return windows_error::invalid_handle;
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000635 }
636
637 result_fd = fd;
Michael J. Spencer9d425e72010-12-04 18:45:32 +0000638 return success;
Michael J. Spencer3cb84ef2010-12-03 01:21:28 +0000639}
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000640
Michael J. Spencerd6cdf1d2011-01-15 18:52:33 +0000641error_code get_magic(const Twine &path, uint32_t len,
642 SmallVectorImpl<char> &result) {
643 SmallString<128> path_storage;
644 SmallVector<wchar_t, 128> path_utf16;
645 result.set_size(0);
646
647 // Convert path to UTF-16.
648 if (error_code ec = UTF8ToUTF16(path.toStringRef(path_storage),
649 path_utf16))
650 return ec;
651
652 // Open file.
653 HANDLE file = ::CreateFileW(c_str(path_utf16),
654 GENERIC_READ,
655 FILE_SHARE_READ,
656 NULL,
657 OPEN_EXISTING,
658 FILE_ATTRIBUTE_READONLY,
659 NULL);
660 if (file == INVALID_HANDLE_VALUE)
661 return windows_error(::GetLastError());
662
663 // Allocate buffer.
664 result.reserve(len);
665
666 // Get magic!
667 DWORD bytes_read = 0;
668 BOOL read_success = ::ReadFile(file, result.data(), len, &bytes_read, NULL);
669 error_code ec = windows_error(::GetLastError());
670 ::CloseHandle(file);
671 if (!read_success || (bytes_read != len)) {
672 // Set result size to the number of bytes read if it's valid.
NAKAMURA Takumi19b6c732011-03-07 00:12:53 +0000673 if (bytes_read <= len)
Michael J. Spencerd6cdf1d2011-01-15 18:52:33 +0000674 result.set_size(bytes_read);
675 // ERROR_HANDLE_EOF is mapped to errc::value_too_large.
676 return ec;
677 }
678
679 result.set_size(len);
680 return success;
681}
682
Michael J. Spencera81ac8f2011-12-08 22:50:09 +0000683error_code detail::directory_iterator_construct(detail::DirIterState &it,
684 StringRef path){
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000685 SmallVector<wchar_t, 128> path_utf16;
686
687 if (error_code ec = UTF8ToUTF16(path,
688 path_utf16))
689 return ec;
690
691 // Convert path to the format that Windows is happy with.
692 if (path_utf16.size() > 0 &&
693 !is_separator(path_utf16[path.size() - 1]) &&
694 path_utf16[path.size() - 1] != L':') {
695 path_utf16.push_back(L'\\');
696 path_utf16.push_back(L'*');
697 } else {
698 path_utf16.push_back(L'*');
699 }
700
701 // Get the first directory entry.
702 WIN32_FIND_DATAW FirstFind;
Michael J. Spencer58fe86d2010-12-09 17:37:18 +0000703 ScopedFindHandle FindHandle(::FindFirstFileW(c_str(path_utf16), &FirstFind));
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000704 if (!FindHandle)
705 return windows_error(::GetLastError());
706
Michael J. Spencer277fa102011-01-05 16:39:30 +0000707 size_t FilenameLen = ::wcslen(FirstFind.cFileName);
708 while ((FilenameLen == 1 && FirstFind.cFileName[0] == L'.') ||
709 (FilenameLen == 2 && FirstFind.cFileName[0] == L'.' &&
710 FirstFind.cFileName[1] == L'.'))
711 if (!::FindNextFileW(FindHandle, &FirstFind)) {
712 error_code ec = windows_error(::GetLastError());
713 // Check for end.
714 if (ec == windows_error::no_more_files)
Michael J. Spencera81ac8f2011-12-08 22:50:09 +0000715 return detail::directory_iterator_destruct(it);
Michael J. Spencer277fa102011-01-05 16:39:30 +0000716 return ec;
717 } else
718 FilenameLen = ::wcslen(FirstFind.cFileName);
719
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000720 // Construct the current directory entry.
Michael J. Spencer277fa102011-01-05 16:39:30 +0000721 SmallString<128> directory_entry_name_utf8;
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000722 if (error_code ec = UTF16ToUTF8(FirstFind.cFileName,
723 ::wcslen(FirstFind.cFileName),
Michael J. Spencer277fa102011-01-05 16:39:30 +0000724 directory_entry_name_utf8))
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000725 return ec;
726
727 it.IterationHandle = intptr_t(FindHandle.take());
Michael J. Spencer277fa102011-01-05 16:39:30 +0000728 SmallString<128> directory_entry_path(path);
729 path::append(directory_entry_path, directory_entry_name_utf8.str());
730 it.CurrentEntry = directory_entry(directory_entry_path.str());
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000731
732 return success;
733}
734
Michael J. Spencera81ac8f2011-12-08 22:50:09 +0000735error_code detail::directory_iterator_destruct(detail::DirIterState &it) {
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000736 if (it.IterationHandle != 0)
737 // Closes the handle if it's valid.
738 ScopedFindHandle close(HANDLE(it.IterationHandle));
739 it.IterationHandle = 0;
740 it.CurrentEntry = directory_entry();
741 return success;
742}
743
Michael J. Spencera81ac8f2011-12-08 22:50:09 +0000744error_code detail::directory_iterator_increment(detail::DirIterState &it) {
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000745 WIN32_FIND_DATAW FindData;
746 if (!::FindNextFileW(HANDLE(it.IterationHandle), &FindData)) {
747 error_code ec = windows_error(::GetLastError());
748 // Check for end.
749 if (ec == windows_error::no_more_files)
Michael J. Spencera81ac8f2011-12-08 22:50:09 +0000750 return detail::directory_iterator_destruct(it);
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000751 return ec;
752 }
753
Michael J. Spencer277fa102011-01-05 16:39:30 +0000754 size_t FilenameLen = ::wcslen(FindData.cFileName);
755 if ((FilenameLen == 1 && FindData.cFileName[0] == L'.') ||
756 (FilenameLen == 2 && FindData.cFileName[0] == L'.' &&
757 FindData.cFileName[1] == L'.'))
758 return directory_iterator_increment(it);
759
Michael J. Spencer753cbbb2010-12-06 04:28:42 +0000760 SmallString<128> directory_entry_path_utf8;
761 if (error_code ec = UTF16ToUTF8(FindData.cFileName,
762 ::wcslen(FindData.cFileName),
763 directory_entry_path_utf8))
764 return ec;
765
766 it.CurrentEntry.replace_filename(Twine(directory_entry_path_utf8));
767 return success;
768}
769
Michael J. Spencerbee0c382010-12-01 19:32:01 +0000770} // end namespace fs
Michael J. Spencerdffde992010-11-29 22:28:51 +0000771} // end namespace sys
772} // end namespace llvm