1 #include "../git-compat-util.h"
6 #include "../run-command.h"
9 static const int delay
[] = { 0, 1, 10, 20, 40 };
10 unsigned int _CRT_fmode
= _O_BINARY
;
12 int err_win_to_posix(DWORD winerr
)
16 case ERROR_ACCESS_DENIED
: error
= EACCES
; break;
17 case ERROR_ACCOUNT_DISABLED
: error
= EACCES
; break;
18 case ERROR_ACCOUNT_RESTRICTION
: error
= EACCES
; break;
19 case ERROR_ALREADY_ASSIGNED
: error
= EBUSY
; break;
20 case ERROR_ALREADY_EXISTS
: error
= EEXIST
; break;
21 case ERROR_ARITHMETIC_OVERFLOW
: error
= ERANGE
; break;
22 case ERROR_BAD_COMMAND
: error
= EIO
; break;
23 case ERROR_BAD_DEVICE
: error
= ENODEV
; break;
24 case ERROR_BAD_DRIVER_LEVEL
: error
= ENXIO
; break;
25 case ERROR_BAD_EXE_FORMAT
: error
= ENOEXEC
; break;
26 case ERROR_BAD_FORMAT
: error
= ENOEXEC
; break;
27 case ERROR_BAD_LENGTH
: error
= EINVAL
; break;
28 case ERROR_BAD_PATHNAME
: error
= ENOENT
; break;
29 case ERROR_BAD_PIPE
: error
= EPIPE
; break;
30 case ERROR_BAD_UNIT
: error
= ENODEV
; break;
31 case ERROR_BAD_USERNAME
: error
= EINVAL
; break;
32 case ERROR_BROKEN_PIPE
: error
= EPIPE
; break;
33 case ERROR_BUFFER_OVERFLOW
: error
= ENAMETOOLONG
; break;
34 case ERROR_BUSY
: error
= EBUSY
; break;
35 case ERROR_BUSY_DRIVE
: error
= EBUSY
; break;
36 case ERROR_CALL_NOT_IMPLEMENTED
: error
= ENOSYS
; break;
37 case ERROR_CANNOT_MAKE
: error
= EACCES
; break;
38 case ERROR_CANTOPEN
: error
= EIO
; break;
39 case ERROR_CANTREAD
: error
= EIO
; break;
40 case ERROR_CANTWRITE
: error
= EIO
; break;
41 case ERROR_CRC
: error
= EIO
; break;
42 case ERROR_CURRENT_DIRECTORY
: error
= EACCES
; break;
43 case ERROR_DEVICE_IN_USE
: error
= EBUSY
; break;
44 case ERROR_DEV_NOT_EXIST
: error
= ENODEV
; break;
45 case ERROR_DIRECTORY
: error
= EINVAL
; break;
46 case ERROR_DIR_NOT_EMPTY
: error
= ENOTEMPTY
; break;
47 case ERROR_DISK_CHANGE
: error
= EIO
; break;
48 case ERROR_DISK_FULL
: error
= ENOSPC
; break;
49 case ERROR_DRIVE_LOCKED
: error
= EBUSY
; break;
50 case ERROR_ENVVAR_NOT_FOUND
: error
= EINVAL
; break;
51 case ERROR_EXE_MARKED_INVALID
: error
= ENOEXEC
; break;
52 case ERROR_FILENAME_EXCED_RANGE
: error
= ENAMETOOLONG
; break;
53 case ERROR_FILE_EXISTS
: error
= EEXIST
; break;
54 case ERROR_FILE_INVALID
: error
= ENODEV
; break;
55 case ERROR_FILE_NOT_FOUND
: error
= ENOENT
; break;
56 case ERROR_GEN_FAILURE
: error
= EIO
; break;
57 case ERROR_HANDLE_DISK_FULL
: error
= ENOSPC
; break;
58 case ERROR_INSUFFICIENT_BUFFER
: error
= ENOMEM
; break;
59 case ERROR_INVALID_ACCESS
: error
= EACCES
; break;
60 case ERROR_INVALID_ADDRESS
: error
= EFAULT
; break;
61 case ERROR_INVALID_BLOCK
: error
= EFAULT
; break;
62 case ERROR_INVALID_DATA
: error
= EINVAL
; break;
63 case ERROR_INVALID_DRIVE
: error
= ENODEV
; break;
64 case ERROR_INVALID_EXE_SIGNATURE
: error
= ENOEXEC
; break;
65 case ERROR_INVALID_FLAGS
: error
= EINVAL
; break;
66 case ERROR_INVALID_FUNCTION
: error
= ENOSYS
; break;
67 case ERROR_INVALID_HANDLE
: error
= EBADF
; break;
68 case ERROR_INVALID_LOGON_HOURS
: error
= EACCES
; break;
69 case ERROR_INVALID_NAME
: error
= EINVAL
; break;
70 case ERROR_INVALID_OWNER
: error
= EINVAL
; break;
71 case ERROR_INVALID_PARAMETER
: error
= EINVAL
; break;
72 case ERROR_INVALID_PASSWORD
: error
= EPERM
; break;
73 case ERROR_INVALID_PRIMARY_GROUP
: error
= EINVAL
; break;
74 case ERROR_INVALID_SIGNAL_NUMBER
: error
= EINVAL
; break;
75 case ERROR_INVALID_TARGET_HANDLE
: error
= EIO
; break;
76 case ERROR_INVALID_WORKSTATION
: error
= EACCES
; break;
77 case ERROR_IO_DEVICE
: error
= EIO
; break;
78 case ERROR_IO_INCOMPLETE
: error
= EINTR
; break;
79 case ERROR_LOCKED
: error
= EBUSY
; break;
80 case ERROR_LOCK_VIOLATION
: error
= EACCES
; break;
81 case ERROR_LOGON_FAILURE
: error
= EACCES
; break;
82 case ERROR_MAPPED_ALIGNMENT
: error
= EINVAL
; break;
83 case ERROR_META_EXPANSION_TOO_LONG
: error
= E2BIG
; break;
84 case ERROR_MORE_DATA
: error
= EPIPE
; break;
85 case ERROR_NEGATIVE_SEEK
: error
= ESPIPE
; break;
86 case ERROR_NOACCESS
: error
= EFAULT
; break;
87 case ERROR_NONE_MAPPED
: error
= EINVAL
; break;
88 case ERROR_NOT_ENOUGH_MEMORY
: error
= ENOMEM
; break;
89 case ERROR_NOT_READY
: error
= EAGAIN
; break;
90 case ERROR_NOT_SAME_DEVICE
: error
= EXDEV
; break;
91 case ERROR_NO_DATA
: error
= EPIPE
; break;
92 case ERROR_NO_MORE_SEARCH_HANDLES
: error
= EIO
; break;
93 case ERROR_NO_PROC_SLOTS
: error
= EAGAIN
; break;
94 case ERROR_NO_SUCH_PRIVILEGE
: error
= EACCES
; break;
95 case ERROR_OPEN_FAILED
: error
= EIO
; break;
96 case ERROR_OPEN_FILES
: error
= EBUSY
; break;
97 case ERROR_OPERATION_ABORTED
: error
= EINTR
; break;
98 case ERROR_OUTOFMEMORY
: error
= ENOMEM
; break;
99 case ERROR_PASSWORD_EXPIRED
: error
= EACCES
; break;
100 case ERROR_PATH_BUSY
: error
= EBUSY
; break;
101 case ERROR_PATH_NOT_FOUND
: error
= ENOENT
; break;
102 case ERROR_PIPE_BUSY
: error
= EBUSY
; break;
103 case ERROR_PIPE_CONNECTED
: error
= EPIPE
; break;
104 case ERROR_PIPE_LISTENING
: error
= EPIPE
; break;
105 case ERROR_PIPE_NOT_CONNECTED
: error
= EPIPE
; break;
106 case ERROR_PRIVILEGE_NOT_HELD
: error
= EACCES
; break;
107 case ERROR_READ_FAULT
: error
= EIO
; break;
108 case ERROR_SEEK
: error
= EIO
; break;
109 case ERROR_SEEK_ON_DEVICE
: error
= ESPIPE
; break;
110 case ERROR_SHARING_BUFFER_EXCEEDED
: error
= ENFILE
; break;
111 case ERROR_SHARING_VIOLATION
: error
= EACCES
; break;
112 case ERROR_STACK_OVERFLOW
: error
= ENOMEM
; break;
113 case ERROR_SWAPERROR
: error
= ENOENT
; break;
114 case ERROR_TOO_MANY_MODULES
: error
= EMFILE
; break;
115 case ERROR_TOO_MANY_OPEN_FILES
: error
= EMFILE
; break;
116 case ERROR_UNRECOGNIZED_MEDIA
: error
= ENXIO
; break;
117 case ERROR_UNRECOGNIZED_VOLUME
: error
= ENODEV
; break;
118 case ERROR_WAIT_NO_CHILDREN
: error
= ECHILD
; break;
119 case ERROR_WRITE_FAULT
: error
= EIO
; break;
120 case ERROR_WRITE_PROTECT
: error
= EROFS
; break;
125 static inline int is_file_in_use_error(DWORD errcode
)
128 case ERROR_SHARING_VIOLATION
:
129 case ERROR_ACCESS_DENIED
:
136 static int read_yes_no_answer(void)
140 if (fgets(answer
, sizeof(answer
), stdin
)) {
141 size_t answer_len
= strlen(answer
);
142 int got_full_line
= 0, c
;
144 /* remove the newline */
145 if (answer_len
>= 2 && answer
[answer_len
-2] == '\r') {
146 answer
[answer_len
-2] = '\0';
148 } else if (answer_len
>= 1 && answer
[answer_len
-1] == '\n') {
149 answer
[answer_len
-1] = '\0';
152 /* flush the buffer in case we did not get the full line */
154 while ((c
= getchar()) != EOF
&& c
!= '\n')
157 /* we could not read, return the
158 * default answer which is no */
161 if (tolower(answer
[0]) == 'y' && !answer
[1])
163 if (!strncasecmp(answer
, "yes", sizeof(answer
)))
165 if (tolower(answer
[0]) == 'n' && !answer
[1])
167 if (!strncasecmp(answer
, "no", sizeof(answer
)))
170 /* did not find an answer we understand */
174 static int ask_yes_no_if_possible(const char *format
, ...)
177 const char *retry_hook
[] = { NULL
, NULL
, NULL
};
180 va_start(args
, format
);
181 vsnprintf(question
, sizeof(question
), format
, args
);
184 if ((retry_hook
[0] = getenv("GIT_ASK_YESNO"))) {
185 retry_hook
[1] = question
;
186 return !run_command_v_opt(retry_hook
, 0);
189 if (!isatty(_fileno(stdin
)) || !isatty(_fileno(stderr
)))
194 fprintf(stderr
, "%s (y/n) ", question
);
196 if ((answer
= read_yes_no_answer()) >= 0)
199 fprintf(stderr
, "Sorry, I did not understand your answer. "
200 "Please type 'y' or 'n'\n");
204 int mingw_unlink(const char *pathname
)
207 wchar_t wpathname
[MAX_LONG_PATH
];
208 if (xutftowcs_long_path(wpathname
, pathname
) < 0)
211 /* read-only files cannot be removed */
212 _wchmod(wpathname
, 0666);
213 while ((ret
= _wunlink(wpathname
)) == -1 && tries
< ARRAY_SIZE(delay
)) {
214 if (!is_file_in_use_error(GetLastError()))
217 * We assume that some other process had the source or
218 * destination file open at the wrong moment and retry.
219 * In order to give the other process a higher chance to
220 * complete its operation, we give up our time slice now.
221 * If we have to retry again, we do sleep a bit.
226 while (ret
== -1 && is_file_in_use_error(GetLastError()) &&
227 ask_yes_no_if_possible("Unlink of file '%s' failed. "
228 "Should I try again?", pathname
))
229 ret
= _wunlink(wpathname
);
233 static int is_dir_empty(const wchar_t *wpath
)
235 WIN32_FIND_DATAW findbuf
;
237 wchar_t wbuf
[MAX_LONG_PATH
+ 2];
239 wcscat(wbuf
, L
"\\*");
240 handle
= FindFirstFileW(wbuf
, &findbuf
);
241 if (handle
== INVALID_HANDLE_VALUE
)
242 return GetLastError() == ERROR_NO_MORE_FILES
;
244 while (!wcscmp(findbuf
.cFileName
, L
".") ||
245 !wcscmp(findbuf
.cFileName
, L
".."))
246 if (!FindNextFileW(handle
, &findbuf
)) {
247 DWORD err
= GetLastError();
249 return err
== ERROR_NO_MORE_FILES
;
255 int mingw_rmdir(const char *pathname
)
258 wchar_t wpathname
[MAX_LONG_PATH
];
259 if (xutftowcs_long_path(wpathname
, pathname
) < 0)
262 while ((ret
= _wrmdir(wpathname
)) == -1 && tries
< ARRAY_SIZE(delay
)) {
263 if (!is_file_in_use_error(GetLastError()))
264 errno
= err_win_to_posix(GetLastError());
267 if (!is_dir_empty(wpathname
)) {
272 * We assume that some other process had the source or
273 * destination file open at the wrong moment and retry.
274 * In order to give the other process a higher chance to
275 * complete its operation, we give up our time slice now.
276 * If we have to retry again, we do sleep a bit.
281 while (ret
== -1 && errno
== EACCES
&& is_file_in_use_error(GetLastError()) &&
282 ask_yes_no_if_possible("Deletion of directory '%s' failed. "
283 "Should I try again?", pathname
))
284 ret
= _wrmdir(wpathname
);
288 static int make_hidden(const wchar_t *path
)
290 DWORD attribs
= GetFileAttributesW(path
);
291 if (SetFileAttributesW(path
, FILE_ATTRIBUTE_HIDDEN
| attribs
))
293 errno
= err_win_to_posix(GetLastError());
297 void mingw_mark_as_git_dir(const char *dir
)
299 wchar_t wdir
[MAX_LONG_PATH
];
300 if (hide_dotfiles
!= HIDE_DOTFILES_FALSE
&& !is_bare_repository())
301 if (xutftowcs_long_path(wdir
, dir
) < 0 || make_hidden(wdir
))
302 warning("Failed to make '%s' hidden", dir
);
303 git_config_set("core.hideDotFiles",
304 hide_dotfiles
== HIDE_DOTFILES_FALSE
? "false" :
305 (hide_dotfiles
== HIDE_DOTFILES_DOTGITONLY
?
306 "dotGitOnly" : "true"));
309 int mingw_mkdir(const char *path
, int mode
)
312 wchar_t wpath
[MAX_LONG_PATH
];
313 /* CreateDirectoryW path limit is 248 (MAX_PATH - 8.3 file name) */
314 if (xutftowcs_path_ex(wpath
, path
, MAX_LONG_PATH
, -1, 248,
315 core_long_paths
) < 0)
318 ret
= _wmkdir(wpath
);
319 if (!ret
&& hide_dotfiles
== HIDE_DOTFILES_TRUE
) {
321 * In Windows a file or dir starting with a dot is not
322 * automatically hidden. So lets mark it as hidden when
323 * such a directory is created.
325 const char *start
= basename((char*)path
);
327 return make_hidden(wpath
);
332 int mingw_open (const char *filename
, int oflags
, ...)
337 wchar_t wfilename
[MAX_LONG_PATH
];
339 va_start(args
, oflags
);
340 mode
= va_arg(args
, int);
343 if (filename
&& !strcmp(filename
, "/dev/null"))
346 if (xutftowcs_long_path(wfilename
, filename
) < 0)
348 fd
= _wopen(wfilename
, oflags
, mode
);
350 if (fd
< 0 && (oflags
& O_CREAT
) && errno
== EACCES
) {
351 DWORD attrs
= GetFileAttributesW(wfilename
);
352 if (attrs
!= INVALID_FILE_ATTRIBUTES
&& (attrs
& FILE_ATTRIBUTE_DIRECTORY
))
355 if ((oflags
& O_CREAT
) && fd
>= 0 &&
356 hide_dotfiles
== HIDE_DOTFILES_TRUE
) {
358 * In Windows a file or dir starting with a dot is not
359 * automatically hidden. So lets mark it as hidden when
360 * such a file is created.
362 const char *start
= basename((char*)filename
);
363 if (*start
== '.' && make_hidden(wfilename
))
364 warning("Could not mark '%s' as hidden.", filename
);
369 static BOOL WINAPI
ctrl_ignore(DWORD type
)
375 int mingw_fgetc(FILE *stream
)
378 if (!isatty(_fileno(stream
)))
379 return fgetc(stream
);
381 SetConsoleCtrlHandler(ctrl_ignore
, TRUE
);
384 if (ch
!= EOF
|| GetLastError() != ERROR_OPERATION_ABORTED
)
387 /* Ctrl+C was pressed, simulate SIGINT and retry */
390 SetConsoleCtrlHandler(ctrl_ignore
, FALSE
);
395 FILE *mingw_fopen (const char *filename
, const char *otype
)
399 wchar_t wfilename
[MAX_LONG_PATH
], wotype
[4];
400 if (hide_dotfiles
== HIDE_DOTFILES_TRUE
&&
401 basename((char*)filename
)[0] == '.')
402 hide
= access(filename
, F_OK
);
403 if (filename
&& !strcmp(filename
, "/dev/null"))
405 if (xutftowcs_long_path(wfilename
, filename
) < 0 ||
406 xutftowcs(wotype
, otype
, ARRAY_SIZE(wotype
)) < 0)
408 file
= _wfopen(wfilename
, wotype
);
409 if (file
&& hide
&& make_hidden(wfilename
))
410 warning("Could not mark '%s' as hidden.", filename
);
414 FILE *mingw_freopen (const char *filename
, const char *otype
, FILE *stream
)
418 wchar_t wfilename
[MAX_LONG_PATH
], wotype
[4];
419 if (hide_dotfiles
== HIDE_DOTFILES_TRUE
&&
420 basename((char*)filename
)[0] == '.')
421 hide
= access(filename
, F_OK
);
422 if (filename
&& !strcmp(filename
, "/dev/null"))
424 if (xutftowcs_long_path(wfilename
, filename
) < 0 ||
425 xutftowcs(wotype
, otype
, ARRAY_SIZE(wotype
)) < 0)
427 file
= _wfreopen(wfilename
, wotype
, stream
);
428 if (file
&& hide
&& make_hidden(wfilename
))
429 warning("Could not mark '%s' as hidden.", filename
);
434 int mingw_fflush(FILE *stream
)
436 int ret
= fflush(stream
);
439 * write() is used behind the scenes of stdio output functions.
440 * Since git code does not check for errors after each stdio write
441 * operation, it can happen that write() is called by a later
442 * stdio function even if an earlier write() call failed. In the
443 * case of a pipe whose readable end was closed, only the first
444 * call to write() reports EPIPE on Windows. Subsequent write()
445 * calls report EINVAL. It is impossible to notice whether this
446 * fflush invocation triggered such a case, therefore, we have to
447 * catch all EINVAL errors whole-sale.
449 if (ret
&& errno
== EINVAL
)
455 int mingw_access(const char *filename
, int mode
)
457 wchar_t wfilename
[MAX_LONG_PATH
];
458 if (xutftowcs_long_path(wfilename
, filename
) < 0)
460 /* X_OK is not supported by the MSVCRT version */
461 return _waccess(wfilename
, mode
& ~X_OK
);
464 /* cached length of current directory for handle_long_path */
465 static int current_directory_len
= 0;
467 int mingw_chdir(const char *dirname
)
470 wchar_t wdirname
[MAX_PATH
];
471 /* SetCurrentDirectoryW doesn't support long paths */
472 if (xutftowcs_path(wdirname
, dirname
) < 0)
474 result
= _wchdir(wdirname
);
475 current_directory_len
= GetCurrentDirectoryW(0, NULL
);
479 int mingw_chmod(const char *filename
, int mode
)
481 wchar_t wfilename
[MAX_LONG_PATH
];
482 if (xutftowcs_long_path(wfilename
, filename
) < 0)
484 return _wchmod(wfilename
, mode
);
487 /* We keep the do_lstat code in a separate function to avoid recursion.
488 * When a path ends with a slash, the stat will fail with ENOENT. In
489 * this case, we strip the trailing slashes and stat again.
491 * If follow is true then act like stat() and report on the link
492 * target. Otherwise report on the link itself.
494 static int do_lstat(int follow
, const char *file_name
, struct stat
*buf
)
496 WIN32_FILE_ATTRIBUTE_DATA fdata
;
497 wchar_t wfilename
[MAX_LONG_PATH
];
498 if (xutftowcs_long_path(wfilename
, file_name
) < 0)
501 if (GetFileAttributesExW(wfilename
, GetFileExInfoStandard
, &fdata
)) {
506 buf
->st_mode
= file_attr_to_st_mode(fdata
.dwFileAttributes
);
507 buf
->st_size
= fdata
.nFileSizeLow
|
508 (((off_t
)fdata
.nFileSizeHigh
)<<32);
509 buf
->st_dev
= buf
->st_rdev
= 0; /* not used by Git */
510 buf
->st_atime
= filetime_to_time_t(&(fdata
.ftLastAccessTime
));
511 buf
->st_mtime
= filetime_to_time_t(&(fdata
.ftLastWriteTime
));
512 buf
->st_ctime
= filetime_to_time_t(&(fdata
.ftCreationTime
));
513 if (fdata
.dwFileAttributes
& FILE_ATTRIBUTE_REPARSE_POINT
) {
514 WIN32_FIND_DATAW findbuf
;
515 HANDLE handle
= FindFirstFileW(wfilename
, &findbuf
);
516 if (handle
!= INVALID_HANDLE_VALUE
) {
517 if ((findbuf
.dwFileAttributes
& FILE_ATTRIBUTE_REPARSE_POINT
) &&
518 (findbuf
.dwReserved0
== IO_REPARSE_TAG_SYMLINK
)) {
520 char buffer
[MAXIMUM_REPARSE_DATA_BUFFER_SIZE
];
521 buf
->st_size
= readlink(file_name
, buffer
, MAXIMUM_REPARSE_DATA_BUFFER_SIZE
);
523 buf
->st_mode
= S_IFLNK
;
525 buf
->st_mode
|= S_IREAD
;
526 if (!(findbuf
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
527 buf
->st_mode
|= S_IWRITE
;
534 switch (GetLastError()) {
535 case ERROR_ACCESS_DENIED
:
536 case ERROR_SHARING_VIOLATION
:
537 case ERROR_LOCK_VIOLATION
:
538 case ERROR_SHARING_BUFFER_EXCEEDED
:
541 case ERROR_BUFFER_OVERFLOW
:
542 errno
= ENAMETOOLONG
;
544 case ERROR_NOT_ENOUGH_MEMORY
:
554 /* We provide our own lstat/fstat functions, since the provided
555 * lstat/fstat functions are so slow. These stat functions are
556 * tailored for Git's usage (read: fast), and are not meant to be
557 * complete. Note that Git stat()s are redirected to mingw_lstat()
558 * too, since Windows doesn't really handle symlinks that well.
560 static int do_stat_internal(int follow
, const char *file_name
, struct stat
*buf
)
563 char alt_name
[PATH_MAX
];
565 if (!do_lstat(follow
, file_name
, buf
))
568 /* if file_name ended in a '/', Windows returned ENOENT;
569 * try again without trailing slashes
574 namelen
= strlen(file_name
);
575 if (namelen
&& file_name
[namelen
-1] != '/')
577 while (namelen
&& file_name
[namelen
-1] == '/')
579 if (!namelen
|| namelen
>= PATH_MAX
)
582 memcpy(alt_name
, file_name
, namelen
);
583 alt_name
[namelen
] = 0;
584 return do_lstat(follow
, alt_name
, buf
);
587 int (*lstat
)(const char *file_name
, struct stat
*buf
) = mingw_lstat
;
589 int mingw_lstat(const char *file_name
, struct stat
*buf
)
591 return do_stat_internal(0, file_name
, buf
);
593 int mingw_stat(const char *file_name
, struct stat
*buf
)
595 return do_stat_internal(1, file_name
, buf
);
598 int mingw_fstat(int fd
, struct stat
*buf
)
600 HANDLE fh
= (HANDLE
)_get_osfhandle(fd
);
601 BY_HANDLE_FILE_INFORMATION fdata
;
603 if (fh
== INVALID_HANDLE_VALUE
) {
607 /* direct non-file handles to MS's fstat() */
608 if (GetFileType(fh
) != FILE_TYPE_DISK
)
609 return _fstati64(fd
, buf
);
611 if (GetFileInformationByHandle(fh
, &fdata
)) {
616 buf
->st_mode
= file_attr_to_st_mode(fdata
.dwFileAttributes
);
617 buf
->st_size
= fdata
.nFileSizeLow
|
618 (((off_t
)fdata
.nFileSizeHigh
)<<32);
619 buf
->st_dev
= buf
->st_rdev
= 0; /* not used by Git */
620 buf
->st_atime
= filetime_to_time_t(&(fdata
.ftLastAccessTime
));
621 buf
->st_mtime
= filetime_to_time_t(&(fdata
.ftLastWriteTime
));
622 buf
->st_ctime
= filetime_to_time_t(&(fdata
.ftCreationTime
));
629 static inline void time_t_to_filetime(time_t t
, FILETIME
*ft
)
631 long long winTime
= t
* 10000000LL + 116444736000000000LL;
632 ft
->dwLowDateTime
= winTime
;
633 ft
->dwHighDateTime
= winTime
>> 32;
636 int mingw_utime (const char *file_name
, const struct utimbuf
*times
)
641 wchar_t wfilename
[MAX_LONG_PATH
];
642 if (xutftowcs_long_path(wfilename
, file_name
) < 0)
645 /* must have write permission */
646 attrs
= GetFileAttributesW(wfilename
);
647 if (attrs
!= INVALID_FILE_ATTRIBUTES
&&
648 (attrs
& FILE_ATTRIBUTE_READONLY
)) {
649 /* ignore errors here; open() will report them */
650 SetFileAttributesW(wfilename
, attrs
& ~FILE_ATTRIBUTE_READONLY
);
653 if ((fh
= _wopen(wfilename
, O_RDWR
| O_BINARY
)) < 0) {
659 time_t_to_filetime(times
->modtime
, &mft
);
660 time_t_to_filetime(times
->actime
, &aft
);
662 GetSystemTimeAsFileTime(&mft
);
665 if (!SetFileTime((HANDLE
)_get_osfhandle(fh
), NULL
, &aft
, &mft
)) {
673 if (attrs
!= INVALID_FILE_ATTRIBUTES
&&
674 (attrs
& FILE_ATTRIBUTE_READONLY
)) {
675 /* ignore errors again */
676 SetFileAttributesW(wfilename
, attrs
);
681 unsigned int sleep (unsigned int seconds
)
687 char *mingw_mktemp(char *template)
689 wchar_t wtemplate
[MAX_PATH
];
690 /* we need to return the path, thus no long paths here! */
691 if (xutftowcs_path(wtemplate
, template) < 0)
693 if (!_wmktemp(wtemplate
))
695 if (xwcstoutf(template, wtemplate
, strlen(template) + 1) < 0)
700 int mkstemp(char *template)
702 char *filename
= mktemp(template);
703 if (filename
== NULL
)
705 return open(filename
, O_RDWR
| O_CREAT
, 0600);
708 int gettimeofday(struct timeval
*tv
, void *tz
)
713 GetSystemTimeAsFileTime(&ft
);
714 hnsec
= filetime_to_hnsec(&ft
);
715 tv
->tv_sec
= hnsec
/ 10000000;
716 tv
->tv_usec
= (hnsec
% 10000000) / 10;
720 int pipe(int filedes
[2])
724 /* this creates non-inheritable handles */
725 if (!CreatePipe(&h
[0], &h
[1], NULL
, 8192)) {
726 errno
= err_win_to_posix(GetLastError());
729 filedes
[0] = _open_osfhandle((int)h
[0], O_NOINHERIT
);
730 if (filedes
[0] < 0) {
735 filedes
[1] = _open_osfhandle((int)h
[1], O_NOINHERIT
);
736 if (filedes
[0] < 0) {
744 struct tm
*gmtime_r(const time_t *timep
, struct tm
*result
)
746 /* gmtime() in MSVCRT.DLL is thread-safe, but not reentrant */
747 memcpy(result
, gmtime(timep
), sizeof(struct tm
));
751 struct tm
*localtime_r(const time_t *timep
, struct tm
*result
)
753 /* localtime() in MSVCRT.DLL is thread-safe, but not reentrant */
754 memcpy(result
, localtime(timep
), sizeof(struct tm
));
758 char *mingw_getcwd(char *pointer
, int len
)
761 wchar_t wpointer
[MAX_PATH
];
762 if (!_wgetcwd(wpointer
, ARRAY_SIZE(wpointer
)))
764 if (xwcstoutf(pointer
, wpointer
, len
) < 0)
766 for (i
= 0; pointer
[i
]; i
++)
767 if (pointer
[i
] == '\\')
773 * Compare environment entries by key (i.e. stopping at '=' or '\0').
775 static int compareenv(const void *v1
, const void *v2
)
777 const char *e1
= *(const char**)v1
;
778 const char *e2
= *(const char**)v2
;
783 c1
= (c1
== '=') ? 0 : tolower(c1
);
784 c2
= (c2
== '=') ? 0 : tolower(c2
);
794 static int bsearchenv(char **env
, const char *name
, size_t size
)
796 unsigned low
= 0, high
= size
;
798 unsigned mid
= low
+ ((high
- low
) >> 1);
799 int cmp
= compareenv(&env
[mid
], &name
);
807 return ~low
; /* not found, return 1's complement of insert position */
811 * If name contains '=', then sets the variable, otherwise it unsets it
812 * Size includes the terminating NULL. Env must have room for size + 1 entries
813 * (in case of insert). Returns the new size. Optionally frees removed entries.
815 static int do_putenv(char **env
, const char *name
, int size
, int free_old
)
817 int i
= bsearchenv(env
, name
, size
- 1);
819 /* optionally free removed / replaced entry */
820 if (i
>= 0 && free_old
)
823 if (strchr(name
, '=')) {
824 /* if new value ('key=value') is specified, insert or replace entry */
827 memmove(&env
[i
+ 1], &env
[i
], (size
- i
) * sizeof(char*));
830 env
[i
] = (char*) name
;
832 /* otherwise ('key') remove existing entry */
834 memmove(&env
[i
], &env
[i
+ 1], (size
- i
) * sizeof(char*));
839 /* used number of elements of environ array, including terminating NULL */
840 static int environ_size
= 0;
841 /* allocated size of environ array, in bytes */
842 static int environ_alloc
= 0;
844 char *mingw_getenv(const char *name
)
847 int pos
= bsearchenv(environ
, name
, environ_size
- 1);
850 value
= strchr(environ
[pos
], '=');
851 return value
? &value
[1] : NULL
;
854 int mingw_putenv(const char *namevalue
)
856 ALLOC_GROW(environ
, (environ_size
+ 1) * sizeof(char*), environ_alloc
);
857 environ_size
= do_putenv(environ
, namevalue
, environ_size
, 1);
862 * See http://msdn2.microsoft.com/en-us/library/17w5ykft(vs.71).aspx
863 * (Parsing C++ Command-Line Arguments)
865 static const char *quote_arg(const char *arg
)
867 /* count chars to quote */
869 int force_quotes
= 0;
872 if (!*p
) force_quotes
= 1;
874 if (isspace(*p
) || *p
== '*' || *p
== '?' || *p
== '{' || *p
== '\'')
878 else if (*p
== '\\') {
892 if (!force_quotes
&& n
== 0)
895 /* insert \ where necessary */
896 d
= q
= xmalloc(len
+n
+3);
901 else if (*arg
== '\\') {
903 while (*arg
== '\\') {
920 static const char *parse_interpreter(const char *cmd
)
922 static char buf
[100];
926 /* don't even try a .exe */
928 if (n
>= 4 && !strcasecmp(cmd
+n
-4, ".exe"))
931 fd
= open(cmd
, O_RDONLY
);
934 n
= read(fd
, buf
, sizeof(buf
)-1);
936 if (n
< 4) /* at least '#!/x' and not error */
939 if (buf
[0] != '#' || buf
[1] != '!')
942 p
= buf
+ strcspn(buf
, "\r\n");
947 if (!(p
= strrchr(buf
+2, '/')) && !(p
= strrchr(buf
+2, '\\')))
950 if ((opt
= strchr(p
+1, ' ')))
956 * Splits the PATH into parts.
958 static char **get_path_split(void)
960 char *p
, **path
, *envpath
= getenv("PATH");
963 if (!envpath
|| !*envpath
)
966 envpath
= xstrdup(envpath
);
972 if (*dir
) { /* not earlier, catches series of ; */
979 path
= xmalloc((n
+1)*sizeof(char *));
984 path
[i
++] = xstrdup(p
);
994 static void free_path_split(char **path
)
1007 * exe_only means that we only want to detect .exe files, but not scripts
1008 * (which do not have an extension)
1010 static char *lookup_prog(const char *dir
, const char *cmd
, int isexe
, int exe_only
)
1012 char path
[MAX_PATH
];
1013 wchar_t wpath
[MAX_PATH
];
1014 snprintf(path
, sizeof(path
), "%s\\%s.exe", dir
, cmd
);
1016 if (xutftowcs_path(wpath
, path
) < 0)
1019 if (!isexe
&& _waccess(wpath
, F_OK
) == 0)
1020 return xstrdup(path
);
1021 wpath
[wcslen(wpath
)-4] = '\0';
1022 if ((!exe_only
|| isexe
) && _waccess(wpath
, F_OK
) == 0) {
1023 if (!(GetFileAttributesW(wpath
) & FILE_ATTRIBUTE_DIRECTORY
)) {
1024 path
[strlen(path
)-4] = '\0';
1025 return xstrdup(path
);
1032 * Determines the absolute path of cmd using the split path in path.
1033 * If cmd contains a slash or backslash, no lookup is performed.
1035 static char *path_lookup(const char *cmd
, char **path
, int exe_only
)
1038 int len
= strlen(cmd
);
1039 int isexe
= len
>= 4 && !strcasecmp(cmd
+len
-4, ".exe");
1041 if (strchr(cmd
, '/') || strchr(cmd
, '\\'))
1042 prog
= xstrdup(cmd
);
1044 while (!prog
&& *path
)
1045 prog
= lookup_prog(*path
++, cmd
, isexe
, exe_only
);
1051 * Create environment block suitable for CreateProcess. Merges current
1052 * process environment and the supplied environment changes.
1054 static wchar_t *make_environment_block(char **deltaenv
)
1056 wchar_t *wenvblk
= NULL
;
1058 int i
= 0, size
= environ_size
, wenvsz
= 0, wenvpos
= 0;
1060 while (deltaenv
&& deltaenv
[i
])
1063 /* copy the environment, leaving space for changes */
1064 tmpenv
= xmalloc((size
+ i
) * sizeof(char*));
1065 memcpy(tmpenv
, environ
, size
* sizeof(char*));
1067 /* merge supplied environment changes into the temporary environment */
1068 for (i
= 0; deltaenv
&& deltaenv
[i
]; i
++)
1069 size
= do_putenv(tmpenv
, deltaenv
[i
], size
, 0);
1071 /* create environment block from temporary environment */
1072 for (i
= 0; tmpenv
[i
]; i
++) {
1073 size
= 2 * strlen(tmpenv
[i
]) + 2; /* +2 for final \0 */
1074 ALLOC_GROW(wenvblk
, (wenvpos
+ size
) * sizeof(wchar_t), wenvsz
);
1075 wenvpos
+= xutftowcs(&wenvblk
[wenvpos
], tmpenv
[i
], size
) + 1;
1077 /* add final \0 terminator */
1078 wenvblk
[wenvpos
] = 0;
1084 struct pinfo_t
*next
;
1088 static struct pinfo_t
*pinfo
= NULL
;
1089 CRITICAL_SECTION pinfo_cs
;
1091 static pid_t
mingw_spawnve_fd(const char *cmd
, const char **argv
, char **deltaenv
,
1093 int prepend_cmd
, int fhin
, int fhout
, int fherr
)
1096 PROCESS_INFORMATION pi
;
1098 wchar_t wcmd
[MAX_PATH
], wdir
[MAX_PATH
], *wargs
, *wenvblk
= NULL
;
1099 unsigned flags
= CREATE_UNICODE_ENVIRONMENT
;
1102 /* Determine whether or not we are associated to a console */
1103 HANDLE cons
= CreateFile("CONOUT$", GENERIC_WRITE
,
1104 FILE_SHARE_WRITE
, NULL
, OPEN_EXISTING
,
1105 FILE_ATTRIBUTE_NORMAL
, NULL
);
1106 if (cons
== INVALID_HANDLE_VALUE
) {
1107 /* There is no console associated with this process.
1108 * Since the child is a console process, Windows
1109 * would normally create a console window. But
1110 * since we'll be redirecting std streams, we do
1111 * not need the console.
1112 * It is necessary to use DETACHED_PROCESS
1113 * instead of CREATE_NO_WINDOW to make ssh
1114 * recognize that it has no console.
1116 flags
|= DETACHED_PROCESS
;
1118 /* There is already a console. If we specified
1119 * DETACHED_PROCESS here, too, Windows would
1120 * disassociate the child from the console.
1121 * The same is true for CREATE_NO_WINDOW.
1126 memset(&si
, 0, sizeof(si
));
1128 si
.dwFlags
= STARTF_USESTDHANDLES
;
1129 si
.hStdInput
= winansi_get_osfhandle(fhin
);
1130 si
.hStdOutput
= winansi_get_osfhandle(fhout
);
1131 si
.hStdError
= winansi_get_osfhandle(fherr
);
1133 /* executables and the current directory don't support long paths */
1134 if (xutftowcs_path(wcmd
, cmd
) < 0)
1136 if (dir
&& xutftowcs_path(wdir
, dir
) < 0)
1139 /* concatenate argv, quoting args as we go */
1140 strbuf_init(&args
, 0);
1142 char *quoted
= (char *)quote_arg(cmd
);
1143 strbuf_addstr(&args
, quoted
);
1147 for (; *argv
; argv
++) {
1148 char *quoted
= (char *)quote_arg(*argv
);
1150 strbuf_addch(&args
, ' ');
1151 strbuf_addstr(&args
, quoted
);
1152 if (quoted
!= *argv
)
1156 wargs
= xmalloc((2 * args
.len
+ 1) * sizeof(wchar_t));
1157 xutftowcs(wargs
, args
.buf
, 2 * args
.len
+ 1);
1158 strbuf_release(&args
);
1160 wenvblk
= make_environment_block(deltaenv
);
1162 memset(&pi
, 0, sizeof(pi
));
1163 ret
= CreateProcessW(wcmd
, wargs
, NULL
, NULL
, TRUE
, flags
,
1164 wenvblk
, dir
? wdir
: NULL
, &si
, &pi
);
1173 CloseHandle(pi
.hThread
);
1176 * The process ID is the human-readable identifier of the process
1177 * that we want to present in log and error messages. The handle
1178 * is not useful for this purpose. But we cannot close it, either,
1179 * because it is not possible to turn a process ID into a process
1180 * handle after the process terminated.
1181 * Keep the handle in a list for waitpid.
1183 EnterCriticalSection(&pinfo_cs
);
1185 struct pinfo_t
*info
= xmalloc(sizeof(struct pinfo_t
));
1186 info
->pid
= pi
.dwProcessId
;
1187 info
->proc
= pi
.hProcess
;
1191 LeaveCriticalSection(&pinfo_cs
);
1193 return (pid_t
)pi
.dwProcessId
;
1196 static pid_t
mingw_spawnv(const char *cmd
, const char **argv
, int prepend_cmd
)
1198 return mingw_spawnve_fd(cmd
, argv
, NULL
, NULL
, prepend_cmd
, 0, 1, 2);
1201 pid_t
mingw_spawnvpe(const char *cmd
, const char **argv
, char **deltaenv
,
1203 int fhin
, int fhout
, int fherr
)
1206 char **path
= get_path_split();
1207 char *prog
= path_lookup(cmd
, path
, 0);
1214 const char *interpr
= parse_interpreter(prog
);
1217 const char *argv0
= argv
[0];
1218 char *iprog
= path_lookup(interpr
, path
, 1);
1225 pid
= mingw_spawnve_fd(iprog
, argv
, deltaenv
, dir
, 1,
1226 fhin
, fhout
, fherr
);
1232 pid
= mingw_spawnve_fd(prog
, argv
, deltaenv
, dir
, 0,
1233 fhin
, fhout
, fherr
);
1236 free_path_split(path
);
1240 static int try_shell_exec(const char *cmd
, char *const *argv
)
1242 const char *interpr
= parse_interpreter(cmd
);
1249 path
= get_path_split();
1250 prog
= path_lookup(interpr
, path
, 1);
1254 while (argv
[argc
]) argc
++;
1255 argv2
= xmalloc(sizeof(*argv
) * (argc
+1));
1256 argv2
[0] = (char *)cmd
; /* full path to the script file */
1257 memcpy(&argv2
[1], &argv
[1], sizeof(*argv
) * argc
);
1258 pid
= mingw_spawnv(prog
, argv2
, 1);
1261 if (waitpid(pid
, &status
, 0) < 0)
1265 pid
= 1; /* indicate that we tried but failed */
1269 free_path_split(path
);
1273 int mingw_execv(const char *cmd
, char *const *argv
)
1275 /* check if git_command is a shell script */
1276 if (!try_shell_exec(cmd
, argv
)) {
1279 pid
= mingw_spawnv(cmd
, (const char **)argv
, 0);
1282 if (waitpid(pid
, &status
, 0) < 0)
1289 int mingw_execvp(const char *cmd
, char *const *argv
)
1291 char **path
= get_path_split();
1292 char *prog
= path_lookup(cmd
, path
, 0);
1295 mingw_execv(prog
, argv
);
1300 free_path_split(path
);
1304 int mingw_kill(pid_t pid
, int sig
)
1306 if (pid
> 0 && sig
== SIGTERM
) {
1307 HANDLE h
= OpenProcess(PROCESS_TERMINATE
, FALSE
, pid
);
1309 if (TerminateProcess(h
, -1)) {
1314 errno
= err_win_to_posix(GetLastError());
1317 } else if (pid
> 0 && sig
== 0) {
1318 HANDLE h
= OpenProcess(PROCESS_QUERY_INFORMATION
, FALSE
, pid
);
1330 * Note, this isn't a complete replacement for getaddrinfo. It assumes
1331 * that service contains a numerical port, or that it is null. It
1332 * does a simple search using gethostbyname, and returns one IPv4 host
1335 static int WSAAPI
getaddrinfo_stub(const char *node
, const char *service
,
1336 const struct addrinfo
*hints
,
1337 struct addrinfo
**res
)
1339 struct hostent
*h
= NULL
;
1340 struct addrinfo
*ai
;
1341 struct sockaddr_in
*sin
;
1344 h
= gethostbyname(node
);
1346 return WSAGetLastError();
1349 ai
= xmalloc(sizeof(struct addrinfo
));
1352 ai
->ai_family
= AF_INET
;
1353 ai
->ai_socktype
= hints
? hints
->ai_socktype
: 0;
1354 switch (ai
->ai_socktype
) {
1356 ai
->ai_protocol
= IPPROTO_TCP
;
1359 ai
->ai_protocol
= IPPROTO_UDP
;
1362 ai
->ai_protocol
= 0;
1365 ai
->ai_addrlen
= sizeof(struct sockaddr_in
);
1366 if (hints
&& (hints
->ai_flags
& AI_CANONNAME
))
1367 ai
->ai_canonname
= h
? xstrdup(h
->h_name
) : NULL
;
1369 ai
->ai_canonname
= NULL
;
1371 sin
= xmalloc(ai
->ai_addrlen
);
1372 memset(sin
, 0, ai
->ai_addrlen
);
1373 sin
->sin_family
= AF_INET
;
1374 /* Note: getaddrinfo is supposed to allow service to be a string,
1375 * which should be looked up using getservbyname. This is
1376 * currently not implemented */
1378 sin
->sin_port
= htons(atoi(service
));
1380 sin
->sin_addr
= *(struct in_addr
*)h
->h_addr
;
1381 else if (hints
&& (hints
->ai_flags
& AI_PASSIVE
))
1382 sin
->sin_addr
.s_addr
= INADDR_ANY
;
1384 sin
->sin_addr
.s_addr
= INADDR_LOOPBACK
;
1385 ai
->ai_addr
= (struct sockaddr
*)sin
;
1390 static void WSAAPI
freeaddrinfo_stub(struct addrinfo
*res
)
1392 free(res
->ai_canonname
);
1397 static int WSAAPI
getnameinfo_stub(const struct sockaddr
*sa
, socklen_t salen
,
1398 char *host
, DWORD hostlen
,
1399 char *serv
, DWORD servlen
, int flags
)
1401 const struct sockaddr_in
*sin
= (const struct sockaddr_in
*)sa
;
1402 if (sa
->sa_family
!= AF_INET
)
1407 if (host
&& hostlen
> 0) {
1408 struct hostent
*ent
= NULL
;
1409 if (!(flags
& NI_NUMERICHOST
))
1410 ent
= gethostbyaddr((const char *)&sin
->sin_addr
,
1411 sizeof(sin
->sin_addr
), AF_INET
);
1414 snprintf(host
, hostlen
, "%s", ent
->h_name
);
1415 else if (flags
& NI_NAMEREQD
)
1418 snprintf(host
, hostlen
, "%s", inet_ntoa(sin
->sin_addr
));
1421 if (serv
&& servlen
> 0) {
1422 struct servent
*ent
= NULL
;
1423 if (!(flags
& NI_NUMERICSERV
))
1424 ent
= getservbyport(sin
->sin_port
,
1425 flags
& NI_DGRAM
? "udp" : "tcp");
1428 snprintf(serv
, servlen
, "%s", ent
->s_name
);
1430 snprintf(serv
, servlen
, "%d", ntohs(sin
->sin_port
));
1436 static HMODULE ipv6_dll
= NULL
;
1437 static void (WSAAPI
*ipv6_freeaddrinfo
)(struct addrinfo
*res
);
1438 static int (WSAAPI
*ipv6_getaddrinfo
)(const char *node
, const char *service
,
1439 const struct addrinfo
*hints
,
1440 struct addrinfo
**res
);
1441 static int (WSAAPI
*ipv6_getnameinfo
)(const struct sockaddr
*sa
, socklen_t salen
,
1442 char *host
, DWORD hostlen
,
1443 char *serv
, DWORD servlen
, int flags
);
1445 * gai_strerror is an inline function in the ws2tcpip.h header, so we
1446 * don't need to try to load that one dynamically.
1449 static void socket_cleanup(void)
1453 FreeLibrary(ipv6_dll
);
1455 ipv6_freeaddrinfo
= freeaddrinfo_stub
;
1456 ipv6_getaddrinfo
= getaddrinfo_stub
;
1457 ipv6_getnameinfo
= getnameinfo_stub
;
1460 static void ensure_socket_initialization(void)
1463 static int initialized
= 0;
1464 const char *libraries
[] = { "ws2_32.dll", "wship6.dll", NULL
};
1470 if (WSAStartup(MAKEWORD(2,2), &wsa
))
1471 die("unable to initialize winsock subsystem, error %d",
1474 for (name
= libraries
; *name
; name
++) {
1475 ipv6_dll
= LoadLibrary(*name
);
1479 ipv6_freeaddrinfo
= (void (WSAAPI
*)(struct addrinfo
*))
1480 GetProcAddress(ipv6_dll
, "freeaddrinfo");
1481 ipv6_getaddrinfo
= (int (WSAAPI
*)(const char *, const char *,
1482 const struct addrinfo
*,
1483 struct addrinfo
**))
1484 GetProcAddress(ipv6_dll
, "getaddrinfo");
1485 ipv6_getnameinfo
= (int (WSAAPI
*)(const struct sockaddr
*,
1486 socklen_t
, char *, DWORD
,
1487 char *, DWORD
, int))
1488 GetProcAddress(ipv6_dll
, "getnameinfo");
1489 if (!ipv6_freeaddrinfo
|| !ipv6_getaddrinfo
|| !ipv6_getnameinfo
) {
1490 FreeLibrary(ipv6_dll
);
1495 if (!ipv6_freeaddrinfo
|| !ipv6_getaddrinfo
|| !ipv6_getnameinfo
) {
1496 ipv6_freeaddrinfo
= freeaddrinfo_stub
;
1497 ipv6_getaddrinfo
= getaddrinfo_stub
;
1498 ipv6_getnameinfo
= getnameinfo_stub
;
1501 atexit(socket_cleanup
);
1506 int mingw_gethostname(char *name
, int namelen
)
1508 ensure_socket_initialization();
1509 return gethostname(name
, namelen
);
1512 #undef gethostbyname
1513 struct hostent
*mingw_gethostbyname(const char *host
)
1515 ensure_socket_initialization();
1516 return gethostbyname(host
);
1519 void mingw_freeaddrinfo(struct addrinfo
*res
)
1521 ipv6_freeaddrinfo(res
);
1524 int mingw_getaddrinfo(const char *node
, const char *service
,
1525 const struct addrinfo
*hints
, struct addrinfo
**res
)
1527 ensure_socket_initialization();
1528 return ipv6_getaddrinfo(node
, service
, hints
, res
);
1531 int mingw_getnameinfo(const struct sockaddr
*sa
, socklen_t salen
,
1532 char *host
, DWORD hostlen
, char *serv
, DWORD servlen
,
1535 ensure_socket_initialization();
1536 return ipv6_getnameinfo(sa
, salen
, host
, hostlen
, serv
, servlen
, flags
);
1539 int mingw_socket(int domain
, int type
, int protocol
)
1544 ensure_socket_initialization();
1545 s
= WSASocket(domain
, type
, protocol
, NULL
, 0, 0);
1546 if (s
== INVALID_SOCKET
) {
1548 * WSAGetLastError() values are regular BSD error codes
1549 * biased by WSABASEERR.
1550 * However, strerror() does not know about networking
1551 * specific errors, which are values beginning at 38 or so.
1552 * Therefore, we choose to leave the biased error code
1553 * in errno so that _if_ someone looks up the code somewhere,
1554 * then it is at least the number that are usually listed.
1556 errno
= WSAGetLastError();
1559 /* convert into a file descriptor */
1560 if ((sockfd
= _open_osfhandle(s
, O_RDWR
|O_BINARY
)) < 0) {
1562 return error("unable to make a socket file descriptor: %s",
1569 int mingw_connect(int sockfd
, struct sockaddr
*sa
, size_t sz
)
1571 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1572 return connect(s
, sa
, sz
);
1576 int mingw_bind(int sockfd
, struct sockaddr
*sa
, size_t sz
)
1578 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1579 return bind(s
, sa
, sz
);
1583 int mingw_setsockopt(int sockfd
, int lvl
, int optname
, void *optval
, int optlen
)
1585 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1586 return setsockopt(s
, lvl
, optname
, (const char*)optval
, optlen
);
1590 int mingw_shutdown(int sockfd
, int how
)
1592 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1593 return shutdown(s
, how
);
1597 int mingw_listen(int sockfd
, int backlog
)
1599 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1600 return listen(s
, backlog
);
1604 int mingw_accept(int sockfd1
, struct sockaddr
*sa
, socklen_t
*sz
)
1608 SOCKET s1
= (SOCKET
)_get_osfhandle(sockfd1
);
1609 SOCKET s2
= accept(s1
, sa
, sz
);
1611 /* convert into a file descriptor */
1612 if ((sockfd2
= _open_osfhandle(s2
, O_RDWR
|O_BINARY
)) < 0) {
1615 return error("unable to make a socket file descriptor: %s",
1622 int mingw_rename(const char *pold
, const char *pnew
)
1626 wchar_t wpold
[MAX_LONG_PATH
], wpnew
[MAX_LONG_PATH
];
1627 if (xutftowcs_long_path(wpold
, pold
) < 0 ||
1628 xutftowcs_long_path(wpnew
, pnew
) < 0)
1632 * Try native rename() first to get errno right.
1633 * It is based on MoveFile(), which cannot overwrite existing files.
1635 if (!_wrename(wpold
, wpnew
))
1637 if (errno
!= EEXIST
)
1640 if (MoveFileExW(wpold
, wpnew
, MOVEFILE_REPLACE_EXISTING
))
1642 /* TODO: translate more errors */
1643 gle
= GetLastError();
1644 if (gle
== ERROR_ACCESS_DENIED
&&
1645 (attrs
= GetFileAttributesW(wpnew
)) != INVALID_FILE_ATTRIBUTES
) {
1646 if (attrs
& FILE_ATTRIBUTE_DIRECTORY
) {
1650 if ((attrs
& FILE_ATTRIBUTE_READONLY
) &&
1651 SetFileAttributesW(wpnew
, attrs
& ~FILE_ATTRIBUTE_READONLY
)) {
1652 if (MoveFileExW(wpold
, wpnew
, MOVEFILE_REPLACE_EXISTING
))
1654 gle
= GetLastError();
1655 /* revert file attributes on failure */
1656 SetFileAttributesW(wpnew
, attrs
);
1659 if (tries
< ARRAY_SIZE(delay
) && gle
== ERROR_ACCESS_DENIED
) {
1661 * We assume that some other process had the source or
1662 * destination file open at the wrong moment and retry.
1663 * In order to give the other process a higher chance to
1664 * complete its operation, we give up our time slice now.
1665 * If we have to retry again, we do sleep a bit.
1667 Sleep(delay
[tries
]);
1671 if (gle
== ERROR_ACCESS_DENIED
&&
1672 ask_yes_no_if_possible("Rename from '%s' to '%s' failed. "
1673 "Should I try again?", pold
, pnew
))
1681 * Note that this doesn't return the actual pagesize, but
1682 * the allocation granularity. If future Windows specific git code
1683 * needs the real getpagesize function, we need to find another solution.
1685 int mingw_getpagesize(void)
1689 return si
.dwAllocationGranularity
;
1692 struct passwd
*getpwuid(int uid
)
1694 static char user_name
[100];
1695 static struct passwd p
;
1697 DWORD len
= sizeof(user_name
);
1698 if (!GetUserName(user_name
, &len
))
1700 p
.pw_name
= user_name
;
1701 p
.pw_gecos
= "unknown";
1706 static HANDLE timer_event
;
1707 static HANDLE timer_thread
;
1708 static int timer_interval
;
1709 static int one_shot
;
1710 static sig_handler_t timer_fn
= SIG_DFL
, sigint_fn
= SIG_DFL
;
1712 /* The timer works like this:
1713 * The thread, ticktack(), is a trivial routine that most of the time
1714 * only waits to receive the signal to terminate. The main thread tells
1715 * the thread to terminate by setting the timer_event to the signalled
1717 * But ticktack() interrupts the wait state after the timer's interval
1718 * length to call the signal handler.
1721 static unsigned __stdcall
ticktack(void *dummy
)
1723 while (WaitForSingleObject(timer_event
, timer_interval
) == WAIT_TIMEOUT
) {
1724 mingw_raise(SIGALRM
);
1731 static int start_timer_thread(void)
1733 timer_event
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
1735 timer_thread
= (HANDLE
) _beginthreadex(NULL
, 0, ticktack
, NULL
, 0, NULL
);
1737 return errno
= ENOMEM
,
1738 error("cannot start timer thread");
1740 return errno
= ENOMEM
,
1741 error("cannot allocate resources for timer");
1745 static void stop_timer_thread(void)
1748 SetEvent(timer_event
); /* tell thread to terminate */
1750 int rc
= WaitForSingleObject(timer_thread
, 1000);
1751 if (rc
== WAIT_TIMEOUT
)
1752 error("timer thread did not terminate timely");
1753 else if (rc
!= WAIT_OBJECT_0
)
1754 error("waiting for timer thread failed: %lu",
1756 CloseHandle(timer_thread
);
1759 CloseHandle(timer_event
);
1761 timer_thread
= NULL
;
1764 static inline int is_timeval_eq(const struct timeval
*i1
, const struct timeval
*i2
)
1766 return i1
->tv_sec
== i2
->tv_sec
&& i1
->tv_usec
== i2
->tv_usec
;
1769 int setitimer(int type
, struct itimerval
*in
, struct itimerval
*out
)
1771 static const struct timeval zero
;
1772 static int atexit_done
;
1775 return errno
= EINVAL
,
1776 error("setitimer param 3 != NULL not implemented");
1777 if (!is_timeval_eq(&in
->it_interval
, &zero
) &&
1778 !is_timeval_eq(&in
->it_interval
, &in
->it_value
))
1779 return errno
= EINVAL
,
1780 error("setitimer: it_interval must be zero or eq it_value");
1783 stop_timer_thread();
1785 if (is_timeval_eq(&in
->it_value
, &zero
) &&
1786 is_timeval_eq(&in
->it_interval
, &zero
))
1789 timer_interval
= in
->it_value
.tv_sec
* 1000 + in
->it_value
.tv_usec
/ 1000;
1790 one_shot
= is_timeval_eq(&in
->it_interval
, &zero
);
1792 atexit(stop_timer_thread
);
1795 return start_timer_thread();
1798 int sigaction(int sig
, struct sigaction
*in
, struct sigaction
*out
)
1801 return errno
= EINVAL
,
1802 error("sigaction only implemented for SIGALRM");
1804 return errno
= EINVAL
,
1805 error("sigaction: param 3 != NULL not implemented");
1807 timer_fn
= in
->sa_handler
;
1812 sig_handler_t
mingw_signal(int sig
, sig_handler_t handler
)
1824 sigint_fn
= handler
;
1828 return signal(sig
, handler
);
1835 int mingw_raise(int sig
)
1839 if (timer_fn
== SIG_DFL
) {
1840 if (isatty(STDERR_FILENO
))
1841 fputs("Alarm clock\n", stderr
);
1842 exit(128 + SIGALRM
);
1843 } else if (timer_fn
!= SIG_IGN
)
1848 if (sigint_fn
== SIG_DFL
)
1850 else if (sigint_fn
!= SIG_IGN
)
1860 static const char *make_backslash_path(const char *path
)
1862 static char buf
[PATH_MAX
+ 1];
1865 if (strlcpy(buf
, path
, PATH_MAX
) >= PATH_MAX
)
1866 die("Too long path: %.*s", 60, path
);
1868 for (c
= buf
; *c
; c
++) {
1875 void mingw_open_html(const char *unixpath
)
1877 const char *htmlpath
= make_backslash_path(unixpath
);
1878 typedef HINSTANCE (WINAPI
*T
)(HWND
, const char *,
1879 const char *, const char *, const char *, INT
);
1884 shell32
= LoadLibrary("shell32.dll");
1886 die("cannot load shell32.dll");
1887 ShellExecute
= (T
)GetProcAddress(shell32
, "ShellExecuteA");
1889 die("cannot run browser");
1891 printf("Launching default browser to display HTML ...\n");
1892 r
= (int)ShellExecute(NULL
, "open", htmlpath
, NULL
, "\\", SW_SHOWNORMAL
);
1893 FreeLibrary(shell32
);
1894 /* see the MSDN documentation referring to the result codes here */
1896 die("failed to launch browser for %.*s", MAX_PATH
, unixpath
);
1900 int link(const char *oldpath
, const char *newpath
)
1902 typedef BOOL (WINAPI
*T
)(LPCWSTR
, LPCWSTR
, LPSECURITY_ATTRIBUTES
);
1903 static T create_hard_link
= NULL
;
1904 wchar_t woldpath
[MAX_LONG_PATH
], wnewpath
[MAX_LONG_PATH
];
1905 if (xutftowcs_long_path(woldpath
, oldpath
) < 0 ||
1906 xutftowcs_long_path(wnewpath
, newpath
) < 0)
1909 if (!create_hard_link
) {
1910 create_hard_link
= (T
) GetProcAddress(
1911 GetModuleHandle("kernel32.dll"), "CreateHardLinkW");
1912 if (!create_hard_link
)
1913 create_hard_link
= (T
)-1;
1915 if (create_hard_link
== (T
)-1) {
1919 if (!create_hard_link(wnewpath
, woldpath
, NULL
)) {
1920 errno
= err_win_to_posix(GetLastError());
1926 pid_t
waitpid(pid_t pid
, int *status
, int options
)
1928 HANDLE h
= OpenProcess(SYNCHRONIZE
| PROCESS_QUERY_INFORMATION
,
1935 if (pid
> 0 && options
& WNOHANG
) {
1936 if (WAIT_OBJECT_0
!= WaitForSingleObject(h
, 0)) {
1940 options
&= ~WNOHANG
;
1944 struct pinfo_t
**ppinfo
;
1945 if (WaitForSingleObject(h
, INFINITE
) != WAIT_OBJECT_0
) {
1951 GetExitCodeProcess(h
, (LPDWORD
)status
);
1953 EnterCriticalSection(&pinfo_cs
);
1957 struct pinfo_t
*info
= *ppinfo
;
1958 if (info
->pid
== pid
) {
1959 CloseHandle(info
->proc
);
1960 *ppinfo
= info
->next
;
1964 ppinfo
= &info
->next
;
1967 LeaveCriticalSection(&pinfo_cs
);
1978 const char *get_windows_home_directory(void)
1980 static const char *home_directory
= NULL
;
1981 struct strbuf buf
= STRBUF_INIT
;
1984 return home_directory
;
1986 home_directory
= getenv("HOME");
1987 if (home_directory
&& *home_directory
)
1988 return home_directory
;
1990 strbuf_addf(&buf
, "%s/%s", getenv("HOMEDRIVE"), getenv("HOMEPATH"));
1991 home_directory
= strbuf_detach(&buf
, NULL
);
1993 return home_directory
;
1996 int mingw_offset_1st_component(const char *path
)
1999 if (has_dos_drive_prefix(path
))
2003 else if (is_dir_sep(path
[0]) && is_dir_sep(path
[1])) {
2005 /* skip server name */
2006 char *pos
= strpbrk(path
+ 2, "\\/");
2008 return 0; /* Error: malformed unc path */
2012 } while (*pos
&& !is_dir_sep(*pos
));
2014 offset
= pos
- path
;
2017 return offset
+ is_dir_sep(path
[offset
]);
2020 int xutftowcsn(wchar_t *wcs
, const char *utfs
, size_t wcslen
, int utflen
)
2022 int upos
= 0, wpos
= 0;
2023 const unsigned char *utf
= (const unsigned char*) utfs
;
2024 if (!utf
|| !wcs
|| wcslen
< 1) {
2028 /* reserve space for \0 */
2033 while (upos
< utflen
) {
2034 int c
= utf
[upos
++] & 0xff;
2035 if (utflen
== INT_MAX
&& c
== 0)
2038 if (wpos
>= wcslen
) {
2047 } else if (c
>= 0xc2 && c
< 0xe0 && upos
< utflen
&&
2048 (utf
[upos
] & 0xc0) == 0x80) {
2050 c
= ((c
& 0x1f) << 6);
2051 c
|= (utf
[upos
++] & 0x3f);
2053 } else if (c
>= 0xe0 && c
< 0xf0 && upos
+ 1 < utflen
&&
2054 !(c
== 0xe0 && utf
[upos
] < 0xa0) && /* over-long encoding */
2055 (utf
[upos
] & 0xc0) == 0x80 &&
2056 (utf
[upos
+ 1] & 0xc0) == 0x80) {
2058 c
= ((c
& 0x0f) << 12);
2059 c
|= ((utf
[upos
++] & 0x3f) << 6);
2060 c
|= (utf
[upos
++] & 0x3f);
2062 } else if (c
>= 0xf0 && c
< 0xf5 && upos
+ 2 < utflen
&&
2063 wpos
+ 1 < wcslen
&&
2064 !(c
== 0xf0 && utf
[upos
] < 0x90) && /* over-long encoding */
2065 !(c
== 0xf4 && utf
[upos
] >= 0x90) && /* > \u10ffff */
2066 (utf
[upos
] & 0xc0) == 0x80 &&
2067 (utf
[upos
+ 1] & 0xc0) == 0x80 &&
2068 (utf
[upos
+ 2] & 0xc0) == 0x80) {
2069 /* 4-byte utf-8: convert to \ud8xx \udcxx surrogate pair */
2070 c
= ((c
& 0x07) << 18);
2071 c
|= ((utf
[upos
++] & 0x3f) << 12);
2072 c
|= ((utf
[upos
++] & 0x3f) << 6);
2073 c
|= (utf
[upos
++] & 0x3f);
2075 wcs
[wpos
++] = 0xd800 | (c
>> 10);
2076 wcs
[wpos
++] = 0xdc00 | (c
& 0x3ff);
2077 } else if (c
>= 0xa0) {
2078 /* invalid utf-8 byte, printable unicode char: convert 1:1 */
2081 /* invalid utf-8 byte, non-printable unicode: convert to hex */
2082 static const char *hex
= "0123456789abcdef";
2083 wcs
[wpos
++] = hex
[c
>> 4];
2085 wcs
[wpos
++] = hex
[c
& 0x0f];
2092 int xwcstoutf(char *utf
, const wchar_t *wcs
, size_t utflen
)
2094 if (!wcs
|| !utf
|| utflen
< 1) {
2098 utflen
= WideCharToMultiByte(CP_UTF8
, 0, wcs
, -1, utf
, utflen
, NULL
, NULL
);
2105 int handle_long_path(wchar_t *path
, int len
, int max_path
, int expand
)
2108 wchar_t buf
[MAX_LONG_PATH
];
2111 * we don't need special handling if path is relative to the current
2112 * directory, and current directory + path don't exceed the desired
2113 * max_path limit. This should cover > 99 % of cases with minimal
2114 * performance impact (git almost always uses relative paths).
2116 if ((len
< 2 || (!is_dir_sep(path
[0]) && path
[1] != ':')) &&
2117 (current_directory_len
+ len
< max_path
))
2121 * handle everything else:
2122 * - absolute paths: "C:\dir\file"
2123 * - absolute UNC paths: "\\server\share\dir\file"
2124 * - absolute paths on current drive: "\dir\file"
2125 * - relative paths on other drive: "X:file"
2126 * - prefixed paths: "\\?\...", "\\.\..."
2129 /* convert to absolute path using GetFullPathNameW */
2130 result
= GetFullPathNameW(path
, MAX_LONG_PATH
, buf
, NULL
);
2132 errno
= err_win_to_posix(GetLastError());
2137 * return absolute path if it fits within max_path (even if
2138 * "cwd + path" doesn't due to '..' components)
2140 if (result
< max_path
) {
2145 /* error out if we shouldn't expand the path or buf is too small */
2146 if (!expand
|| result
>= MAX_LONG_PATH
- 6) {
2147 errno
= ENAMETOOLONG
;
2151 /* prefix full path with "\\?\" or "\\?\UNC\" */
2152 if (buf
[0] == '\\') {
2153 /* ...unless already prefixed */
2154 if (buf
[1] == '\\' && (buf
[2] == '?' || buf
[2] == '.'))
2157 wcscpy(path
, L
"\\\\?\\UNC\\");
2158 wcscpy(path
+ 8, buf
+ 2);
2161 wcscpy(path
, L
"\\\\?\\");
2162 wcscpy(path
+ 4, buf
);
2168 * Disable MSVCRT command line wildcard expansion (__getmainargs called from
2169 * mingw startup code, see init.c in mingw runtime).
2177 extern int __wgetmainargs(int *argc
, wchar_t ***argv
, wchar_t ***env
, int glob
,
2180 static NORETURN
void die_startup()
2182 fputs("fatal: not enough memory for initialization", stderr
);
2186 static void *malloc_startup(size_t size
)
2188 void *result
= malloc(size
);
2194 static char *wcstoutfdup_startup(char *buffer
, const wchar_t *wcs
, size_t len
)
2196 len
= xwcstoutf(buffer
, wcs
, len
) + 1;
2197 return memcpy(malloc_startup(len
), buffer
, len
);
2200 void mingw_startup()
2202 int i
, maxlen
, argc
;
2204 wchar_t **wenv
, **wargv
;
2207 /* get wide char arguments and environment */
2209 if (__wgetmainargs(&argc
, &wargv
, &wenv
, _CRT_glob
, &si
) < 0)
2212 /* determine size of argv and environ conversion buffer */
2213 maxlen
= wcslen(_wpgmptr
);
2214 for (i
= 1; i
< argc
; i
++)
2215 maxlen
= max(maxlen
, wcslen(wargv
[i
]));
2216 for (i
= 0; wenv
[i
]; i
++)
2217 maxlen
= max(maxlen
, wcslen(wenv
[i
]));
2220 * nedmalloc can't free CRT memory, allocate resizable environment
2221 * list. Note that xmalloc / xmemdupz etc. call getenv, so we cannot
2222 * use it while initializing the environment itself.
2224 environ_size
= i
+ 1;
2225 environ_alloc
= alloc_nr(environ_size
* sizeof(char*));
2226 environ
= malloc_startup(environ_alloc
);
2228 /* allocate buffer (wchar_t encodes to max 3 UTF-8 bytes) */
2229 maxlen
= 3 * maxlen
+ 1;
2230 buffer
= malloc_startup(maxlen
);
2232 /* convert command line arguments and environment to UTF-8 */
2233 __argv
[0] = wcstoutfdup_startup(buffer
, _wpgmptr
, maxlen
);
2234 for (i
= 1; i
< argc
; i
++)
2235 __argv
[i
] = wcstoutfdup_startup(buffer
, wargv
[i
], maxlen
);
2236 for (i
= 0; wenv
[i
]; i
++)
2237 environ
[i
] = wcstoutfdup_startup(buffer
, wenv
[i
], maxlen
);
2241 /* sort environment for O(log n) getenv / putenv */
2242 qsort(environ
, i
, sizeof(char*), compareenv
);
2244 /* fix Windows specific environment settings */
2246 /* on Windows it is TMP and TEMP */
2247 if (!getenv("TMPDIR")) {
2248 const char *tmp
= getenv("TMP");
2250 tmp
= getenv("TEMP");
2252 setenv("TMPDIR", tmp
, 1);
2255 /* simulate TERM to enable auto-color (see color.c) */
2256 if (!getenv("TERM"))
2257 setenv("TERM", "winansi", 1);
2259 /* initialize critical section for waitpid pinfo_t list */
2260 InitializeCriticalSection(&pinfo_cs
);
2262 /* set up default file mode and file modes for stdin/out/err */
2264 _setmode(_fileno(stdin
), _O_BINARY
);
2265 _setmode(_fileno(stdout
), _O_BINARY
);
2266 _setmode(_fileno(stderr
), _O_BINARY
);
2268 /* initialize Unicode console */
2271 /* init length of current directory for handle_long_path */
2272 current_directory_len
= GetCurrentDirectoryW(0, NULL
);