1 #include "../git-compat-util.h"
6 #include "../run-command.h"
8 #include "win32/lazyload.h"
11 #define HCAST(type, handle) ((type)(intptr_t)handle)
13 static const int delay
[] = { 0, 1, 10, 20, 40 };
15 int err_win_to_posix(DWORD winerr
)
19 case ERROR_ACCESS_DENIED
: error
= EACCES
; break;
20 case ERROR_ACCOUNT_DISABLED
: error
= EACCES
; break;
21 case ERROR_ACCOUNT_RESTRICTION
: error
= EACCES
; break;
22 case ERROR_ALREADY_ASSIGNED
: error
= EBUSY
; break;
23 case ERROR_ALREADY_EXISTS
: error
= EEXIST
; break;
24 case ERROR_ARITHMETIC_OVERFLOW
: error
= ERANGE
; break;
25 case ERROR_BAD_COMMAND
: error
= EIO
; break;
26 case ERROR_BAD_DEVICE
: error
= ENODEV
; break;
27 case ERROR_BAD_DRIVER_LEVEL
: error
= ENXIO
; break;
28 case ERROR_BAD_EXE_FORMAT
: error
= ENOEXEC
; break;
29 case ERROR_BAD_FORMAT
: error
= ENOEXEC
; break;
30 case ERROR_BAD_LENGTH
: error
= EINVAL
; break;
31 case ERROR_BAD_PATHNAME
: error
= ENOENT
; break;
32 case ERROR_BAD_PIPE
: error
= EPIPE
; break;
33 case ERROR_BAD_UNIT
: error
= ENODEV
; break;
34 case ERROR_BAD_USERNAME
: error
= EINVAL
; break;
35 case ERROR_BROKEN_PIPE
: error
= EPIPE
; break;
36 case ERROR_BUFFER_OVERFLOW
: error
= ENAMETOOLONG
; break;
37 case ERROR_BUSY
: error
= EBUSY
; break;
38 case ERROR_BUSY_DRIVE
: error
= EBUSY
; break;
39 case ERROR_CALL_NOT_IMPLEMENTED
: error
= ENOSYS
; break;
40 case ERROR_CANNOT_MAKE
: error
= EACCES
; break;
41 case ERROR_CANTOPEN
: error
= EIO
; break;
42 case ERROR_CANTREAD
: error
= EIO
; break;
43 case ERROR_CANTWRITE
: error
= EIO
; break;
44 case ERROR_CRC
: error
= EIO
; break;
45 case ERROR_CURRENT_DIRECTORY
: error
= EACCES
; break;
46 case ERROR_DEVICE_IN_USE
: error
= EBUSY
; break;
47 case ERROR_DEV_NOT_EXIST
: error
= ENODEV
; break;
48 case ERROR_DIRECTORY
: error
= EINVAL
; break;
49 case ERROR_DIR_NOT_EMPTY
: error
= ENOTEMPTY
; break;
50 case ERROR_DISK_CHANGE
: error
= EIO
; break;
51 case ERROR_DISK_FULL
: error
= ENOSPC
; break;
52 case ERROR_DRIVE_LOCKED
: error
= EBUSY
; break;
53 case ERROR_ENVVAR_NOT_FOUND
: error
= EINVAL
; break;
54 case ERROR_EXE_MARKED_INVALID
: error
= ENOEXEC
; break;
55 case ERROR_FILENAME_EXCED_RANGE
: error
= ENAMETOOLONG
; break;
56 case ERROR_FILE_EXISTS
: error
= EEXIST
; break;
57 case ERROR_FILE_INVALID
: error
= ENODEV
; break;
58 case ERROR_FILE_NOT_FOUND
: error
= ENOENT
; break;
59 case ERROR_GEN_FAILURE
: error
= EIO
; break;
60 case ERROR_HANDLE_DISK_FULL
: error
= ENOSPC
; break;
61 case ERROR_INSUFFICIENT_BUFFER
: error
= ENOMEM
; break;
62 case ERROR_INVALID_ACCESS
: error
= EACCES
; break;
63 case ERROR_INVALID_ADDRESS
: error
= EFAULT
; break;
64 case ERROR_INVALID_BLOCK
: error
= EFAULT
; break;
65 case ERROR_INVALID_DATA
: error
= EINVAL
; break;
66 case ERROR_INVALID_DRIVE
: error
= ENODEV
; break;
67 case ERROR_INVALID_EXE_SIGNATURE
: error
= ENOEXEC
; break;
68 case ERROR_INVALID_FLAGS
: error
= EINVAL
; break;
69 case ERROR_INVALID_FUNCTION
: error
= ENOSYS
; break;
70 case ERROR_INVALID_HANDLE
: error
= EBADF
; break;
71 case ERROR_INVALID_LOGON_HOURS
: error
= EACCES
; break;
72 case ERROR_INVALID_NAME
: error
= EINVAL
; break;
73 case ERROR_INVALID_OWNER
: error
= EINVAL
; break;
74 case ERROR_INVALID_PARAMETER
: error
= EINVAL
; break;
75 case ERROR_INVALID_PASSWORD
: error
= EPERM
; break;
76 case ERROR_INVALID_PRIMARY_GROUP
: error
= EINVAL
; break;
77 case ERROR_INVALID_SIGNAL_NUMBER
: error
= EINVAL
; break;
78 case ERROR_INVALID_TARGET_HANDLE
: error
= EIO
; break;
79 case ERROR_INVALID_WORKSTATION
: error
= EACCES
; break;
80 case ERROR_IO_DEVICE
: error
= EIO
; break;
81 case ERROR_IO_INCOMPLETE
: error
= EINTR
; break;
82 case ERROR_LOCKED
: error
= EBUSY
; break;
83 case ERROR_LOCK_VIOLATION
: error
= EACCES
; break;
84 case ERROR_LOGON_FAILURE
: error
= EACCES
; break;
85 case ERROR_MAPPED_ALIGNMENT
: error
= EINVAL
; break;
86 case ERROR_META_EXPANSION_TOO_LONG
: error
= E2BIG
; break;
87 case ERROR_MORE_DATA
: error
= EPIPE
; break;
88 case ERROR_NEGATIVE_SEEK
: error
= ESPIPE
; break;
89 case ERROR_NOACCESS
: error
= EFAULT
; break;
90 case ERROR_NONE_MAPPED
: error
= EINVAL
; break;
91 case ERROR_NOT_ENOUGH_MEMORY
: error
= ENOMEM
; break;
92 case ERROR_NOT_READY
: error
= EAGAIN
; break;
93 case ERROR_NOT_SAME_DEVICE
: error
= EXDEV
; break;
94 case ERROR_NO_DATA
: error
= EPIPE
; break;
95 case ERROR_NO_MORE_SEARCH_HANDLES
: error
= EIO
; break;
96 case ERROR_NO_PROC_SLOTS
: error
= EAGAIN
; break;
97 case ERROR_NO_SUCH_PRIVILEGE
: error
= EACCES
; break;
98 case ERROR_OPEN_FAILED
: error
= EIO
; break;
99 case ERROR_OPEN_FILES
: error
= EBUSY
; break;
100 case ERROR_OPERATION_ABORTED
: error
= EINTR
; break;
101 case ERROR_OUTOFMEMORY
: error
= ENOMEM
; break;
102 case ERROR_PASSWORD_EXPIRED
: error
= EACCES
; break;
103 case ERROR_PATH_BUSY
: error
= EBUSY
; break;
104 case ERROR_PATH_NOT_FOUND
: error
= ENOENT
; break;
105 case ERROR_PIPE_BUSY
: error
= EBUSY
; break;
106 case ERROR_PIPE_CONNECTED
: error
= EPIPE
; break;
107 case ERROR_PIPE_LISTENING
: error
= EPIPE
; break;
108 case ERROR_PIPE_NOT_CONNECTED
: error
= EPIPE
; break;
109 case ERROR_PRIVILEGE_NOT_HELD
: error
= EACCES
; break;
110 case ERROR_READ_FAULT
: error
= EIO
; break;
111 case ERROR_SEEK
: error
= EIO
; break;
112 case ERROR_SEEK_ON_DEVICE
: error
= ESPIPE
; break;
113 case ERROR_SHARING_BUFFER_EXCEEDED
: error
= ENFILE
; break;
114 case ERROR_SHARING_VIOLATION
: error
= EACCES
; break;
115 case ERROR_STACK_OVERFLOW
: error
= ENOMEM
; break;
116 case ERROR_SWAPERROR
: error
= ENOENT
; break;
117 case ERROR_TOO_MANY_MODULES
: error
= EMFILE
; break;
118 case ERROR_TOO_MANY_OPEN_FILES
: error
= EMFILE
; break;
119 case ERROR_UNRECOGNIZED_MEDIA
: error
= ENXIO
; break;
120 case ERROR_UNRECOGNIZED_VOLUME
: error
= ENODEV
; break;
121 case ERROR_WAIT_NO_CHILDREN
: error
= ECHILD
; break;
122 case ERROR_WRITE_FAULT
: error
= EIO
; break;
123 case ERROR_WRITE_PROTECT
: error
= EROFS
; break;
128 static inline int is_file_in_use_error(DWORD errcode
)
131 case ERROR_SHARING_VIOLATION
:
132 case ERROR_ACCESS_DENIED
:
139 static int read_yes_no_answer(void)
143 if (fgets(answer
, sizeof(answer
), stdin
)) {
144 size_t answer_len
= strlen(answer
);
145 int got_full_line
= 0, c
;
147 /* remove the newline */
148 if (answer_len
>= 2 && answer
[answer_len
-2] == '\r') {
149 answer
[answer_len
-2] = '\0';
151 } else if (answer_len
>= 1 && answer
[answer_len
-1] == '\n') {
152 answer
[answer_len
-1] = '\0';
155 /* flush the buffer in case we did not get the full line */
157 while ((c
= getchar()) != EOF
&& c
!= '\n')
160 /* we could not read, return the
161 * default answer which is no */
164 if (tolower(answer
[0]) == 'y' && !answer
[1])
166 if (!strncasecmp(answer
, "yes", sizeof(answer
)))
168 if (tolower(answer
[0]) == 'n' && !answer
[1])
170 if (!strncasecmp(answer
, "no", sizeof(answer
)))
173 /* did not find an answer we understand */
177 static int ask_yes_no_if_possible(const char *format
, ...)
180 const char *retry_hook
[] = { NULL
, NULL
, NULL
};
183 va_start(args
, format
);
184 vsnprintf(question
, sizeof(question
), format
, args
);
187 if ((retry_hook
[0] = mingw_getenv("GIT_ASK_YESNO"))) {
188 retry_hook
[1] = question
;
189 return !run_command_v_opt(retry_hook
, 0);
192 if (!isatty(_fileno(stdin
)) || !isatty(_fileno(stderr
)))
197 fprintf(stderr
, "%s (y/n) ", question
);
199 if ((answer
= read_yes_no_answer()) >= 0)
202 fprintf(stderr
, "Sorry, I did not understand your answer. "
203 "Please type 'y' or 'n'\n");
208 enum hide_dotfiles_type
{
209 HIDE_DOTFILES_FALSE
= 0,
211 HIDE_DOTFILES_DOTGITONLY
214 static enum hide_dotfiles_type hide_dotfiles
= HIDE_DOTFILES_DOTGITONLY
;
215 static char *unset_environment_variables
;
217 int mingw_core_config(const char *var
, const char *value
, void *cb
)
219 if (!strcmp(var
, "core.hidedotfiles")) {
220 if (value
&& !strcasecmp(value
, "dotgitonly"))
221 hide_dotfiles
= HIDE_DOTFILES_DOTGITONLY
;
223 hide_dotfiles
= git_config_bool(var
, value
);
227 if (!strcmp(var
, "core.unsetenvvars")) {
228 free(unset_environment_variables
);
229 unset_environment_variables
= xstrdup(value
);
236 /* Normalizes NT paths as returned by some low-level APIs. */
237 static wchar_t *normalize_ntpath(wchar_t *wbuf
)
240 /* fix absolute path prefixes */
241 if (wbuf
[0] == '\\') {
242 /* strip NT namespace prefixes */
243 if (!wcsncmp(wbuf
, L
"\\??\\", 4) ||
244 !wcsncmp(wbuf
, L
"\\\\?\\", 4))
246 else if (!wcsnicmp(wbuf
, L
"\\DosDevices\\", 12))
248 /* replace remaining '...UNC\' with '\\' */
249 if (!wcsnicmp(wbuf
, L
"UNC\\", 4)) {
254 /* convert backslashes to slashes */
255 for (i
= 0; wbuf
[i
]; i
++)
261 int mingw_unlink(const char *pathname
)
264 wchar_t wpathname
[MAX_PATH
];
265 if (xutftowcs_path(wpathname
, pathname
) < 0)
268 /* read-only files cannot be removed */
269 _wchmod(wpathname
, 0666);
270 while ((ret
= _wunlink(wpathname
)) == -1 && tries
< ARRAY_SIZE(delay
)) {
271 if (!is_file_in_use_error(GetLastError()))
274 * We assume that some other process had the source or
275 * destination file open at the wrong moment and retry.
276 * In order to give the other process a higher chance to
277 * complete its operation, we give up our time slice now.
278 * If we have to retry again, we do sleep a bit.
283 while (ret
== -1 && is_file_in_use_error(GetLastError()) &&
284 ask_yes_no_if_possible("Unlink of file '%s' failed. "
285 "Should I try again?", pathname
))
286 ret
= _wunlink(wpathname
);
290 static int is_dir_empty(const wchar_t *wpath
)
292 WIN32_FIND_DATAW findbuf
;
294 wchar_t wbuf
[MAX_PATH
+ 2];
296 wcscat(wbuf
, L
"\\*");
297 handle
= FindFirstFileW(wbuf
, &findbuf
);
298 if (handle
== INVALID_HANDLE_VALUE
)
299 return GetLastError() == ERROR_NO_MORE_FILES
;
301 while (!wcscmp(findbuf
.cFileName
, L
".") ||
302 !wcscmp(findbuf
.cFileName
, L
".."))
303 if (!FindNextFileW(handle
, &findbuf
)) {
304 DWORD err
= GetLastError();
306 return err
== ERROR_NO_MORE_FILES
;
312 int mingw_rmdir(const char *pathname
)
315 wchar_t wpathname
[MAX_PATH
];
316 if (xutftowcs_path(wpathname
, pathname
) < 0)
319 while ((ret
= _wrmdir(wpathname
)) == -1 && tries
< ARRAY_SIZE(delay
)) {
320 if (!is_file_in_use_error(GetLastError()))
321 errno
= err_win_to_posix(GetLastError());
324 if (!is_dir_empty(wpathname
)) {
329 * We assume that some other process had the source or
330 * destination file open at the wrong moment and retry.
331 * In order to give the other process a higher chance to
332 * complete its operation, we give up our time slice now.
333 * If we have to retry again, we do sleep a bit.
338 while (ret
== -1 && errno
== EACCES
&& is_file_in_use_error(GetLastError()) &&
339 ask_yes_no_if_possible("Deletion of directory '%s' failed. "
340 "Should I try again?", pathname
))
341 ret
= _wrmdir(wpathname
);
343 invalidate_lstat_cache();
347 static inline int needs_hiding(const char *path
)
349 const char *basename
;
351 if (hide_dotfiles
== HIDE_DOTFILES_FALSE
)
354 /* We cannot use basename(), as it would remove trailing slashes */
355 mingw_skip_dos_drive_prefix((char **)&path
);
359 for (basename
= path
; *path
; path
++)
360 if (is_dir_sep(*path
)) {
363 } while (is_dir_sep(*path
));
364 /* ignore trailing slashes */
369 if (hide_dotfiles
== HIDE_DOTFILES_TRUE
)
370 return *basename
== '.';
372 assert(hide_dotfiles
== HIDE_DOTFILES_DOTGITONLY
);
373 return !strncasecmp(".git", basename
, 4) &&
374 (!basename
[4] || is_dir_sep(basename
[4]));
377 static int set_hidden_flag(const wchar_t *path
, int set
)
379 DWORD original
= GetFileAttributesW(path
), modified
;
381 modified
= original
| FILE_ATTRIBUTE_HIDDEN
;
383 modified
= original
& ~FILE_ATTRIBUTE_HIDDEN
;
384 if (original
== modified
|| SetFileAttributesW(path
, modified
))
386 errno
= err_win_to_posix(GetLastError());
390 int mingw_mkdir(const char *path
, int mode
)
393 wchar_t wpath
[MAX_PATH
];
395 if (!is_valid_win32_path(path
)) {
400 if (xutftowcs_path(wpath
, path
) < 0)
402 ret
= _wmkdir(wpath
);
403 if (!ret
&& needs_hiding(path
))
404 return set_hidden_flag(wpath
, 1);
409 * Calling CreateFile() using FILE_APPEND_DATA and without FILE_WRITE_DATA
410 * is documented in [1] as opening a writable file handle in append mode.
411 * (It is believed that) this is atomic since it is maintained by the
412 * kernel unlike the O_APPEND flag which is racily maintained by the CRT.
414 * [1] https://docs.microsoft.com/en-us/windows/desktop/fileio/file-access-rights-constants
416 * This trick does not appear to work for named pipes. Instead it creates
417 * a named pipe client handle that cannot be written to. Callers should
418 * just use the regular _wopen() for them. (And since client handle gets
419 * bound to a unique server handle, it isn't really an issue.)
421 static int mingw_open_append(wchar_t const *wfilename
, int oflags
, ...)
425 DWORD create
= (oflags
& O_CREAT
) ? OPEN_ALWAYS
: OPEN_EXISTING
;
427 /* only these flags are supported */
428 if ((oflags
& ~O_CREAT
) != (O_WRONLY
| O_APPEND
))
429 return errno
= ENOSYS
, -1;
432 * FILE_SHARE_WRITE is required to permit child processes
433 * to append to the file.
435 handle
= CreateFileW(wfilename
, FILE_APPEND_DATA
,
436 FILE_SHARE_WRITE
| FILE_SHARE_READ
,
437 NULL
, create
, FILE_ATTRIBUTE_NORMAL
, NULL
);
438 if (handle
== INVALID_HANDLE_VALUE
)
439 return errno
= err_win_to_posix(GetLastError()), -1;
442 * No O_APPEND here, because the CRT uses it only to reset the
443 * file pointer to EOF before each write(); but that is not
444 * necessary (and may lead to races) for a file created with
447 fd
= _open_osfhandle((intptr_t)handle
, O_BINARY
);
454 * Does the pathname map to the local named pipe filesystem?
455 * That is, does it have a "//./pipe/" prefix?
457 static int is_local_named_pipe_path(const char *filename
)
459 return (is_dir_sep(filename
[0]) &&
460 is_dir_sep(filename
[1]) &&
461 filename
[2] == '.' &&
462 is_dir_sep(filename
[3]) &&
463 !strncasecmp(filename
+4, "pipe", 4) &&
464 is_dir_sep(filename
[8]) &&
468 int mingw_open (const char *filename
, int oflags
, ...)
470 typedef int (*open_fn_t
)(wchar_t const *wfilename
, int oflags
, ...);
473 int fd
, create
= (oflags
& (O_CREAT
| O_EXCL
)) == (O_CREAT
| O_EXCL
);
474 wchar_t wfilename
[MAX_PATH
];
477 va_start(args
, oflags
);
478 mode
= va_arg(args
, int);
481 if (!is_valid_win32_path(filename
)) {
482 errno
= create
? EINVAL
: ENOENT
;
486 if (filename
&& !strcmp(filename
, "/dev/null"))
489 if ((oflags
& O_APPEND
) && !is_local_named_pipe_path(filename
))
490 open_fn
= mingw_open_append
;
494 if (xutftowcs_path(wfilename
, filename
) < 0)
496 fd
= open_fn(wfilename
, oflags
, mode
);
498 if (fd
< 0 && (oflags
& O_ACCMODE
) != O_RDONLY
&& errno
== EACCES
) {
499 DWORD attrs
= GetFileAttributesW(wfilename
);
500 if (attrs
!= INVALID_FILE_ATTRIBUTES
&& (attrs
& FILE_ATTRIBUTE_DIRECTORY
))
503 if ((oflags
& O_CREAT
) && needs_hiding(filename
)) {
505 * Internally, _wopen() uses the CreateFile() API which errors
506 * out with an ERROR_ACCESS_DENIED if CREATE_ALWAYS was
507 * specified and an already existing file's attributes do not
508 * match *exactly*. As there is no mode or flag we can set that
509 * would correspond to FILE_ATTRIBUTE_HIDDEN, let's just try
510 * again *without* the O_CREAT flag (that corresponds to the
511 * CREATE_ALWAYS flag of CreateFile()).
513 if (fd
< 0 && errno
== EACCES
)
514 fd
= open_fn(wfilename
, oflags
& ~O_CREAT
, mode
);
515 if (fd
>= 0 && set_hidden_flag(wfilename
, 1))
516 warning("could not mark '%s' as hidden.", filename
);
521 static BOOL WINAPI
ctrl_ignore(DWORD type
)
527 int mingw_fgetc(FILE *stream
)
530 if (!isatty(_fileno(stream
)))
531 return fgetc(stream
);
533 SetConsoleCtrlHandler(ctrl_ignore
, TRUE
);
536 if (ch
!= EOF
|| GetLastError() != ERROR_OPERATION_ABORTED
)
539 /* Ctrl+C was pressed, simulate SIGINT and retry */
542 SetConsoleCtrlHandler(ctrl_ignore
, FALSE
);
547 FILE *mingw_fopen (const char *filename
, const char *otype
)
549 int hide
= needs_hiding(filename
);
551 wchar_t wfilename
[MAX_PATH
], wotype
[4];
552 if (!is_valid_win32_path(filename
)) {
553 int create
= otype
&& strchr(otype
, 'w');
554 errno
= create
? EINVAL
: ENOENT
;
557 if (filename
&& !strcmp(filename
, "/dev/null"))
559 if (xutftowcs_path(wfilename
, filename
) < 0 ||
560 xutftowcs(wotype
, otype
, ARRAY_SIZE(wotype
)) < 0)
562 if (hide
&& !access(filename
, F_OK
) && set_hidden_flag(wfilename
, 0)) {
563 error("could not unhide %s", filename
);
566 file
= _wfopen(wfilename
, wotype
);
567 if (!file
&& GetLastError() == ERROR_INVALID_NAME
)
569 if (file
&& hide
&& set_hidden_flag(wfilename
, 1))
570 warning("could not mark '%s' as hidden.", filename
);
574 FILE *mingw_freopen (const char *filename
, const char *otype
, FILE *stream
)
576 int hide
= needs_hiding(filename
);
578 wchar_t wfilename
[MAX_PATH
], wotype
[4];
579 if (!is_valid_win32_path(filename
)) {
580 int create
= otype
&& strchr(otype
, 'w');
581 errno
= create
? EINVAL
: ENOENT
;
584 if (filename
&& !strcmp(filename
, "/dev/null"))
586 if (xutftowcs_path(wfilename
, filename
) < 0 ||
587 xutftowcs(wotype
, otype
, ARRAY_SIZE(wotype
)) < 0)
589 if (hide
&& !access(filename
, F_OK
) && set_hidden_flag(wfilename
, 0)) {
590 error("could not unhide %s", filename
);
593 file
= _wfreopen(wfilename
, wotype
, stream
);
594 if (file
&& hide
&& set_hidden_flag(wfilename
, 1))
595 warning("could not mark '%s' as hidden.", filename
);
600 int mingw_fflush(FILE *stream
)
602 int ret
= fflush(stream
);
605 * write() is used behind the scenes of stdio output functions.
606 * Since git code does not check for errors after each stdio write
607 * operation, it can happen that write() is called by a later
608 * stdio function even if an earlier write() call failed. In the
609 * case of a pipe whose readable end was closed, only the first
610 * call to write() reports EPIPE on Windows. Subsequent write()
611 * calls report EINVAL. It is impossible to notice whether this
612 * fflush invocation triggered such a case, therefore, we have to
613 * catch all EINVAL errors whole-sale.
615 if (ret
&& errno
== EINVAL
)
622 ssize_t
mingw_write(int fd
, const void *buf
, size_t len
)
624 ssize_t result
= write(fd
, buf
, len
);
626 if (result
< 0 && errno
== EINVAL
&& buf
) {
627 /* check if fd is a pipe */
628 HANDLE h
= (HANDLE
) _get_osfhandle(fd
);
629 if (GetFileType(h
) == FILE_TYPE_PIPE
)
638 int mingw_access(const char *filename
, int mode
)
640 wchar_t wfilename
[MAX_PATH
];
641 if (xutftowcs_path(wfilename
, filename
) < 0)
643 /* X_OK is not supported by the MSVCRT version */
644 return _waccess(wfilename
, mode
& ~X_OK
);
647 int mingw_chdir(const char *dirname
)
649 wchar_t wdirname
[MAX_PATH
];
650 if (xutftowcs_path(wdirname
, dirname
) < 0)
652 return _wchdir(wdirname
);
655 int mingw_chmod(const char *filename
, int mode
)
657 wchar_t wfilename
[MAX_PATH
];
658 if (xutftowcs_path(wfilename
, filename
) < 0)
660 return _wchmod(wfilename
, mode
);
664 * The unit of FILETIME is 100-nanoseconds since January 1, 1601, UTC.
665 * Returns the 100-nanoseconds ("hekto nanoseconds") since the epoch.
667 static inline long long filetime_to_hnsec(const FILETIME
*ft
)
669 long long winTime
= ((long long)ft
->dwHighDateTime
<< 32) + ft
->dwLowDateTime
;
670 /* Windows to Unix Epoch conversion */
671 return winTime
- 116444736000000000LL;
674 static inline void filetime_to_timespec(const FILETIME
*ft
, struct timespec
*ts
)
676 long long hnsec
= filetime_to_hnsec(ft
);
677 ts
->tv_sec
= (time_t)(hnsec
/ 10000000);
678 ts
->tv_nsec
= (hnsec
% 10000000) * 100;
682 * Verifies that safe_create_leading_directories() would succeed.
684 static int has_valid_directory_prefix(wchar_t *wfilename
)
686 int n
= wcslen(wfilename
);
689 wchar_t c
= wfilename
[--n
];
695 wfilename
[n
] = L
'\0';
696 attributes
= GetFileAttributesW(wfilename
);
698 if (attributes
== FILE_ATTRIBUTE_DIRECTORY
||
699 attributes
== FILE_ATTRIBUTE_DEVICE
)
701 if (attributes
== INVALID_FILE_ATTRIBUTES
)
702 switch (GetLastError()) {
703 case ERROR_PATH_NOT_FOUND
:
705 case ERROR_FILE_NOT_FOUND
:
706 /* This implies parent directory exists. */
714 /* We keep the do_lstat code in a separate function to avoid recursion.
715 * When a path ends with a slash, the stat will fail with ENOENT. In
716 * this case, we strip the trailing slashes and stat again.
718 * If follow is true then act like stat() and report on the link
719 * target. Otherwise report on the link itself.
721 static int do_lstat(int follow
, const char *file_name
, struct stat
*buf
)
723 WIN32_FILE_ATTRIBUTE_DATA fdata
;
724 wchar_t wfilename
[MAX_PATH
];
725 if (xutftowcs_path(wfilename
, file_name
) < 0)
728 if (GetFileAttributesExW(wfilename
, GetFileExInfoStandard
, &fdata
)) {
733 buf
->st_mode
= file_attr_to_st_mode(fdata
.dwFileAttributes
);
734 buf
->st_size
= fdata
.nFileSizeLow
|
735 (((off_t
)fdata
.nFileSizeHigh
)<<32);
736 buf
->st_dev
= buf
->st_rdev
= 0; /* not used by Git */
737 filetime_to_timespec(&(fdata
.ftLastAccessTime
), &(buf
->st_atim
));
738 filetime_to_timespec(&(fdata
.ftLastWriteTime
), &(buf
->st_mtim
));
739 filetime_to_timespec(&(fdata
.ftCreationTime
), &(buf
->st_ctim
));
740 if (fdata
.dwFileAttributes
& FILE_ATTRIBUTE_REPARSE_POINT
) {
741 WIN32_FIND_DATAW findbuf
;
742 HANDLE handle
= FindFirstFileW(wfilename
, &findbuf
);
743 if (handle
!= INVALID_HANDLE_VALUE
) {
744 if ((findbuf
.dwFileAttributes
& FILE_ATTRIBUTE_REPARSE_POINT
) &&
745 (findbuf
.dwReserved0
== IO_REPARSE_TAG_SYMLINK
)) {
747 char buffer
[MAXIMUM_REPARSE_DATA_BUFFER_SIZE
];
748 buf
->st_size
= readlink(file_name
, buffer
, MAXIMUM_REPARSE_DATA_BUFFER_SIZE
);
750 buf
->st_mode
= S_IFLNK
;
752 buf
->st_mode
|= S_IREAD
;
753 if (!(findbuf
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
754 buf
->st_mode
|= S_IWRITE
;
761 switch (GetLastError()) {
762 case ERROR_ACCESS_DENIED
:
763 case ERROR_SHARING_VIOLATION
:
764 case ERROR_LOCK_VIOLATION
:
765 case ERROR_SHARING_BUFFER_EXCEEDED
:
768 case ERROR_BUFFER_OVERFLOW
:
769 errno
= ENAMETOOLONG
;
771 case ERROR_NOT_ENOUGH_MEMORY
:
774 case ERROR_PATH_NOT_FOUND
:
775 if (!has_valid_directory_prefix(wfilename
)) {
787 /* We provide our own lstat/fstat functions, since the provided
788 * lstat/fstat functions are so slow. These stat functions are
789 * tailored for Git's usage (read: fast), and are not meant to be
790 * complete. Note that Git stat()s are redirected to mingw_lstat()
791 * too, since Windows doesn't really handle symlinks that well.
793 static int do_stat_internal(int follow
, const char *file_name
, struct stat
*buf
)
796 char alt_name
[PATH_MAX
];
798 if (!do_lstat(follow
, file_name
, buf
))
801 /* if file_name ended in a '/', Windows returned ENOENT;
802 * try again without trailing slashes
807 namelen
= strlen(file_name
);
808 if (namelen
&& file_name
[namelen
-1] != '/')
810 while (namelen
&& file_name
[namelen
-1] == '/')
812 if (!namelen
|| namelen
>= PATH_MAX
)
815 memcpy(alt_name
, file_name
, namelen
);
816 alt_name
[namelen
] = 0;
817 return do_lstat(follow
, alt_name
, buf
);
820 static int get_file_info_by_handle(HANDLE hnd
, struct stat
*buf
)
822 BY_HANDLE_FILE_INFORMATION fdata
;
824 if (!GetFileInformationByHandle(hnd
, &fdata
)) {
825 errno
= err_win_to_posix(GetLastError());
833 buf
->st_mode
= file_attr_to_st_mode(fdata
.dwFileAttributes
);
834 buf
->st_size
= fdata
.nFileSizeLow
|
835 (((off_t
)fdata
.nFileSizeHigh
)<<32);
836 buf
->st_dev
= buf
->st_rdev
= 0; /* not used by Git */
837 filetime_to_timespec(&(fdata
.ftLastAccessTime
), &(buf
->st_atim
));
838 filetime_to_timespec(&(fdata
.ftLastWriteTime
), &(buf
->st_mtim
));
839 filetime_to_timespec(&(fdata
.ftCreationTime
), &(buf
->st_ctim
));
843 int mingw_lstat(const char *file_name
, struct stat
*buf
)
845 return do_stat_internal(0, file_name
, buf
);
847 int mingw_stat(const char *file_name
, struct stat
*buf
)
849 return do_stat_internal(1, file_name
, buf
);
852 int mingw_fstat(int fd
, struct stat
*buf
)
854 HANDLE fh
= (HANDLE
)_get_osfhandle(fd
);
855 DWORD avail
, type
= GetFileType(fh
) & ~FILE_TYPE_REMOTE
;
859 return get_file_info_by_handle(fh
, buf
);
863 /* initialize stat fields */
864 memset(buf
, 0, sizeof(*buf
));
867 if (type
== FILE_TYPE_CHAR
) {
868 buf
->st_mode
= _S_IFCHR
;
870 buf
->st_mode
= _S_IFIFO
;
871 if (PeekNamedPipe(fh
, NULL
, 0, NULL
, &avail
, NULL
))
872 buf
->st_size
= avail
;
882 static inline void time_t_to_filetime(time_t t
, FILETIME
*ft
)
884 long long winTime
= t
* 10000000LL + 116444736000000000LL;
885 ft
->dwLowDateTime
= winTime
;
886 ft
->dwHighDateTime
= winTime
>> 32;
889 int mingw_utime (const char *file_name
, const struct utimbuf
*times
)
894 wchar_t wfilename
[MAX_PATH
];
895 if (xutftowcs_path(wfilename
, file_name
) < 0)
898 /* must have write permission */
899 attrs
= GetFileAttributesW(wfilename
);
900 if (attrs
!= INVALID_FILE_ATTRIBUTES
&&
901 (attrs
& FILE_ATTRIBUTE_READONLY
)) {
902 /* ignore errors here; open() will report them */
903 SetFileAttributesW(wfilename
, attrs
& ~FILE_ATTRIBUTE_READONLY
);
906 if ((fh
= _wopen(wfilename
, O_RDWR
| O_BINARY
)) < 0) {
912 time_t_to_filetime(times
->modtime
, &mft
);
913 time_t_to_filetime(times
->actime
, &aft
);
915 GetSystemTimeAsFileTime(&mft
);
918 if (!SetFileTime((HANDLE
)_get_osfhandle(fh
), NULL
, &aft
, &mft
)) {
926 if (attrs
!= INVALID_FILE_ATTRIBUTES
&&
927 (attrs
& FILE_ATTRIBUTE_READONLY
)) {
928 /* ignore errors again */
929 SetFileAttributesW(wfilename
, attrs
);
935 size_t mingw_strftime(char *s
, size_t max
,
936 const char *format
, const struct tm
*tm
)
938 size_t ret
= strftime(s
, max
, format
, tm
);
940 if (!ret
&& errno
== EINVAL
)
941 die("invalid strftime format: '%s'", format
);
945 unsigned int sleep (unsigned int seconds
)
951 char *mingw_mktemp(char *template)
953 wchar_t wtemplate
[MAX_PATH
];
954 if (xutftowcs_path(wtemplate
, template) < 0)
956 if (!_wmktemp(wtemplate
))
958 if (xwcstoutf(template, wtemplate
, strlen(template) + 1) < 0)
963 int mkstemp(char *template)
965 char *filename
= mktemp(template);
966 if (filename
== NULL
)
968 return open(filename
, O_RDWR
| O_CREAT
, 0600);
971 int gettimeofday(struct timeval
*tv
, void *tz
)
976 GetSystemTimeAsFileTime(&ft
);
977 hnsec
= filetime_to_hnsec(&ft
);
978 tv
->tv_sec
= hnsec
/ 10000000;
979 tv
->tv_usec
= (hnsec
% 10000000) / 10;
983 int pipe(int filedes
[2])
987 /* this creates non-inheritable handles */
988 if (!CreatePipe(&h
[0], &h
[1], NULL
, 8192)) {
989 errno
= err_win_to_posix(GetLastError());
992 filedes
[0] = _open_osfhandle(HCAST(int, h
[0]), O_NOINHERIT
);
993 if (filedes
[0] < 0) {
998 filedes
[1] = _open_osfhandle(HCAST(int, h
[1]), O_NOINHERIT
);
999 if (filedes
[1] < 0) {
1007 struct tm
*gmtime_r(const time_t *timep
, struct tm
*result
)
1009 /* gmtime() in MSVCRT.DLL is thread-safe, but not reentrant */
1010 memcpy(result
, gmtime(timep
), sizeof(struct tm
));
1014 struct tm
*localtime_r(const time_t *timep
, struct tm
*result
)
1016 /* localtime() in MSVCRT.DLL is thread-safe, but not reentrant */
1017 memcpy(result
, localtime(timep
), sizeof(struct tm
));
1021 char *mingw_getcwd(char *pointer
, int len
)
1023 wchar_t cwd
[MAX_PATH
], wpointer
[MAX_PATH
];
1024 DWORD ret
= GetCurrentDirectoryW(ARRAY_SIZE(cwd
), cwd
);
1026 if (!ret
|| ret
>= ARRAY_SIZE(cwd
)) {
1027 errno
= ret
? ENAMETOOLONG
: err_win_to_posix(GetLastError());
1030 ret
= GetLongPathNameW(cwd
, wpointer
, ARRAY_SIZE(wpointer
));
1031 if (!ret
&& GetLastError() == ERROR_ACCESS_DENIED
) {
1032 HANDLE hnd
= CreateFileW(cwd
, 0,
1033 FILE_SHARE_READ
| FILE_SHARE_WRITE
| FILE_SHARE_DELETE
, NULL
,
1034 OPEN_EXISTING
, FILE_FLAG_BACKUP_SEMANTICS
, NULL
);
1035 if (hnd
== INVALID_HANDLE_VALUE
)
1037 ret
= GetFinalPathNameByHandleW(hnd
, wpointer
, ARRAY_SIZE(wpointer
), 0);
1039 if (!ret
|| ret
>= ARRAY_SIZE(wpointer
))
1041 if (xwcstoutf(pointer
, normalize_ntpath(wpointer
), len
) < 0)
1045 if (!ret
|| ret
>= ARRAY_SIZE(wpointer
))
1047 if (xwcstoutf(pointer
, wpointer
, len
) < 0)
1049 convert_slashes(pointer
);
1054 * See "Parsing C++ Command-Line Arguments" at Microsoft's Docs:
1055 * https://docs.microsoft.com/en-us/cpp/cpp/parsing-cpp-command-line-arguments
1057 static const char *quote_arg(const char *arg
)
1059 /* count chars to quote */
1061 int force_quotes
= 0;
1063 const char *p
= arg
;
1064 if (!*p
) force_quotes
= 1;
1066 if (isspace(*p
) || *p
== '*' || *p
== '?' || *p
== '{' || *p
== '\'')
1070 else if (*p
== '\\') {
1072 while (*p
== '\\') {
1077 if (*p
== '"' || !*p
)
1084 if (!force_quotes
&& n
== 0)
1087 /* insert \ where necessary */
1088 d
= q
= xmalloc(st_add3(len
, n
, 3));
1093 else if (*arg
== '\\') {
1095 while (*arg
== '\\') {
1099 if (*arg
== '"' || !*arg
) {
1102 /* don't escape the surrounding end quote */
1115 static const char *parse_interpreter(const char *cmd
)
1117 static char buf
[100];
1121 /* don't even try a .exe */
1123 if (n
>= 4 && !strcasecmp(cmd
+n
-4, ".exe"))
1126 fd
= open(cmd
, O_RDONLY
);
1129 n
= read(fd
, buf
, sizeof(buf
)-1);
1131 if (n
< 4) /* at least '#!/x' and not error */
1134 if (buf
[0] != '#' || buf
[1] != '!')
1137 p
= buf
+ strcspn(buf
, "\r\n");
1142 if (!(p
= strrchr(buf
+2, '/')) && !(p
= strrchr(buf
+2, '\\')))
1145 if ((opt
= strchr(p
+1, ' ')))
1151 * exe_only means that we only want to detect .exe files, but not scripts
1152 * (which do not have an extension)
1154 static char *lookup_prog(const char *dir
, int dirlen
, const char *cmd
,
1155 int isexe
, int exe_only
)
1157 char path
[MAX_PATH
];
1158 snprintf(path
, sizeof(path
), "%.*s\\%s.exe", dirlen
, dir
, cmd
);
1160 if (!isexe
&& access(path
, F_OK
) == 0)
1161 return xstrdup(path
);
1162 path
[strlen(path
)-4] = '\0';
1163 if ((!exe_only
|| isexe
) && access(path
, F_OK
) == 0)
1164 if (!(GetFileAttributes(path
) & FILE_ATTRIBUTE_DIRECTORY
))
1165 return xstrdup(path
);
1170 * Determines the absolute path of cmd using the split path in path.
1171 * If cmd contains a slash or backslash, no lookup is performed.
1173 static char *path_lookup(const char *cmd
, int exe_only
)
1177 int len
= strlen(cmd
);
1178 int isexe
= len
>= 4 && !strcasecmp(cmd
+len
-4, ".exe");
1180 if (strchr(cmd
, '/') || strchr(cmd
, '\\'))
1181 return xstrdup(cmd
);
1183 path
= mingw_getenv("PATH");
1188 const char *sep
= strchrnul(path
, ';');
1189 int dirlen
= sep
- path
;
1191 prog
= lookup_prog(path
, dirlen
, cmd
, isexe
, exe_only
);
1200 static const wchar_t *wcschrnul(const wchar_t *s
, wchar_t c
)
1202 while (*s
&& *s
!= c
)
1207 /* Compare only keys */
1208 static int wenvcmp(const void *a
, const void *b
)
1210 wchar_t *p
= *(wchar_t **)a
, *q
= *(wchar_t **)b
;
1211 size_t p_len
, q_len
;
1214 p_len
= wcschrnul(p
, L
'=') - p
;
1215 q_len
= wcschrnul(q
, L
'=') - q
;
1217 /* If the length differs, include the shorter key's NUL */
1220 else if (p_len
> q_len
)
1223 return _wcsnicmp(p
, q
, p_len
);
1226 /* We need a stable sort to convert the environment between UTF-16 <-> UTF-8 */
1227 #ifndef INTERNAL_QSORT
1232 * Build an environment block combining the inherited environment
1233 * merged with the given list of settings.
1235 * Values of the form "KEY=VALUE" in deltaenv override inherited values.
1236 * Values of the form "KEY" in deltaenv delete inherited values.
1238 * Multiple entries in deltaenv for the same key are explicitly allowed.
1240 * We return a contiguous block of UNICODE strings with a final trailing
1243 static wchar_t *make_environment_block(char **deltaenv
)
1245 wchar_t *wenv
= GetEnvironmentStringsW(), *wdeltaenv
, *result
, *p
;
1246 size_t wlen
, s
, delta_size
, size
;
1248 wchar_t **array
= NULL
;
1249 size_t alloc
= 0, nr
= 0, i
;
1251 size
= 1; /* for extra NUL at the end */
1253 /* If there is no deltaenv to apply, simply return a copy. */
1254 if (!deltaenv
|| !*deltaenv
) {
1255 for (p
= wenv
; p
&& *p
; ) {
1256 size_t s
= wcslen(p
) + 1;
1261 ALLOC_ARRAY(result
, size
);
1262 memcpy(result
, wenv
, size
* sizeof(*wenv
));
1263 FreeEnvironmentStringsW(wenv
);
1268 * If there is a deltaenv, let's accumulate all keys into `array`,
1269 * sort them using the stable git_qsort() and then copy, skipping
1272 for (p
= wenv
; p
&& *p
; ) {
1273 ALLOC_GROW(array
, nr
+ 1, alloc
);
1280 /* (over-)assess size needed for wchar version of deltaenv */
1281 for (delta_size
= 0, i
= 0; deltaenv
[i
]; i
++)
1282 delta_size
+= strlen(deltaenv
[i
]) * 2 + 1;
1283 ALLOC_ARRAY(wdeltaenv
, delta_size
);
1285 /* convert the deltaenv, appending to array */
1286 for (i
= 0, p
= wdeltaenv
; deltaenv
[i
]; i
++) {
1287 ALLOC_GROW(array
, nr
+ 1, alloc
);
1288 wlen
= xutftowcs(p
, deltaenv
[i
], wdeltaenv
+ delta_size
- p
);
1293 git_qsort(array
, nr
, sizeof(*array
), wenvcmp
);
1294 ALLOC_ARRAY(result
, size
+ delta_size
);
1296 for (p
= result
, i
= 0; i
< nr
; i
++) {
1297 /* Skip any duplicate keys; last one wins */
1298 while (i
+ 1 < nr
&& !wenvcmp(array
+ i
, array
+ i
+ 1))
1301 /* Skip "to delete" entry */
1302 if (!wcschr(array
[i
], L
'='))
1305 size
= wcslen(array
[i
]) + 1;
1306 memcpy(p
, array
[i
], size
* sizeof(*p
));
1313 FreeEnvironmentStringsW(wenv
);
1317 static void do_unset_environment_variables(void)
1320 char *p
= unset_environment_variables
;
1327 char *comma
= strchr(p
, ',');
1339 struct pinfo_t
*next
;
1343 static struct pinfo_t
*pinfo
= NULL
;
1344 CRITICAL_SECTION pinfo_cs
;
1346 static pid_t
mingw_spawnve_fd(const char *cmd
, const char **argv
, char **deltaenv
,
1348 int prepend_cmd
, int fhin
, int fhout
, int fherr
)
1351 PROCESS_INFORMATION pi
;
1353 wchar_t wcmd
[MAX_PATH
], wdir
[MAX_PATH
], *wargs
, *wenvblk
= NULL
;
1354 unsigned flags
= CREATE_UNICODE_ENVIRONMENT
;
1358 do_unset_environment_variables();
1360 /* Determine whether or not we are associated to a console */
1361 cons
= CreateFile("CONOUT$", GENERIC_WRITE
,
1362 FILE_SHARE_WRITE
, NULL
, OPEN_EXISTING
,
1363 FILE_ATTRIBUTE_NORMAL
, NULL
);
1364 if (cons
== INVALID_HANDLE_VALUE
) {
1365 /* There is no console associated with this process.
1366 * Since the child is a console process, Windows
1367 * would normally create a console window. But
1368 * since we'll be redirecting std streams, we do
1369 * not need the console.
1370 * It is necessary to use DETACHED_PROCESS
1371 * instead of CREATE_NO_WINDOW to make ssh
1372 * recognize that it has no console.
1374 flags
|= DETACHED_PROCESS
;
1376 /* There is already a console. If we specified
1377 * DETACHED_PROCESS here, too, Windows would
1378 * disassociate the child from the console.
1379 * The same is true for CREATE_NO_WINDOW.
1384 memset(&si
, 0, sizeof(si
));
1386 si
.dwFlags
= STARTF_USESTDHANDLES
;
1387 si
.hStdInput
= winansi_get_osfhandle(fhin
);
1388 si
.hStdOutput
= winansi_get_osfhandle(fhout
);
1389 si
.hStdError
= winansi_get_osfhandle(fherr
);
1391 if (xutftowcs_path(wcmd
, cmd
) < 0)
1393 if (dir
&& xutftowcs_path(wdir
, dir
) < 0)
1396 /* concatenate argv, quoting args as we go */
1397 strbuf_init(&args
, 0);
1399 char *quoted
= (char *)quote_arg(cmd
);
1400 strbuf_addstr(&args
, quoted
);
1404 for (; *argv
; argv
++) {
1405 char *quoted
= (char *)quote_arg(*argv
);
1407 strbuf_addch(&args
, ' ');
1408 strbuf_addstr(&args
, quoted
);
1409 if (quoted
!= *argv
)
1413 ALLOC_ARRAY(wargs
, st_add(st_mult(2, args
.len
), 1));
1414 xutftowcs(wargs
, args
.buf
, 2 * args
.len
+ 1);
1415 strbuf_release(&args
);
1417 wenvblk
= make_environment_block(deltaenv
);
1419 memset(&pi
, 0, sizeof(pi
));
1420 ret
= CreateProcessW(wcmd
, wargs
, NULL
, NULL
, TRUE
, flags
,
1421 wenvblk
, dir
? wdir
: NULL
, &si
, &pi
);
1430 CloseHandle(pi
.hThread
);
1433 * The process ID is the human-readable identifier of the process
1434 * that we want to present in log and error messages. The handle
1435 * is not useful for this purpose. But we cannot close it, either,
1436 * because it is not possible to turn a process ID into a process
1437 * handle after the process terminated.
1438 * Keep the handle in a list for waitpid.
1440 EnterCriticalSection(&pinfo_cs
);
1442 struct pinfo_t
*info
= xmalloc(sizeof(struct pinfo_t
));
1443 info
->pid
= pi
.dwProcessId
;
1444 info
->proc
= pi
.hProcess
;
1448 LeaveCriticalSection(&pinfo_cs
);
1450 return (pid_t
)pi
.dwProcessId
;
1453 static pid_t
mingw_spawnv(const char *cmd
, const char **argv
, int prepend_cmd
)
1455 return mingw_spawnve_fd(cmd
, argv
, NULL
, NULL
, prepend_cmd
, 0, 1, 2);
1458 pid_t
mingw_spawnvpe(const char *cmd
, const char **argv
, char **deltaenv
,
1460 int fhin
, int fhout
, int fherr
)
1463 char *prog
= path_lookup(cmd
, 0);
1470 const char *interpr
= parse_interpreter(prog
);
1473 const char *argv0
= argv
[0];
1474 char *iprog
= path_lookup(interpr
, 1);
1481 pid
= mingw_spawnve_fd(iprog
, argv
, deltaenv
, dir
, 1,
1482 fhin
, fhout
, fherr
);
1488 pid
= mingw_spawnve_fd(prog
, argv
, deltaenv
, dir
, 0,
1489 fhin
, fhout
, fherr
);
1495 static int try_shell_exec(const char *cmd
, char *const *argv
)
1497 const char *interpr
= parse_interpreter(cmd
);
1503 prog
= path_lookup(interpr
, 1);
1507 while (argv
[argc
]) argc
++;
1508 ALLOC_ARRAY(argv2
, argc
+ 1);
1509 argv2
[0] = (char *)cmd
; /* full path to the script file */
1510 memcpy(&argv2
[1], &argv
[1], sizeof(*argv
) * argc
);
1511 pid
= mingw_spawnv(prog
, argv2
, 1);
1514 if (waitpid(pid
, &status
, 0) < 0)
1518 pid
= 1; /* indicate that we tried but failed */
1525 int mingw_execv(const char *cmd
, char *const *argv
)
1527 /* check if git_command is a shell script */
1528 if (!try_shell_exec(cmd
, argv
)) {
1531 pid
= mingw_spawnv(cmd
, (const char **)argv
, 0);
1534 if (waitpid(pid
, &status
, 0) < 0)
1541 int mingw_execvp(const char *cmd
, char *const *argv
)
1543 char *prog
= path_lookup(cmd
, 0);
1546 mingw_execv(prog
, argv
);
1554 int mingw_kill(pid_t pid
, int sig
)
1556 if (pid
> 0 && sig
== SIGTERM
) {
1557 HANDLE h
= OpenProcess(PROCESS_TERMINATE
, FALSE
, pid
);
1559 if (TerminateProcess(h
, -1)) {
1564 errno
= err_win_to_posix(GetLastError());
1567 } else if (pid
> 0 && sig
== 0) {
1568 HANDLE h
= OpenProcess(PROCESS_QUERY_INFORMATION
, FALSE
, pid
);
1580 * UTF-8 versions of getenv(), putenv() and unsetenv().
1581 * Internally, they use the CRT's stock UNICODE routines
1582 * to avoid data loss.
1584 char *mingw_getenv(const char *name
)
1586 #define GETENV_MAX_RETAIN 30
1587 static char *values
[GETENV_MAX_RETAIN
];
1588 static int value_counter
;
1589 int len_key
, len_value
;
1592 wchar_t w_value
[32768];
1594 if (!name
|| !*name
)
1597 len_key
= strlen(name
) + 1;
1598 /* We cannot use xcalloc() here because that uses getenv() itself */
1599 w_key
= calloc(len_key
, sizeof(wchar_t));
1601 die("Out of memory, (tried to allocate %u wchar_t's)", len_key
);
1602 xutftowcs(w_key
, name
, len_key
);
1603 len_value
= GetEnvironmentVariableW(w_key
, w_value
, ARRAY_SIZE(w_value
));
1604 if (!len_value
&& GetLastError() == ERROR_ENVVAR_NOT_FOUND
) {
1610 len_value
= len_value
* 3 + 1;
1611 /* We cannot use xcalloc() here because that uses getenv() itself */
1612 value
= calloc(len_value
, sizeof(char));
1614 die("Out of memory, (tried to allocate %u bytes)", len_value
);
1615 xwcstoutf(value
, w_value
, len_value
);
1618 * We return `value` which is an allocated value and the caller is NOT
1619 * expecting to have to free it, so we keep a round-robin array,
1620 * invalidating the buffer after GETENV_MAX_RETAIN getenv() calls.
1622 free(values
[value_counter
]);
1623 values
[value_counter
++] = value
;
1624 if (value_counter
>= ARRAY_SIZE(values
))
1630 int mingw_putenv(const char *namevalue
)
1633 wchar_t *wide
, *equal
;
1636 if (!namevalue
|| !*namevalue
)
1639 size
= strlen(namevalue
) * 2 + 1;
1640 wide
= calloc(size
, sizeof(wchar_t));
1642 die("Out of memory, (tried to allocate %u wchar_t's)", size
);
1643 xutftowcs(wide
, namevalue
, size
);
1644 equal
= wcschr(wide
, L
'=');
1646 result
= SetEnvironmentVariableW(wide
, NULL
);
1649 result
= SetEnvironmentVariableW(wide
, equal
+ 1);
1654 errno
= err_win_to_posix(GetLastError());
1656 return result
? 0 : -1;
1660 * Note, this isn't a complete replacement for getaddrinfo. It assumes
1661 * that service contains a numerical port, or that it is null. It
1662 * does a simple search using gethostbyname, and returns one IPv4 host
1665 static int WSAAPI
getaddrinfo_stub(const char *node
, const char *service
,
1666 const struct addrinfo
*hints
,
1667 struct addrinfo
**res
)
1669 struct hostent
*h
= NULL
;
1670 struct addrinfo
*ai
;
1671 struct sockaddr_in
*sin
;
1674 h
= gethostbyname(node
);
1676 return WSAGetLastError();
1679 ai
= xmalloc(sizeof(struct addrinfo
));
1682 ai
->ai_family
= AF_INET
;
1683 ai
->ai_socktype
= hints
? hints
->ai_socktype
: 0;
1684 switch (ai
->ai_socktype
) {
1686 ai
->ai_protocol
= IPPROTO_TCP
;
1689 ai
->ai_protocol
= IPPROTO_UDP
;
1692 ai
->ai_protocol
= 0;
1695 ai
->ai_addrlen
= sizeof(struct sockaddr_in
);
1696 if (hints
&& (hints
->ai_flags
& AI_CANONNAME
))
1697 ai
->ai_canonname
= h
? xstrdup(h
->h_name
) : NULL
;
1699 ai
->ai_canonname
= NULL
;
1701 sin
= xcalloc(1, ai
->ai_addrlen
);
1702 sin
->sin_family
= AF_INET
;
1703 /* Note: getaddrinfo is supposed to allow service to be a string,
1704 * which should be looked up using getservbyname. This is
1705 * currently not implemented */
1707 sin
->sin_port
= htons(atoi(service
));
1709 sin
->sin_addr
= *(struct in_addr
*)h
->h_addr
;
1710 else if (hints
&& (hints
->ai_flags
& AI_PASSIVE
))
1711 sin
->sin_addr
.s_addr
= INADDR_ANY
;
1713 sin
->sin_addr
.s_addr
= INADDR_LOOPBACK
;
1714 ai
->ai_addr
= (struct sockaddr
*)sin
;
1719 static void WSAAPI
freeaddrinfo_stub(struct addrinfo
*res
)
1721 free(res
->ai_canonname
);
1726 static int WSAAPI
getnameinfo_stub(const struct sockaddr
*sa
, socklen_t salen
,
1727 char *host
, DWORD hostlen
,
1728 char *serv
, DWORD servlen
, int flags
)
1730 const struct sockaddr_in
*sin
= (const struct sockaddr_in
*)sa
;
1731 if (sa
->sa_family
!= AF_INET
)
1736 if (host
&& hostlen
> 0) {
1737 struct hostent
*ent
= NULL
;
1738 if (!(flags
& NI_NUMERICHOST
))
1739 ent
= gethostbyaddr((const char *)&sin
->sin_addr
,
1740 sizeof(sin
->sin_addr
), AF_INET
);
1743 snprintf(host
, hostlen
, "%s", ent
->h_name
);
1744 else if (flags
& NI_NAMEREQD
)
1747 snprintf(host
, hostlen
, "%s", inet_ntoa(sin
->sin_addr
));
1750 if (serv
&& servlen
> 0) {
1751 struct servent
*ent
= NULL
;
1752 if (!(flags
& NI_NUMERICSERV
))
1753 ent
= getservbyport(sin
->sin_port
,
1754 flags
& NI_DGRAM
? "udp" : "tcp");
1757 snprintf(serv
, servlen
, "%s", ent
->s_name
);
1759 snprintf(serv
, servlen
, "%d", ntohs(sin
->sin_port
));
1765 static HMODULE ipv6_dll
= NULL
;
1766 static void (WSAAPI
*ipv6_freeaddrinfo
)(struct addrinfo
*res
);
1767 static int (WSAAPI
*ipv6_getaddrinfo
)(const char *node
, const char *service
,
1768 const struct addrinfo
*hints
,
1769 struct addrinfo
**res
);
1770 static int (WSAAPI
*ipv6_getnameinfo
)(const struct sockaddr
*sa
, socklen_t salen
,
1771 char *host
, DWORD hostlen
,
1772 char *serv
, DWORD servlen
, int flags
);
1774 * gai_strerror is an inline function in the ws2tcpip.h header, so we
1775 * don't need to try to load that one dynamically.
1778 static void socket_cleanup(void)
1782 FreeLibrary(ipv6_dll
);
1784 ipv6_freeaddrinfo
= freeaddrinfo_stub
;
1785 ipv6_getaddrinfo
= getaddrinfo_stub
;
1786 ipv6_getnameinfo
= getnameinfo_stub
;
1789 static void ensure_socket_initialization(void)
1792 static int initialized
= 0;
1793 const char *libraries
[] = { "ws2_32.dll", "wship6.dll", NULL
};
1799 if (WSAStartup(MAKEWORD(2,2), &wsa
))
1800 die("unable to initialize winsock subsystem, error %d",
1803 for (name
= libraries
; *name
; name
++) {
1804 ipv6_dll
= LoadLibraryExA(*name
, NULL
,
1805 LOAD_LIBRARY_SEARCH_SYSTEM32
);
1809 ipv6_freeaddrinfo
= (void (WSAAPI
*)(struct addrinfo
*))
1810 GetProcAddress(ipv6_dll
, "freeaddrinfo");
1811 ipv6_getaddrinfo
= (int (WSAAPI
*)(const char *, const char *,
1812 const struct addrinfo
*,
1813 struct addrinfo
**))
1814 GetProcAddress(ipv6_dll
, "getaddrinfo");
1815 ipv6_getnameinfo
= (int (WSAAPI
*)(const struct sockaddr
*,
1816 socklen_t
, char *, DWORD
,
1817 char *, DWORD
, int))
1818 GetProcAddress(ipv6_dll
, "getnameinfo");
1819 if (!ipv6_freeaddrinfo
|| !ipv6_getaddrinfo
|| !ipv6_getnameinfo
) {
1820 FreeLibrary(ipv6_dll
);
1825 if (!ipv6_freeaddrinfo
|| !ipv6_getaddrinfo
|| !ipv6_getnameinfo
) {
1826 ipv6_freeaddrinfo
= freeaddrinfo_stub
;
1827 ipv6_getaddrinfo
= getaddrinfo_stub
;
1828 ipv6_getnameinfo
= getnameinfo_stub
;
1831 atexit(socket_cleanup
);
1836 int mingw_gethostname(char *name
, int namelen
)
1838 ensure_socket_initialization();
1839 return gethostname(name
, namelen
);
1842 #undef gethostbyname
1843 struct hostent
*mingw_gethostbyname(const char *host
)
1845 ensure_socket_initialization();
1846 return gethostbyname(host
);
1849 void mingw_freeaddrinfo(struct addrinfo
*res
)
1851 ipv6_freeaddrinfo(res
);
1854 int mingw_getaddrinfo(const char *node
, const char *service
,
1855 const struct addrinfo
*hints
, struct addrinfo
**res
)
1857 ensure_socket_initialization();
1858 return ipv6_getaddrinfo(node
, service
, hints
, res
);
1861 int mingw_getnameinfo(const struct sockaddr
*sa
, socklen_t salen
,
1862 char *host
, DWORD hostlen
, char *serv
, DWORD servlen
,
1865 ensure_socket_initialization();
1866 return ipv6_getnameinfo(sa
, salen
, host
, hostlen
, serv
, servlen
, flags
);
1869 int mingw_socket(int domain
, int type
, int protocol
)
1874 ensure_socket_initialization();
1875 s
= WSASocket(domain
, type
, protocol
, NULL
, 0, 0);
1876 if (s
== INVALID_SOCKET
) {
1878 * WSAGetLastError() values are regular BSD error codes
1879 * biased by WSABASEERR.
1880 * However, strerror() does not know about networking
1881 * specific errors, which are values beginning at 38 or so.
1882 * Therefore, we choose to leave the biased error code
1883 * in errno so that _if_ someone looks up the code somewhere,
1884 * then it is at least the number that are usually listed.
1886 errno
= WSAGetLastError();
1889 /* convert into a file descriptor */
1890 if ((sockfd
= _open_osfhandle(s
, O_RDWR
|O_BINARY
)) < 0) {
1892 return error("unable to make a socket file descriptor: %s",
1899 int mingw_connect(int sockfd
, struct sockaddr
*sa
, size_t sz
)
1901 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1902 return connect(s
, sa
, sz
);
1906 int mingw_bind(int sockfd
, struct sockaddr
*sa
, size_t sz
)
1908 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1909 return bind(s
, sa
, sz
);
1913 int mingw_setsockopt(int sockfd
, int lvl
, int optname
, void *optval
, int optlen
)
1915 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1916 return setsockopt(s
, lvl
, optname
, (const char*)optval
, optlen
);
1920 int mingw_shutdown(int sockfd
, int how
)
1922 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1923 return shutdown(s
, how
);
1927 int mingw_listen(int sockfd
, int backlog
)
1929 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1930 return listen(s
, backlog
);
1934 int mingw_accept(int sockfd1
, struct sockaddr
*sa
, socklen_t
*sz
)
1938 SOCKET s1
= (SOCKET
)_get_osfhandle(sockfd1
);
1939 SOCKET s2
= accept(s1
, sa
, sz
);
1941 /* convert into a file descriptor */
1942 if ((sockfd2
= _open_osfhandle(s2
, O_RDWR
|O_BINARY
)) < 0) {
1945 return error("unable to make a socket file descriptor: %s",
1952 int mingw_rename(const char *pold
, const char *pnew
)
1956 wchar_t wpold
[MAX_PATH
], wpnew
[MAX_PATH
];
1957 if (xutftowcs_path(wpold
, pold
) < 0 || xutftowcs_path(wpnew
, pnew
) < 0)
1961 * Try native rename() first to get errno right.
1962 * It is based on MoveFile(), which cannot overwrite existing files.
1964 if (!_wrename(wpold
, wpnew
))
1966 if (errno
!= EEXIST
)
1969 if (MoveFileExW(wpold
, wpnew
, MOVEFILE_REPLACE_EXISTING
))
1971 /* TODO: translate more errors */
1972 gle
= GetLastError();
1973 if (gle
== ERROR_ACCESS_DENIED
&&
1974 (attrs
= GetFileAttributesW(wpnew
)) != INVALID_FILE_ATTRIBUTES
) {
1975 if (attrs
& FILE_ATTRIBUTE_DIRECTORY
) {
1976 DWORD attrsold
= GetFileAttributesW(wpold
);
1977 if (attrsold
== INVALID_FILE_ATTRIBUTES
||
1978 !(attrsold
& FILE_ATTRIBUTE_DIRECTORY
))
1980 else if (!_wrmdir(wpnew
))
1984 if ((attrs
& FILE_ATTRIBUTE_READONLY
) &&
1985 SetFileAttributesW(wpnew
, attrs
& ~FILE_ATTRIBUTE_READONLY
)) {
1986 if (MoveFileExW(wpold
, wpnew
, MOVEFILE_REPLACE_EXISTING
))
1988 gle
= GetLastError();
1989 /* revert file attributes on failure */
1990 SetFileAttributesW(wpnew
, attrs
);
1993 if (tries
< ARRAY_SIZE(delay
) && gle
== ERROR_ACCESS_DENIED
) {
1995 * We assume that some other process had the source or
1996 * destination file open at the wrong moment and retry.
1997 * In order to give the other process a higher chance to
1998 * complete its operation, we give up our time slice now.
1999 * If we have to retry again, we do sleep a bit.
2001 Sleep(delay
[tries
]);
2005 if (gle
== ERROR_ACCESS_DENIED
&&
2006 ask_yes_no_if_possible("Rename from '%s' to '%s' failed. "
2007 "Should I try again?", pold
, pnew
))
2015 * Note that this doesn't return the actual pagesize, but
2016 * the allocation granularity. If future Windows specific git code
2017 * needs the real getpagesize function, we need to find another solution.
2019 int mingw_getpagesize(void)
2023 return si
.dwAllocationGranularity
;
2026 /* See https://msdn.microsoft.com/en-us/library/windows/desktop/ms724435.aspx */
2027 enum EXTENDED_NAME_FORMAT
{
2029 NameUserPrincipal
= 8
2032 static char *get_extended_user_info(enum EXTENDED_NAME_FORMAT type
)
2034 DECLARE_PROC_ADDR(secur32
.dll
, BOOL
, GetUserNameExW
,
2035 enum EXTENDED_NAME_FORMAT
, LPCWSTR
, PULONG
);
2036 static wchar_t wbuffer
[1024];
2039 if (!INIT_PROC_ADDR(GetUserNameExW
))
2042 len
= ARRAY_SIZE(wbuffer
);
2043 if (GetUserNameExW(type
, wbuffer
, &len
)) {
2044 char *converted
= xmalloc((len
*= 3));
2045 if (xwcstoutf(converted
, wbuffer
, len
) >= 0)
2053 char *mingw_query_user_email(void)
2055 return get_extended_user_info(NameUserPrincipal
);
2058 struct passwd
*getpwuid(int uid
)
2060 static unsigned initialized
;
2061 static char user_name
[100];
2062 static struct passwd
*p
;
2068 len
= sizeof(user_name
);
2069 if (!GetUserName(user_name
, &len
)) {
2074 p
= xmalloc(sizeof(*p
));
2075 p
->pw_name
= user_name
;
2076 p
->pw_gecos
= get_extended_user_info(NameDisplay
);
2078 p
->pw_gecos
= "unknown";
2085 static HANDLE timer_event
;
2086 static HANDLE timer_thread
;
2087 static int timer_interval
;
2088 static int one_shot
;
2089 static sig_handler_t timer_fn
= SIG_DFL
, sigint_fn
= SIG_DFL
;
2091 /* The timer works like this:
2092 * The thread, ticktack(), is a trivial routine that most of the time
2093 * only waits to receive the signal to terminate. The main thread tells
2094 * the thread to terminate by setting the timer_event to the signalled
2096 * But ticktack() interrupts the wait state after the timer's interval
2097 * length to call the signal handler.
2100 static unsigned __stdcall
ticktack(void *dummy
)
2102 while (WaitForSingleObject(timer_event
, timer_interval
) == WAIT_TIMEOUT
) {
2103 mingw_raise(SIGALRM
);
2110 static int start_timer_thread(void)
2112 timer_event
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
2114 timer_thread
= (HANDLE
) _beginthreadex(NULL
, 0, ticktack
, NULL
, 0, NULL
);
2116 return errno
= ENOMEM
,
2117 error("cannot start timer thread");
2119 return errno
= ENOMEM
,
2120 error("cannot allocate resources for timer");
2124 static void stop_timer_thread(void)
2127 SetEvent(timer_event
); /* tell thread to terminate */
2129 int rc
= WaitForSingleObject(timer_thread
, 1000);
2130 if (rc
== WAIT_TIMEOUT
)
2131 error("timer thread did not terminate timely");
2132 else if (rc
!= WAIT_OBJECT_0
)
2133 error("waiting for timer thread failed: %lu",
2135 CloseHandle(timer_thread
);
2138 CloseHandle(timer_event
);
2140 timer_thread
= NULL
;
2143 static inline int is_timeval_eq(const struct timeval
*i1
, const struct timeval
*i2
)
2145 return i1
->tv_sec
== i2
->tv_sec
&& i1
->tv_usec
== i2
->tv_usec
;
2148 int setitimer(int type
, struct itimerval
*in
, struct itimerval
*out
)
2150 static const struct timeval zero
;
2151 static int atexit_done
;
2154 return errno
= EINVAL
,
2155 error("setitimer param 3 != NULL not implemented");
2156 if (!is_timeval_eq(&in
->it_interval
, &zero
) &&
2157 !is_timeval_eq(&in
->it_interval
, &in
->it_value
))
2158 return errno
= EINVAL
,
2159 error("setitimer: it_interval must be zero or eq it_value");
2162 stop_timer_thread();
2164 if (is_timeval_eq(&in
->it_value
, &zero
) &&
2165 is_timeval_eq(&in
->it_interval
, &zero
))
2168 timer_interval
= in
->it_value
.tv_sec
* 1000 + in
->it_value
.tv_usec
/ 1000;
2169 one_shot
= is_timeval_eq(&in
->it_interval
, &zero
);
2171 atexit(stop_timer_thread
);
2174 return start_timer_thread();
2177 int sigaction(int sig
, struct sigaction
*in
, struct sigaction
*out
)
2180 return errno
= EINVAL
,
2181 error("sigaction only implemented for SIGALRM");
2183 return errno
= EINVAL
,
2184 error("sigaction: param 3 != NULL not implemented");
2186 timer_fn
= in
->sa_handler
;
2191 sig_handler_t
mingw_signal(int sig
, sig_handler_t handler
)
2203 sigint_fn
= handler
;
2207 return signal(sig
, handler
);
2214 int mingw_raise(int sig
)
2218 if (timer_fn
== SIG_DFL
) {
2219 if (isatty(STDERR_FILENO
))
2220 fputs("Alarm clock\n", stderr
);
2221 exit(128 + SIGALRM
);
2222 } else if (timer_fn
!= SIG_IGN
)
2227 if (sigint_fn
== SIG_DFL
)
2229 else if (sigint_fn
!= SIG_IGN
)
2238 int link(const char *oldpath
, const char *newpath
)
2240 wchar_t woldpath
[MAX_PATH
], wnewpath
[MAX_PATH
];
2241 if (xutftowcs_path(woldpath
, oldpath
) < 0 ||
2242 xutftowcs_path(wnewpath
, newpath
) < 0)
2245 if (!CreateHardLinkW(wnewpath
, woldpath
, NULL
)) {
2246 errno
= err_win_to_posix(GetLastError());
2252 pid_t
waitpid(pid_t pid
, int *status
, int options
)
2254 HANDLE h
= OpenProcess(SYNCHRONIZE
| PROCESS_QUERY_INFORMATION
,
2261 if (pid
> 0 && options
& WNOHANG
) {
2262 if (WAIT_OBJECT_0
!= WaitForSingleObject(h
, 0)) {
2266 options
&= ~WNOHANG
;
2270 struct pinfo_t
**ppinfo
;
2271 if (WaitForSingleObject(h
, INFINITE
) != WAIT_OBJECT_0
) {
2277 GetExitCodeProcess(h
, (LPDWORD
)status
);
2279 EnterCriticalSection(&pinfo_cs
);
2283 struct pinfo_t
*info
= *ppinfo
;
2284 if (info
->pid
== pid
) {
2285 CloseHandle(info
->proc
);
2286 *ppinfo
= info
->next
;
2290 ppinfo
= &info
->next
;
2293 LeaveCriticalSection(&pinfo_cs
);
2304 int mingw_has_dos_drive_prefix(const char *path
)
2309 * Does it start with an ASCII letter (i.e. highest bit not set),
2310 * followed by a colon?
2312 if (!(0x80 & (unsigned char)*path
))
2313 return *path
&& path
[1] == ':' ? 2 : 0;
2316 * While drive letters must be letters of the English alphabet, it is
2317 * possible to assign virtually _any_ Unicode character via `subst` as
2318 * a drive letter to "virtual drives". Even `1`, or `ä`. Or fun stuff
2321 * subst ֍: %USERPROFILE%\Desktop
2323 for (i
= 1; i
< 4 && (0x80 & (unsigned char)path
[i
]); i
++)
2324 ; /* skip first UTF-8 character */
2325 return path
[i
] == ':' ? i
+ 1 : 0;
2328 int mingw_skip_dos_drive_prefix(char **path
)
2330 int ret
= has_dos_drive_prefix(*path
);
2335 int mingw_offset_1st_component(const char *path
)
2337 char *pos
= (char *)path
;
2340 if (!skip_dos_drive_prefix(&pos
) &&
2341 is_dir_sep(pos
[0]) && is_dir_sep(pos
[1])) {
2342 /* skip server name */
2343 pos
= strpbrk(pos
+ 2, "\\/");
2345 return 0; /* Error: malformed unc path */
2349 } while (*pos
&& !is_dir_sep(*pos
));
2352 return pos
+ is_dir_sep(*pos
) - path
;
2355 int xutftowcsn(wchar_t *wcs
, const char *utfs
, size_t wcslen
, int utflen
)
2357 int upos
= 0, wpos
= 0;
2358 const unsigned char *utf
= (const unsigned char*) utfs
;
2359 if (!utf
|| !wcs
|| wcslen
< 1) {
2363 /* reserve space for \0 */
2368 while (upos
< utflen
) {
2369 int c
= utf
[upos
++] & 0xff;
2370 if (utflen
== INT_MAX
&& c
== 0)
2373 if (wpos
>= wcslen
) {
2382 } else if (c
>= 0xc2 && c
< 0xe0 && upos
< utflen
&&
2383 (utf
[upos
] & 0xc0) == 0x80) {
2385 c
= ((c
& 0x1f) << 6);
2386 c
|= (utf
[upos
++] & 0x3f);
2388 } else if (c
>= 0xe0 && c
< 0xf0 && upos
+ 1 < utflen
&&
2389 !(c
== 0xe0 && utf
[upos
] < 0xa0) && /* over-long encoding */
2390 (utf
[upos
] & 0xc0) == 0x80 &&
2391 (utf
[upos
+ 1] & 0xc0) == 0x80) {
2393 c
= ((c
& 0x0f) << 12);
2394 c
|= ((utf
[upos
++] & 0x3f) << 6);
2395 c
|= (utf
[upos
++] & 0x3f);
2397 } else if (c
>= 0xf0 && c
< 0xf5 && upos
+ 2 < utflen
&&
2398 wpos
+ 1 < wcslen
&&
2399 !(c
== 0xf0 && utf
[upos
] < 0x90) && /* over-long encoding */
2400 !(c
== 0xf4 && utf
[upos
] >= 0x90) && /* > \u10ffff */
2401 (utf
[upos
] & 0xc0) == 0x80 &&
2402 (utf
[upos
+ 1] & 0xc0) == 0x80 &&
2403 (utf
[upos
+ 2] & 0xc0) == 0x80) {
2404 /* 4-byte utf-8: convert to \ud8xx \udcxx surrogate pair */
2405 c
= ((c
& 0x07) << 18);
2406 c
|= ((utf
[upos
++] & 0x3f) << 12);
2407 c
|= ((utf
[upos
++] & 0x3f) << 6);
2408 c
|= (utf
[upos
++] & 0x3f);
2410 wcs
[wpos
++] = 0xd800 | (c
>> 10);
2411 wcs
[wpos
++] = 0xdc00 | (c
& 0x3ff);
2412 } else if (c
>= 0xa0) {
2413 /* invalid utf-8 byte, printable unicode char: convert 1:1 */
2416 /* invalid utf-8 byte, non-printable unicode: convert to hex */
2417 static const char *hex
= "0123456789abcdef";
2418 wcs
[wpos
++] = hex
[c
>> 4];
2420 wcs
[wpos
++] = hex
[c
& 0x0f];
2427 int xwcstoutf(char *utf
, const wchar_t *wcs
, size_t utflen
)
2429 if (!wcs
|| !utf
|| utflen
< 1) {
2433 utflen
= WideCharToMultiByte(CP_UTF8
, 0, wcs
, -1, utf
, utflen
, NULL
, NULL
);
2440 static void setup_windows_environment(void)
2442 char *tmp
= getenv("TMPDIR");
2444 /* on Windows it is TMP and TEMP */
2446 if (!(tmp
= getenv("TMP")))
2447 tmp
= getenv("TEMP");
2449 setenv("TMPDIR", tmp
, 1);
2450 tmp
= getenv("TMPDIR");
2456 * Convert all dir separators to forward slashes,
2457 * to help shell commands called from the Git
2458 * executable (by not mistaking the dir separators
2459 * for escape characters).
2461 convert_slashes(tmp
);
2464 /* simulate TERM to enable auto-color (see color.c) */
2465 if (!getenv("TERM"))
2466 setenv("TERM", "cygwin", 1);
2469 int is_valid_win32_path(const char *path
)
2471 int preceding_space_or_period
= 0, i
= 0, periods
= 0;
2476 skip_dos_drive_prefix((char **)&path
);
2482 case '/': case '\\':
2483 /* cannot end in ` ` or `.`, except for `.` and `..` */
2484 if (preceding_space_or_period
&&
2485 (i
!= periods
|| periods
> 2))
2490 i
= periods
= preceding_space_or_period
= 0;
2496 preceding_space_or_period
= 1;
2499 case ':': /* DOS drive prefix was already skipped */
2500 case '<': case '>': case '"': case '|': case '?': case '*':
2501 /* illegal character */
2504 if (c
> '\0' && c
< '\x20')
2505 /* illegal character */
2508 preceding_space_or_period
= 0;
2514 * Disable MSVCRT command line wildcard expansion (__getmainargs called from
2515 * mingw startup code, see init.c in mingw runtime).
2523 extern int __wgetmainargs(int *argc
, wchar_t ***argv
, wchar_t ***env
, int glob
,
2526 static NORETURN
void die_startup(void)
2528 fputs("fatal: not enough memory for initialization", stderr
);
2532 static void *malloc_startup(size_t size
)
2534 void *result
= malloc(size
);
2540 static char *wcstoutfdup_startup(char *buffer
, const wchar_t *wcs
, size_t len
)
2542 len
= xwcstoutf(buffer
, wcs
, len
) + 1;
2543 return memcpy(malloc_startup(len
), buffer
, len
);
2546 static void maybe_redirect_std_handle(const wchar_t *key
, DWORD std_id
, int fd
,
2547 DWORD desired_access
, DWORD flags
)
2549 DWORD create_flag
= fd
? OPEN_ALWAYS
: OPEN_EXISTING
;
2550 wchar_t buf
[MAX_PATH
];
2551 DWORD max
= ARRAY_SIZE(buf
);
2553 DWORD ret
= GetEnvironmentVariableW(key
, buf
, max
);
2555 if (!ret
|| ret
>= max
)
2558 /* make sure this does not leak into child processes */
2559 SetEnvironmentVariableW(key
, NULL
);
2560 if (!wcscmp(buf
, L
"off")) {
2562 handle
= GetStdHandle(std_id
);
2563 if (handle
!= INVALID_HANDLE_VALUE
)
2564 CloseHandle(handle
);
2567 if (std_id
== STD_ERROR_HANDLE
&& !wcscmp(buf
, L
"2>&1")) {
2568 handle
= GetStdHandle(STD_OUTPUT_HANDLE
);
2569 if (handle
== INVALID_HANDLE_VALUE
) {
2571 handle
= GetStdHandle(std_id
);
2572 if (handle
!= INVALID_HANDLE_VALUE
)
2573 CloseHandle(handle
);
2575 int new_fd
= _open_osfhandle((intptr_t)handle
, O_BINARY
);
2576 SetStdHandle(std_id
, handle
);
2578 /* do *not* close the new_fd: that would close stdout */
2582 handle
= CreateFileW(buf
, desired_access
, 0, NULL
, create_flag
,
2584 if (handle
!= INVALID_HANDLE_VALUE
) {
2585 int new_fd
= _open_osfhandle((intptr_t)handle
, O_BINARY
);
2586 SetStdHandle(std_id
, handle
);
2592 static void maybe_redirect_std_handles(void)
2594 maybe_redirect_std_handle(L
"GIT_REDIRECT_STDIN", STD_INPUT_HANDLE
, 0,
2595 GENERIC_READ
, FILE_ATTRIBUTE_NORMAL
);
2596 maybe_redirect_std_handle(L
"GIT_REDIRECT_STDOUT", STD_OUTPUT_HANDLE
, 1,
2597 GENERIC_WRITE
, FILE_ATTRIBUTE_NORMAL
);
2598 maybe_redirect_std_handle(L
"GIT_REDIRECT_STDERR", STD_ERROR_HANDLE
, 2,
2599 GENERIC_WRITE
, FILE_FLAG_NO_BUFFERING
);
2602 void mingw_startup(void)
2604 int i
, maxlen
, argc
;
2606 wchar_t **wenv
, **wargv
;
2609 maybe_redirect_std_handles();
2611 /* get wide char arguments and environment */
2613 if (__wgetmainargs(&argc
, &wargv
, &wenv
, _CRT_glob
, &si
) < 0)
2616 /* determine size of argv and environ conversion buffer */
2617 maxlen
= wcslen(wargv
[0]);
2618 for (i
= 1; i
< argc
; i
++)
2619 maxlen
= max(maxlen
, wcslen(wargv
[i
]));
2621 /* allocate buffer (wchar_t encodes to max 3 UTF-8 bytes) */
2622 maxlen
= 3 * maxlen
+ 1;
2623 buffer
= malloc_startup(maxlen
);
2625 /* convert command line arguments and environment to UTF-8 */
2626 for (i
= 0; i
< argc
; i
++)
2627 __argv
[i
] = wcstoutfdup_startup(buffer
, wargv
[i
], maxlen
);
2630 /* fix Windows specific environment settings */
2631 setup_windows_environment();
2633 unset_environment_variables
= xstrdup("PERL5LIB");
2635 /* initialize critical section for waitpid pinfo_t list */
2636 InitializeCriticalSection(&pinfo_cs
);
2638 /* set up default file mode and file modes for stdin/out/err */
2640 _setmode(_fileno(stdin
), _O_BINARY
);
2641 _setmode(_fileno(stdout
), _O_BINARY
);
2642 _setmode(_fileno(stderr
), _O_BINARY
);
2644 /* initialize Unicode console */
2648 int uname(struct utsname
*buf
)
2650 unsigned v
= (unsigned)GetVersion();
2651 memset(buf
, 0, sizeof(*buf
));
2652 xsnprintf(buf
->sysname
, sizeof(buf
->sysname
), "Windows");
2653 xsnprintf(buf
->release
, sizeof(buf
->release
),
2654 "%u.%u", v
& 0xff, (v
>> 8) & 0xff);
2655 /* assuming NT variants only.. */
2656 xsnprintf(buf
->version
, sizeof(buf
->version
),
2657 "%u", (v
>> 16) & 0x7fff);