1 #include "../git-compat-util.h"
6 #include "../run-command.h"
8 unsigned int _CRT_fmode
= _O_BINARY
;
9 static const int delay
[] = { 0, 1, 10, 20, 40 };
11 int err_win_to_posix(DWORD winerr
)
15 case ERROR_ACCESS_DENIED
: error
= EACCES
; break;
16 case ERROR_ACCOUNT_DISABLED
: error
= EACCES
; break;
17 case ERROR_ACCOUNT_RESTRICTION
: error
= EACCES
; break;
18 case ERROR_ALREADY_ASSIGNED
: error
= EBUSY
; break;
19 case ERROR_ALREADY_EXISTS
: error
= EEXIST
; break;
20 case ERROR_ARITHMETIC_OVERFLOW
: error
= ERANGE
; break;
21 case ERROR_BAD_COMMAND
: error
= EIO
; break;
22 case ERROR_BAD_DEVICE
: error
= ENODEV
; break;
23 case ERROR_BAD_DRIVER_LEVEL
: error
= ENXIO
; break;
24 case ERROR_BAD_EXE_FORMAT
: error
= ENOEXEC
; break;
25 case ERROR_BAD_FORMAT
: error
= ENOEXEC
; break;
26 case ERROR_BAD_LENGTH
: error
= EINVAL
; break;
27 case ERROR_BAD_PATHNAME
: error
= ENOENT
; break;
28 case ERROR_BAD_PIPE
: error
= EPIPE
; break;
29 case ERROR_BAD_UNIT
: error
= ENODEV
; break;
30 case ERROR_BAD_USERNAME
: error
= EINVAL
; break;
31 case ERROR_BROKEN_PIPE
: error
= EPIPE
; break;
32 case ERROR_BUFFER_OVERFLOW
: error
= ENAMETOOLONG
; break;
33 case ERROR_BUSY
: error
= EBUSY
; break;
34 case ERROR_BUSY_DRIVE
: error
= EBUSY
; break;
35 case ERROR_CALL_NOT_IMPLEMENTED
: error
= ENOSYS
; break;
36 case ERROR_CANNOT_MAKE
: error
= EACCES
; break;
37 case ERROR_CANTOPEN
: error
= EIO
; break;
38 case ERROR_CANTREAD
: error
= EIO
; break;
39 case ERROR_CANTWRITE
: error
= EIO
; break;
40 case ERROR_CRC
: error
= EIO
; break;
41 case ERROR_CURRENT_DIRECTORY
: error
= EACCES
; break;
42 case ERROR_DEVICE_IN_USE
: error
= EBUSY
; break;
43 case ERROR_DEV_NOT_EXIST
: error
= ENODEV
; break;
44 case ERROR_DIRECTORY
: error
= EINVAL
; break;
45 case ERROR_DIR_NOT_EMPTY
: error
= ENOTEMPTY
; break;
46 case ERROR_DISK_CHANGE
: error
= EIO
; break;
47 case ERROR_DISK_FULL
: error
= ENOSPC
; break;
48 case ERROR_DRIVE_LOCKED
: error
= EBUSY
; break;
49 case ERROR_ENVVAR_NOT_FOUND
: error
= EINVAL
; break;
50 case ERROR_EXE_MARKED_INVALID
: error
= ENOEXEC
; break;
51 case ERROR_FILENAME_EXCED_RANGE
: error
= ENAMETOOLONG
; break;
52 case ERROR_FILE_EXISTS
: error
= EEXIST
; break;
53 case ERROR_FILE_INVALID
: error
= ENODEV
; break;
54 case ERROR_FILE_NOT_FOUND
: error
= ENOENT
; break;
55 case ERROR_GEN_FAILURE
: error
= EIO
; break;
56 case ERROR_HANDLE_DISK_FULL
: error
= ENOSPC
; break;
57 case ERROR_INSUFFICIENT_BUFFER
: error
= ENOMEM
; break;
58 case ERROR_INVALID_ACCESS
: error
= EACCES
; break;
59 case ERROR_INVALID_ADDRESS
: error
= EFAULT
; break;
60 case ERROR_INVALID_BLOCK
: error
= EFAULT
; break;
61 case ERROR_INVALID_DATA
: error
= EINVAL
; break;
62 case ERROR_INVALID_DRIVE
: error
= ENODEV
; break;
63 case ERROR_INVALID_EXE_SIGNATURE
: error
= ENOEXEC
; break;
64 case ERROR_INVALID_FLAGS
: error
= EINVAL
; break;
65 case ERROR_INVALID_FUNCTION
: error
= ENOSYS
; break;
66 case ERROR_INVALID_HANDLE
: error
= EBADF
; break;
67 case ERROR_INVALID_LOGON_HOURS
: error
= EACCES
; break;
68 case ERROR_INVALID_NAME
: error
= EINVAL
; break;
69 case ERROR_INVALID_OWNER
: error
= EINVAL
; break;
70 case ERROR_INVALID_PARAMETER
: error
= EINVAL
; break;
71 case ERROR_INVALID_PASSWORD
: error
= EPERM
; break;
72 case ERROR_INVALID_PRIMARY_GROUP
: error
= EINVAL
; break;
73 case ERROR_INVALID_SIGNAL_NUMBER
: error
= EINVAL
; break;
74 case ERROR_INVALID_TARGET_HANDLE
: error
= EIO
; break;
75 case ERROR_INVALID_WORKSTATION
: error
= EACCES
; break;
76 case ERROR_IO_DEVICE
: error
= EIO
; break;
77 case ERROR_IO_INCOMPLETE
: error
= EINTR
; break;
78 case ERROR_LOCKED
: error
= EBUSY
; break;
79 case ERROR_LOCK_VIOLATION
: error
= EACCES
; break;
80 case ERROR_LOGON_FAILURE
: error
= EACCES
; break;
81 case ERROR_MAPPED_ALIGNMENT
: error
= EINVAL
; break;
82 case ERROR_META_EXPANSION_TOO_LONG
: error
= E2BIG
; break;
83 case ERROR_MORE_DATA
: error
= EPIPE
; break;
84 case ERROR_NEGATIVE_SEEK
: error
= ESPIPE
; break;
85 case ERROR_NOACCESS
: error
= EFAULT
; break;
86 case ERROR_NONE_MAPPED
: error
= EINVAL
; break;
87 case ERROR_NOT_ENOUGH_MEMORY
: error
= ENOMEM
; break;
88 case ERROR_NOT_READY
: error
= EAGAIN
; break;
89 case ERROR_NOT_SAME_DEVICE
: error
= EXDEV
; break;
90 case ERROR_NO_DATA
: error
= EPIPE
; break;
91 case ERROR_NO_MORE_SEARCH_HANDLES
: error
= EIO
; break;
92 case ERROR_NO_PROC_SLOTS
: error
= EAGAIN
; break;
93 case ERROR_NO_SUCH_PRIVILEGE
: error
= EACCES
; break;
94 case ERROR_OPEN_FAILED
: error
= EIO
; break;
95 case ERROR_OPEN_FILES
: error
= EBUSY
; break;
96 case ERROR_OPERATION_ABORTED
: error
= EINTR
; break;
97 case ERROR_OUTOFMEMORY
: error
= ENOMEM
; break;
98 case ERROR_PASSWORD_EXPIRED
: error
= EACCES
; break;
99 case ERROR_PATH_BUSY
: error
= EBUSY
; break;
100 case ERROR_PATH_NOT_FOUND
: error
= ENOENT
; break;
101 case ERROR_PIPE_BUSY
: error
= EBUSY
; break;
102 case ERROR_PIPE_CONNECTED
: error
= EPIPE
; break;
103 case ERROR_PIPE_LISTENING
: error
= EPIPE
; break;
104 case ERROR_PIPE_NOT_CONNECTED
: error
= EPIPE
; break;
105 case ERROR_PRIVILEGE_NOT_HELD
: error
= EACCES
; break;
106 case ERROR_READ_FAULT
: error
= EIO
; break;
107 case ERROR_SEEK
: error
= EIO
; break;
108 case ERROR_SEEK_ON_DEVICE
: error
= ESPIPE
; break;
109 case ERROR_SHARING_BUFFER_EXCEEDED
: error
= ENFILE
; break;
110 case ERROR_SHARING_VIOLATION
: error
= EACCES
; break;
111 case ERROR_STACK_OVERFLOW
: error
= ENOMEM
; break;
112 case ERROR_SWAPERROR
: error
= ENOENT
; break;
113 case ERROR_TOO_MANY_MODULES
: error
= EMFILE
; break;
114 case ERROR_TOO_MANY_OPEN_FILES
: error
= EMFILE
; break;
115 case ERROR_UNRECOGNIZED_MEDIA
: error
= ENXIO
; break;
116 case ERROR_UNRECOGNIZED_VOLUME
: error
= ENODEV
; break;
117 case ERROR_WAIT_NO_CHILDREN
: error
= ECHILD
; break;
118 case ERROR_WRITE_FAULT
: error
= EIO
; break;
119 case ERROR_WRITE_PROTECT
: error
= EROFS
; break;
124 static int make_hidden(const char *path
)
126 DWORD attribs
= GetFileAttributes(path
);
127 if (SetFileAttributes(path
, FILE_ATTRIBUTE_HIDDEN
| attribs
))
129 errno
= err_win_to_posix(GetLastError());
133 void mingw_mark_as_git_dir(const char *dir
)
135 if (hide_dotfiles
!= HIDE_DOTFILES_FALSE
&& !is_bare_repository() &&
137 warning("Failed to make '%s' hidden", dir
);
138 git_config_set("core.hideDotFiles",
139 hide_dotfiles
== HIDE_DOTFILES_FALSE
? "false" :
140 (hide_dotfiles
== HIDE_DOTFILES_DOTGITONLY
?
141 "dotGitOnly" : "true"));
145 int mingw_mkdir(const char *path
, int mode
)
147 int ret
= mkdir(path
);
148 if (!ret
&& hide_dotfiles
== HIDE_DOTFILES_TRUE
) {
150 * In Windows a file or dir starting with a dot is not
151 * automatically hidden. So lets mark it as hidden when
152 * such a directory is created.
154 const char *start
= basename((char*)path
);
156 return make_hidden(path
);
161 static int ask_user_yes_no(const char *format
, ...)
165 const char *retry_hook
[] = { NULL
, NULL
, NULL
};
168 if ((retry_hook
[0] = getenv("GIT_ASK_YESNO"))) {
170 va_start(args
, format
);
171 vsnprintf(question
, sizeof(question
), format
, args
);
174 retry_hook
[1] = question
;
175 return !run_command_v_opt(retry_hook
, 0);
178 if (!isatty(_fileno(stdin
)) || !isatty(_fileno(stderr
)))
182 va_start(args
, format
);
183 vfprintf(stderr
, format
, args
);
185 fprintf(stderr
, " (y/n)? ");
187 if (fgets(answer
, sizeof(answer
), stdin
)) {
188 /* remove the newline */
189 if (answer
[strlen(answer
)-2] == '\r')
190 answer
[strlen(answer
)-2] = '\0';
191 if (answer
[strlen(answer
)-1] == '\n')
192 answer
[strlen(answer
)-1] = '\0';
196 if (answer
[0] == 'y' && strlen(answer
) == 1)
198 if (!strncasecmp(answer
, "yes", sizeof(answer
)))
200 if (answer
[0] == 'n' && strlen(answer
) == 1)
202 if (!strncasecmp(answer
, "no", sizeof(answer
)))
204 fprintf(stderr
, "I did not understand your answer: '%s'\n",
210 int mingw_unlink(const char *pathname
)
214 /* read-only files cannot be removed */
215 chmod(pathname
, 0666);
216 while ((ret
= unlink(pathname
)) == -1 && tries
< ARRAY_SIZE(delay
)) {
220 * We assume that some other process had the source or
221 * destination file open at the wrong moment and retry.
222 * In order to give the other process a higher chance to
223 * complete its operation, we give up our time slice now.
224 * If we have to retry again, we do sleep a bit.
229 while (ret
== -1 && errno
== EACCES
&&
230 ask_user_yes_no("Unlink of file '%s' failed. "
231 "Should I try again?", pathname
))
232 ret
= unlink(pathname
);
236 static int is_dir_empty(const char *path
)
238 struct strbuf buf
= STRBUF_INIT
;
239 WIN32_FIND_DATAA findbuf
;
242 strbuf_addf(&buf
, "%s\\*", path
);
243 handle
= FindFirstFileA(buf
.buf
, &findbuf
);
244 if (handle
== INVALID_HANDLE_VALUE
) {
245 strbuf_release(&buf
);
246 return GetLastError() == ERROR_NO_MORE_FILES
;
249 while (!strcmp(findbuf
.cFileName
, ".") ||
250 !strcmp(findbuf
.cFileName
, ".."))
251 if (!FindNextFile(handle
, &findbuf
)) {
252 strbuf_release(&buf
);
253 return GetLastError() == ERROR_NO_MORE_FILES
;
256 strbuf_release(&buf
);
261 int mingw_rmdir(const char *pathname
)
265 while ((ret
= rmdir(pathname
)) == -1 && tries
< ARRAY_SIZE(delay
)) {
268 if (!is_dir_empty(pathname
)) {
273 * We assume that some other process had the source or
274 * destination file open at the wrong moment and retry.
275 * In order to give the other process a higher chance to
276 * complete its operation, we give up our time slice now.
277 * If we have to retry again, we do sleep a bit.
282 while (ret
== -1 && errno
== EACCES
&&
283 ask_user_yes_no("Deletion of directory '%s' failed. "
284 "Should I try again?", pathname
))
285 ret
= rmdir(pathname
);
290 int mingw_open (const char *filename
, int oflags
, ...)
296 va_start(args
, oflags
);
297 mode
= va_arg(args
, int);
300 if (filename
&& !strcmp(filename
, "/dev/null"))
303 fd
= open(filename
, oflags
, mode
);
305 if (fd
< 0 && (oflags
& O_CREAT
) && errno
== EACCES
) {
306 DWORD attrs
= GetFileAttributes(filename
);
307 if (attrs
!= INVALID_FILE_ATTRIBUTES
&& (attrs
& FILE_ATTRIBUTE_DIRECTORY
))
310 if ((oflags
& O_CREAT
) && fd
>= 0 &&
311 hide_dotfiles
== HIDE_DOTFILES_TRUE
) {
313 * In Windows a file or dir starting with a dot is not
314 * automatically hidden. So lets mark it as hidden when
315 * such a file is created.
317 const char *start
= basename((char*)filename
);
318 if (*start
== '.' && make_hidden(filename
))
319 warning("Could not mark '%s' as hidden.", filename
);
325 ssize_t
mingw_write(int fd
, const void *buf
, size_t count
)
328 * While write() calls to a file on a local disk are translated
329 * into WriteFile() calls with a maximum size of 64KB on Windows
330 * XP and 256KB on Vista, no such cap is placed on writes to
331 * files over the network on Windows XP. Unfortunately, there
332 * seems to be a limit of 32MB-28KB on X64 and 64MB-32KB on x86;
333 * bigger writes fail on Windows XP.
334 * So we cap to a nice 31MB here to avoid write failures over
335 * the net without changing the number of WriteFile() calls in
338 return write(fd
, buf
, min(count
, 31 * 1024 * 1024));
342 FILE *mingw_fopen (const char *filename
, const char *otype
)
346 if (hide_dotfiles
== HIDE_DOTFILES_TRUE
&&
347 basename((char*)filename
)[0] == '.')
348 hide
= access(filename
, F_OK
);
349 if (filename
&& !strcmp(filename
, "/dev/null"))
351 file
= fopen(filename
, otype
);
352 if (file
&& hide
&& make_hidden(filename
))
353 warning("Could not mark '%s' as hidden.", filename
);
358 FILE *mingw_freopen (const char *filename
, const char *otype
, FILE *stream
)
362 if (hide_dotfiles
== HIDE_DOTFILES_TRUE
&&
363 basename((char*)filename
)[0] == '.')
364 hide
= access(filename
, F_OK
);
365 if (filename
&& !strcmp(filename
, "/dev/null"))
367 file
= freopen(filename
, otype
, stream
);
368 if (file
&& hide
&& make_hidden(filename
))
369 warning("Could not mark '%s' as hidden.", filename
);
374 * The unit of FILETIME is 100-nanoseconds since January 1, 1601, UTC.
375 * Returns the 100-nanoseconds ("hekto nanoseconds") since the epoch.
377 static inline long long filetime_to_hnsec(const FILETIME
*ft
)
379 long long winTime
= ((long long)ft
->dwHighDateTime
<< 32) + ft
->dwLowDateTime
;
380 /* Windows to Unix Epoch conversion */
381 return winTime
- 116444736000000000LL;
384 static inline time_t filetime_to_time_t(const FILETIME
*ft
)
386 return (time_t)(filetime_to_hnsec(ft
) / 10000000);
389 /* We keep the do_lstat code in a separate function to avoid recursion.
390 * When a path ends with a slash, the stat will fail with ENOENT. In
391 * this case, we strip the trailing slashes and stat again.
393 * If follow is true then act like stat() and report on the link
394 * target. Otherwise report on the link itself.
396 static int do_lstat(int follow
, const char *file_name
, struct stat
*buf
)
399 WIN32_FILE_ATTRIBUTE_DATA fdata
;
401 if (!(err
= get_file_attr(file_name
, &fdata
))) {
406 buf
->st_mode
= file_attr_to_st_mode(fdata
.dwFileAttributes
);
407 buf
->st_size
= fdata
.nFileSizeLow
|
408 (((off_t
)fdata
.nFileSizeHigh
)<<32);
409 buf
->st_dev
= buf
->st_rdev
= 0; /* not used by Git */
410 buf
->st_atime
= filetime_to_time_t(&(fdata
.ftLastAccessTime
));
411 buf
->st_mtime
= filetime_to_time_t(&(fdata
.ftLastWriteTime
));
412 buf
->st_ctime
= filetime_to_time_t(&(fdata
.ftCreationTime
));
413 if (fdata
.dwFileAttributes
& FILE_ATTRIBUTE_REPARSE_POINT
) {
414 WIN32_FIND_DATAA findbuf
;
415 HANDLE handle
= FindFirstFileA(file_name
, &findbuf
);
416 if (handle
!= INVALID_HANDLE_VALUE
) {
417 if ((findbuf
.dwFileAttributes
& FILE_ATTRIBUTE_REPARSE_POINT
) &&
418 (findbuf
.dwReserved0
== IO_REPARSE_TAG_SYMLINK
)) {
420 char buffer
[MAXIMUM_REPARSE_DATA_BUFFER_SIZE
];
421 buf
->st_size
= readlink(file_name
, buffer
, MAXIMUM_REPARSE_DATA_BUFFER_SIZE
);
423 buf
->st_mode
= S_IFLNK
;
425 buf
->st_mode
|= S_IREAD
;
426 if (!(findbuf
.dwFileAttributes
& FILE_ATTRIBUTE_READONLY
))
427 buf
->st_mode
|= S_IWRITE
;
438 /* We provide our own lstat/fstat functions, since the provided
439 * lstat/fstat functions are so slow. These stat functions are
440 * tailored for Git's usage (read: fast), and are not meant to be
441 * complete. Note that Git stat()s are redirected to mingw_lstat()
442 * too, since Windows doesn't really handle symlinks that well.
444 static int do_stat_internal(int follow
, const char *file_name
, struct stat
*buf
)
447 static char alt_name
[PATH_MAX
];
449 if (!do_lstat(follow
, file_name
, buf
))
452 /* if file_name ended in a '/', Windows returned ENOENT;
453 * try again without trailing slashes
458 namelen
= strlen(file_name
);
459 if (namelen
&& file_name
[namelen
-1] != '/')
461 while (namelen
&& file_name
[namelen
-1] == '/')
463 if (!namelen
|| namelen
>= PATH_MAX
)
466 memcpy(alt_name
, file_name
, namelen
);
467 alt_name
[namelen
] = 0;
468 return do_lstat(follow
, alt_name
, buf
);
471 int mingw_lstat(const char *file_name
, struct stat
*buf
)
473 return do_stat_internal(0, file_name
, buf
);
475 int mingw_stat(const char *file_name
, struct stat
*buf
)
477 return do_stat_internal(1, file_name
, buf
);
481 int mingw_fstat(int fd
, struct stat
*buf
)
483 HANDLE fh
= (HANDLE
)_get_osfhandle(fd
);
484 BY_HANDLE_FILE_INFORMATION fdata
;
486 if (fh
== INVALID_HANDLE_VALUE
) {
490 /* direct non-file handles to MS's fstat() */
491 if (GetFileType(fh
) != FILE_TYPE_DISK
)
492 return _fstati64(fd
, buf
);
494 if (GetFileInformationByHandle(fh
, &fdata
)) {
499 buf
->st_mode
= file_attr_to_st_mode(fdata
.dwFileAttributes
);
500 buf
->st_size
= fdata
.nFileSizeLow
|
501 (((off_t
)fdata
.nFileSizeHigh
)<<32);
502 buf
->st_dev
= buf
->st_rdev
= 0; /* not used by Git */
503 buf
->st_atime
= filetime_to_time_t(&(fdata
.ftLastAccessTime
));
504 buf
->st_mtime
= filetime_to_time_t(&(fdata
.ftLastWriteTime
));
505 buf
->st_ctime
= filetime_to_time_t(&(fdata
.ftCreationTime
));
512 static inline void time_t_to_filetime(time_t t
, FILETIME
*ft
)
514 long long winTime
= t
* 10000000LL + 116444736000000000LL;
515 ft
->dwLowDateTime
= winTime
;
516 ft
->dwHighDateTime
= winTime
>> 32;
519 int mingw_utime (const char *file_name
, const struct utimbuf
*times
)
524 /* must have write permission */
525 DWORD attrs
= GetFileAttributes(file_name
);
526 if (attrs
!= INVALID_FILE_ATTRIBUTES
&&
527 (attrs
& FILE_ATTRIBUTE_READONLY
)) {
528 /* ignore errors here; open() will report them */
529 SetFileAttributes(file_name
, attrs
& ~FILE_ATTRIBUTE_READONLY
);
532 if ((fh
= open(file_name
, O_RDWR
| O_BINARY
)) < 0) {
538 time_t_to_filetime(times
->modtime
, &mft
);
539 time_t_to_filetime(times
->actime
, &aft
);
541 GetSystemTimeAsFileTime(&mft
);
544 if (!SetFileTime((HANDLE
)_get_osfhandle(fh
), NULL
, &aft
, &mft
)) {
552 if (attrs
!= INVALID_FILE_ATTRIBUTES
&&
553 (attrs
& FILE_ATTRIBUTE_READONLY
)) {
554 /* ignore errors again */
555 SetFileAttributes(file_name
, attrs
);
560 unsigned int sleep (unsigned int seconds
)
566 int mkstemp(char *template)
568 char *filename
= mktemp(template);
569 if (filename
== NULL
)
571 return open(filename
, O_RDWR
| O_CREAT
, 0600);
574 int gettimeofday(struct timeval
*tv
, void *tz
)
579 GetSystemTimeAsFileTime(&ft
);
580 hnsec
= filetime_to_hnsec(&ft
);
581 tv
->tv_sec
= hnsec
/ 10000000;
582 tv
->tv_usec
= (hnsec
% 10000000) / 10;
586 int pipe(int filedes
[2])
590 /* this creates non-inheritable handles */
591 if (!CreatePipe(&h
[0], &h
[1], NULL
, 8192)) {
592 errno
= err_win_to_posix(GetLastError());
595 filedes
[0] = _open_osfhandle((int)h
[0], O_NOINHERIT
);
596 if (filedes
[0] < 0) {
601 filedes
[1] = _open_osfhandle((int)h
[1], O_NOINHERIT
);
602 if (filedes
[0] < 0) {
610 struct tm
*gmtime_r(const time_t *timep
, struct tm
*result
)
612 /* gmtime() in MSVCRT.DLL is thread-safe, but not reentrant */
613 memcpy(result
, gmtime(timep
), sizeof(struct tm
));
617 struct tm
*localtime_r(const time_t *timep
, struct tm
*result
)
619 /* localtime() in MSVCRT.DLL is thread-safe, but not reentrant */
620 memcpy(result
, localtime(timep
), sizeof(struct tm
));
625 char *mingw_getcwd(char *pointer
, int len
)
628 char *ret
= getcwd(pointer
, len
);
631 for (i
= 0; pointer
[i
]; i
++)
632 if (pointer
[i
] == '\\')
638 char *mingw_getenv(const char *name
)
640 char *result
= getenv(name
);
642 if (!strcmp(name
, "TMPDIR")) {
643 /* on Windows it is TMP and TEMP */
644 result
= getenv("TMP");
646 result
= getenv("TEMP");
647 } else if (!strcmp(name
, "TERM")) {
648 /* simulate TERM to enable auto-color (see color.c) */
656 * See http://msdn2.microsoft.com/en-us/library/17w5ykft(vs.71).aspx
657 * (Parsing C++ Command-Line Arguments)
659 static const char *quote_arg(const char *arg
)
661 /* count chars to quote */
663 int force_quotes
= 0;
666 if (!*p
) force_quotes
= 1;
668 if (isspace(*p
) || *p
== '*' || *p
== '?' || *p
== '{' || *p
== '\'')
672 else if (*p
== '\\') {
686 if (!force_quotes
&& n
== 0)
689 /* insert \ where necessary */
690 d
= q
= xmalloc(len
+n
+3);
695 else if (*arg
== '\\') {
697 while (*arg
== '\\') {
714 static const char *parse_interpreter(const char *cmd
)
716 static char buf
[100];
720 /* don't even try a .exe */
722 if (n
>= 4 && !strcasecmp(cmd
+n
-4, ".exe"))
725 fd
= open(cmd
, O_RDONLY
);
728 n
= read(fd
, buf
, sizeof(buf
)-1);
730 if (n
< 4) /* at least '#!/x' and not error */
733 if (buf
[0] != '#' || buf
[1] != '!')
736 p
= buf
+ strcspn(buf
, "\r\n");
741 if (!(p
= strrchr(buf
+2, '/')) && !(p
= strrchr(buf
+2, '\\')))
744 if ((opt
= strchr(p
+1, ' ')))
750 * Splits the PATH into parts.
752 static char **get_path_split(void)
754 char *p
, **path
, *envpath
= getenv("PATH");
757 if (!envpath
|| !*envpath
)
760 envpath
= xstrdup(envpath
);
766 if (*dir
) { /* not earlier, catches series of ; */
773 path
= xmalloc((n
+1)*sizeof(char *));
778 path
[i
++] = xstrdup(p
);
788 static void free_path_split(char **path
)
801 * exe_only means that we only want to detect .exe files, but not scripts
802 * (which do not have an extension)
804 static char *lookup_prog(const char *dir
, const char *cmd
, int isexe
, int exe_only
)
807 snprintf(path
, sizeof(path
), "%s/%s.exe", dir
, cmd
);
809 if (!isexe
&& access(path
, F_OK
) == 0)
810 return xstrdup(path
);
811 path
[strlen(path
)-4] = '\0';
812 if ((!exe_only
|| isexe
) && access(path
, F_OK
) == 0)
813 if (!(GetFileAttributes(path
) & FILE_ATTRIBUTE_DIRECTORY
))
814 return xstrdup(path
);
819 * Determines the absolute path of cmd using the split path in path.
820 * If cmd contains a slash or backslash, no lookup is performed.
822 static char *path_lookup(const char *cmd
, char **path
, int exe_only
)
825 int len
= strlen(cmd
);
826 int isexe
= len
>= 4 && !strcasecmp(cmd
+len
-4, ".exe");
828 if (strchr(cmd
, '/') || strchr(cmd
, '\\'))
831 while (!prog
&& *path
)
832 prog
= lookup_prog(*path
++, cmd
, isexe
, exe_only
);
837 static int env_compare(const void *a
, const void *b
)
841 return strcasecmp(*ea
, *eb
);
845 struct pinfo_t
*next
;
849 struct pinfo_t
*pinfo
= NULL
;
850 CRITICAL_SECTION pinfo_cs
;
852 static pid_t
mingw_spawnve_fd(const char *cmd
, const char **argv
, char **env
,
854 int prepend_cmd
, int fhin
, int fhout
, int fherr
)
857 PROCESS_INFORMATION pi
;
858 struct strbuf envblk
, args
;
862 /* Determine whether or not we are associated to a console */
863 HANDLE cons
= CreateFile("CONOUT$", GENERIC_WRITE
,
864 FILE_SHARE_WRITE
, NULL
, OPEN_EXISTING
,
865 FILE_ATTRIBUTE_NORMAL
, NULL
);
866 if (cons
== INVALID_HANDLE_VALUE
) {
867 /* There is no console associated with this process.
868 * Since the child is a console process, Windows
869 * would normally create a console window. But
870 * since we'll be redirecting std streams, we do
871 * not need the console.
872 * It is necessary to use DETACHED_PROCESS
873 * instead of CREATE_NO_WINDOW to make ssh
874 * recognize that it has no console.
876 flags
= DETACHED_PROCESS
;
878 /* There is already a console. If we specified
879 * DETACHED_PROCESS here, too, Windows would
880 * disassociate the child from the console.
881 * The same is true for CREATE_NO_WINDOW.
887 memset(&si
, 0, sizeof(si
));
889 si
.dwFlags
= STARTF_USESTDHANDLES
;
890 si
.hStdInput
= (HANDLE
) _get_osfhandle(fhin
);
891 si
.hStdOutput
= (HANDLE
) _get_osfhandle(fhout
);
892 si
.hStdError
= (HANDLE
) _get_osfhandle(fherr
);
894 /* concatenate argv, quoting args as we go */
895 strbuf_init(&args
, 0);
897 char *quoted
= (char *)quote_arg(cmd
);
898 strbuf_addstr(&args
, quoted
);
902 for (; *argv
; argv
++) {
903 char *quoted
= (char *)quote_arg(*argv
);
905 strbuf_addch(&args
, ' ');
906 strbuf_addstr(&args
, quoted
);
913 char **e
, **sorted_env
;
915 for (e
= env
; *e
; e
++)
918 /* environment must be sorted */
919 sorted_env
= xmalloc(sizeof(*sorted_env
) * (count
+ 1));
920 memcpy(sorted_env
, env
, sizeof(*sorted_env
) * (count
+ 1));
921 qsort(sorted_env
, count
, sizeof(*sorted_env
), env_compare
);
923 strbuf_init(&envblk
, 0);
924 for (e
= sorted_env
; *e
; e
++) {
925 strbuf_addstr(&envblk
, *e
);
926 strbuf_addch(&envblk
, '\0');
931 memset(&pi
, 0, sizeof(pi
));
932 ret
= CreateProcess(cmd
, args
.buf
, NULL
, NULL
, TRUE
, flags
,
933 env
? envblk
.buf
: NULL
, dir
, &si
, &pi
);
936 strbuf_release(&envblk
);
937 strbuf_release(&args
);
943 CloseHandle(pi
.hThread
);
946 * The process ID is the human-readable identifier of the process
947 * that we want to present in log and error messages. The handle
948 * is not useful for this purpose. But we cannot close it, either,
949 * because it is not possible to turn a process ID into a process
950 * handle after the process terminated.
951 * Keep the handle in a list for waitpid.
953 EnterCriticalSection(&pinfo_cs
);
955 struct pinfo_t
*info
= xmalloc(sizeof(struct pinfo_t
));
956 info
->pid
= pi
.dwProcessId
;
957 info
->proc
= pi
.hProcess
;
961 LeaveCriticalSection(&pinfo_cs
);
963 return (pid_t
)pi
.dwProcessId
;
966 static pid_t
mingw_spawnve(const char *cmd
, const char **argv
, char **env
,
969 return mingw_spawnve_fd(cmd
, argv
, env
, NULL
, prepend_cmd
, 0, 1, 2);
972 pid_t
mingw_spawnvpe(const char *cmd
, const char **argv
, char **env
,
974 int fhin
, int fhout
, int fherr
)
977 char **path
= get_path_split();
978 char *prog
= path_lookup(cmd
, path
, 0);
985 const char *interpr
= parse_interpreter(prog
);
988 const char *argv0
= argv
[0];
989 char *iprog
= path_lookup(interpr
, path
, 1);
996 pid
= mingw_spawnve_fd(iprog
, argv
, env
, dir
, 1,
1003 pid
= mingw_spawnve_fd(prog
, argv
, env
, dir
, 0,
1004 fhin
, fhout
, fherr
);
1007 free_path_split(path
);
1011 static int try_shell_exec(const char *cmd
, char *const *argv
, char **env
)
1013 const char *interpr
= parse_interpreter(cmd
);
1020 path
= get_path_split();
1021 prog
= path_lookup(interpr
, path
, 1);
1025 while (argv
[argc
]) argc
++;
1026 argv2
= xmalloc(sizeof(*argv
) * (argc
+1));
1027 argv2
[0] = (char *)cmd
; /* full path to the script file */
1028 memcpy(&argv2
[1], &argv
[1], sizeof(*argv
) * argc
);
1029 pid
= mingw_spawnve(prog
, argv2
, env
, 1);
1032 if (waitpid(pid
, &status
, 0) < 0)
1036 pid
= 1; /* indicate that we tried but failed */
1040 free_path_split(path
);
1044 static void mingw_execve(const char *cmd
, char *const *argv
, char *const *env
)
1046 /* check if git_command is a shell script */
1047 if (!try_shell_exec(cmd
, argv
, (char **)env
)) {
1050 pid
= mingw_spawnve(cmd
, (const char **)argv
, (char **)env
, 0);
1053 if (waitpid(pid
, &status
, 0) < 0)
1059 void mingw_execvp(const char *cmd
, char *const *argv
)
1061 char **path
= get_path_split();
1062 char *prog
= path_lookup(cmd
, path
, 0);
1065 mingw_execve(prog
, argv
, environ
);
1070 free_path_split(path
);
1073 void mingw_execv(const char *cmd
, char *const *argv
)
1075 mingw_execve(cmd
, argv
, environ
);
1078 int mingw_kill(pid_t pid
, int sig
)
1080 if (pid
> 0 && sig
== SIGTERM
) {
1081 HANDLE h
= OpenProcess(PROCESS_TERMINATE
, FALSE
, pid
);
1083 if (TerminateProcess(h
, -1)) {
1088 errno
= err_win_to_posix(GetLastError());
1097 static char **copy_environ(void)
1103 env
= xmalloc((i
+1)*sizeof(*env
));
1104 for (i
= 0; environ
[i
]; i
++)
1105 env
[i
] = xstrdup(environ
[i
]);
1110 void free_environ(char **env
)
1113 for (i
= 0; env
[i
]; i
++)
1118 static int lookup_env(char **env
, const char *name
, size_t nmln
)
1122 for (i
= 0; env
[i
]; i
++) {
1123 if (0 == strncmp(env
[i
], name
, nmln
)
1124 && '=' == env
[i
][nmln
])
1132 * If name contains '=', then sets the variable, otherwise it unsets it
1134 static char **env_setenv(char **env
, const char *name
)
1136 char *eq
= strchrnul(name
, '=');
1137 int i
= lookup_env(env
, name
, eq
-name
);
1141 for (i
= 0; env
[i
]; i
++)
1143 env
= xrealloc(env
, (i
+2)*sizeof(*env
));
1144 env
[i
] = xstrdup(name
);
1151 env
[i
] = xstrdup(name
);
1160 * Copies global environ and adjusts variables as specified by vars.
1162 char **make_augmented_environ(const char *const *vars
)
1164 char **env
= copy_environ();
1167 env
= env_setenv(env
, *vars
++);
1172 * Note, this isn't a complete replacement for getaddrinfo. It assumes
1173 * that service contains a numerical port, or that it it is null. It
1174 * does a simple search using gethostbyname, and returns one IPv4 host
1177 static int WSAAPI
getaddrinfo_stub(const char *node
, const char *service
,
1178 const struct addrinfo
*hints
,
1179 struct addrinfo
**res
)
1181 struct hostent
*h
= NULL
;
1182 struct addrinfo
*ai
;
1183 struct sockaddr_in
*sin
;
1186 h
= gethostbyname(node
);
1188 return WSAGetLastError();
1191 ai
= xmalloc(sizeof(struct addrinfo
));
1194 ai
->ai_family
= AF_INET
;
1195 ai
->ai_socktype
= hints
? hints
->ai_socktype
: 0;
1196 switch (ai
->ai_socktype
) {
1198 ai
->ai_protocol
= IPPROTO_TCP
;
1201 ai
->ai_protocol
= IPPROTO_UDP
;
1204 ai
->ai_protocol
= 0;
1207 ai
->ai_addrlen
= sizeof(struct sockaddr_in
);
1208 if (hints
&& (hints
->ai_flags
& AI_CANONNAME
))
1209 ai
->ai_canonname
= h
? strdup(h
->h_name
) : NULL
;
1211 ai
->ai_canonname
= NULL
;
1213 sin
= xmalloc(ai
->ai_addrlen
);
1214 memset(sin
, 0, ai
->ai_addrlen
);
1215 sin
->sin_family
= AF_INET
;
1216 /* Note: getaddrinfo is supposed to allow service to be a string,
1217 * which should be looked up using getservbyname. This is
1218 * currently not implemented */
1220 sin
->sin_port
= htons(atoi(service
));
1222 sin
->sin_addr
= *(struct in_addr
*)h
->h_addr
;
1223 else if (hints
&& (hints
->ai_flags
& AI_PASSIVE
))
1224 sin
->sin_addr
.s_addr
= INADDR_ANY
;
1226 sin
->sin_addr
.s_addr
= INADDR_LOOPBACK
;
1227 ai
->ai_addr
= (struct sockaddr
*)sin
;
1232 static void WSAAPI
freeaddrinfo_stub(struct addrinfo
*res
)
1234 free(res
->ai_canonname
);
1239 static int WSAAPI
getnameinfo_stub(const struct sockaddr
*sa
, socklen_t salen
,
1240 char *host
, DWORD hostlen
,
1241 char *serv
, DWORD servlen
, int flags
)
1243 const struct sockaddr_in
*sin
= (const struct sockaddr_in
*)sa
;
1244 if (sa
->sa_family
!= AF_INET
)
1249 if (host
&& hostlen
> 0) {
1250 struct hostent
*ent
= NULL
;
1251 if (!(flags
& NI_NUMERICHOST
))
1252 ent
= gethostbyaddr((const char *)&sin
->sin_addr
,
1253 sizeof(sin
->sin_addr
), AF_INET
);
1256 snprintf(host
, hostlen
, "%s", ent
->h_name
);
1257 else if (flags
& NI_NAMEREQD
)
1260 snprintf(host
, hostlen
, "%s", inet_ntoa(sin
->sin_addr
));
1263 if (serv
&& servlen
> 0) {
1264 struct servent
*ent
= NULL
;
1265 if (!(flags
& NI_NUMERICSERV
))
1266 ent
= getservbyport(sin
->sin_port
,
1267 flags
& NI_DGRAM
? "udp" : "tcp");
1270 snprintf(serv
, servlen
, "%s", ent
->s_name
);
1272 snprintf(serv
, servlen
, "%d", ntohs(sin
->sin_port
));
1278 static HMODULE ipv6_dll
= NULL
;
1279 static void (WSAAPI
*ipv6_freeaddrinfo
)(struct addrinfo
*res
);
1280 static int (WSAAPI
*ipv6_getaddrinfo
)(const char *node
, const char *service
,
1281 const struct addrinfo
*hints
,
1282 struct addrinfo
**res
);
1283 static int (WSAAPI
*ipv6_getnameinfo
)(const struct sockaddr
*sa
, socklen_t salen
,
1284 char *host
, DWORD hostlen
,
1285 char *serv
, DWORD servlen
, int flags
);
1287 * gai_strerror is an inline function in the ws2tcpip.h header, so we
1288 * don't need to try to load that one dynamically.
1291 static void socket_cleanup(void)
1295 FreeLibrary(ipv6_dll
);
1297 ipv6_freeaddrinfo
= freeaddrinfo_stub
;
1298 ipv6_getaddrinfo
= getaddrinfo_stub
;
1299 ipv6_getnameinfo
= getnameinfo_stub
;
1302 static void ensure_socket_initialization(void)
1305 static int initialized
= 0;
1306 const char *libraries
[] = { "ws2_32.dll", "wship6.dll", NULL
};
1312 if (WSAStartup(MAKEWORD(2,2), &wsa
))
1313 die("unable to initialize winsock subsystem, error %d",
1316 for (name
= libraries
; *name
; name
++) {
1317 ipv6_dll
= LoadLibrary(*name
);
1321 ipv6_freeaddrinfo
= (void (WSAAPI
*)(struct addrinfo
*))
1322 GetProcAddress(ipv6_dll
, "freeaddrinfo");
1323 ipv6_getaddrinfo
= (int (WSAAPI
*)(const char *, const char *,
1324 const struct addrinfo
*,
1325 struct addrinfo
**))
1326 GetProcAddress(ipv6_dll
, "getaddrinfo");
1327 ipv6_getnameinfo
= (int (WSAAPI
*)(const struct sockaddr
*,
1328 socklen_t
, char *, DWORD
,
1329 char *, DWORD
, int))
1330 GetProcAddress(ipv6_dll
, "getnameinfo");
1331 if (!ipv6_freeaddrinfo
|| !ipv6_getaddrinfo
|| !ipv6_getnameinfo
) {
1332 FreeLibrary(ipv6_dll
);
1337 if (!ipv6_freeaddrinfo
|| !ipv6_getaddrinfo
|| !ipv6_getnameinfo
) {
1338 ipv6_freeaddrinfo
= freeaddrinfo_stub
;
1339 ipv6_getaddrinfo
= getaddrinfo_stub
;
1340 ipv6_getnameinfo
= getnameinfo_stub
;
1343 atexit(socket_cleanup
);
1347 #undef gethostbyname
1348 struct hostent
*mingw_gethostbyname(const char *host
)
1350 ensure_socket_initialization();
1351 return gethostbyname(host
);
1354 void mingw_freeaddrinfo(struct addrinfo
*res
)
1356 ipv6_freeaddrinfo(res
);
1359 int mingw_getaddrinfo(const char *node
, const char *service
,
1360 const struct addrinfo
*hints
, struct addrinfo
**res
)
1362 ensure_socket_initialization();
1363 return ipv6_getaddrinfo(node
, service
, hints
, res
);
1366 int mingw_getnameinfo(const struct sockaddr
*sa
, socklen_t salen
,
1367 char *host
, DWORD hostlen
, char *serv
, DWORD servlen
,
1370 ensure_socket_initialization();
1371 return ipv6_getnameinfo(sa
, salen
, host
, hostlen
, serv
, servlen
, flags
);
1374 int mingw_socket(int domain
, int type
, int protocol
)
1379 ensure_socket_initialization();
1380 s
= WSASocket(domain
, type
, protocol
, NULL
, 0, 0);
1381 if (s
== INVALID_SOCKET
) {
1383 * WSAGetLastError() values are regular BSD error codes
1384 * biased by WSABASEERR.
1385 * However, strerror() does not know about networking
1386 * specific errors, which are values beginning at 38 or so.
1387 * Therefore, we choose to leave the biased error code
1388 * in errno so that _if_ someone looks up the code somewhere,
1389 * then it is at least the number that are usually listed.
1391 errno
= WSAGetLastError();
1394 /* convert into a file descriptor */
1395 if ((sockfd
= _open_osfhandle(s
, O_RDWR
|O_BINARY
)) < 0) {
1397 return error("unable to make a socket file descriptor: %s",
1404 int mingw_connect(int sockfd
, struct sockaddr
*sa
, size_t sz
)
1406 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1407 return connect(s
, sa
, sz
);
1411 int mingw_bind(int sockfd
, struct sockaddr
*sa
, size_t sz
)
1413 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1414 return bind(s
, sa
, sz
);
1418 int mingw_setsockopt(int sockfd
, int lvl
, int optname
, void *optval
, int optlen
)
1420 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1421 return setsockopt(s
, lvl
, optname
, (const char*)optval
, optlen
);
1425 int mingw_listen(int sockfd
, int backlog
)
1427 SOCKET s
= (SOCKET
)_get_osfhandle(sockfd
);
1428 return listen(s
, backlog
);
1432 int mingw_accept(int sockfd1
, struct sockaddr
*sa
, socklen_t
*sz
)
1436 SOCKET s1
= (SOCKET
)_get_osfhandle(sockfd1
);
1437 SOCKET s2
= accept(s1
, sa
, sz
);
1439 /* convert into a file descriptor */
1440 if ((sockfd2
= _open_osfhandle(s2
, O_RDWR
|O_BINARY
)) < 0) {
1443 return error("unable to make a socket file descriptor: %s",
1450 int mingw_rename(const char *pold
, const char *pnew
)
1456 * Try native rename() first to get errno right.
1457 * It is based on MoveFile(), which cannot overwrite existing files.
1459 if (!rename(pold
, pnew
))
1461 if (errno
!= EEXIST
)
1464 if (MoveFileEx(pold
, pnew
, MOVEFILE_REPLACE_EXISTING
))
1466 /* TODO: translate more errors */
1467 gle
= GetLastError();
1468 if (gle
== ERROR_ACCESS_DENIED
&&
1469 (attrs
= GetFileAttributes(pnew
)) != INVALID_FILE_ATTRIBUTES
) {
1470 if (attrs
& FILE_ATTRIBUTE_DIRECTORY
) {
1474 if ((attrs
& FILE_ATTRIBUTE_READONLY
) &&
1475 SetFileAttributes(pnew
, attrs
& ~FILE_ATTRIBUTE_READONLY
)) {
1476 if (MoveFileEx(pold
, pnew
, MOVEFILE_REPLACE_EXISTING
))
1478 gle
= GetLastError();
1479 /* revert file attributes on failure */
1480 SetFileAttributes(pnew
, attrs
);
1483 if (tries
< ARRAY_SIZE(delay
) && gle
== ERROR_ACCESS_DENIED
) {
1485 * We assume that some other process had the source or
1486 * destination file open at the wrong moment and retry.
1487 * In order to give the other process a higher chance to
1488 * complete its operation, we give up our time slice now.
1489 * If we have to retry again, we do sleep a bit.
1491 Sleep(delay
[tries
]);
1495 if (gle
== ERROR_ACCESS_DENIED
&&
1496 ask_user_yes_no("Rename from '%s' to '%s' failed. "
1497 "Should I try again?", pold
, pnew
))
1505 * Note that this doesn't return the actual pagesize, but
1506 * the allocation granularity. If future Windows specific git code
1507 * needs the real getpagesize function, we need to find another solution.
1509 int mingw_getpagesize(void)
1513 return si
.dwAllocationGranularity
;
1516 struct passwd
*getpwuid(int uid
)
1518 static char user_name
[100];
1519 static struct passwd p
;
1521 DWORD len
= sizeof(user_name
);
1522 if (!GetUserName(user_name
, &len
))
1524 p
.pw_name
= user_name
;
1525 p
.pw_gecos
= "unknown";
1530 static HANDLE timer_event
;
1531 static HANDLE timer_thread
;
1532 static int timer_interval
;
1533 static int one_shot
;
1534 static sig_handler_t timer_fn
= SIG_DFL
;
1536 /* The timer works like this:
1537 * The thread, ticktack(), is a trivial routine that most of the time
1538 * only waits to receive the signal to terminate. The main thread tells
1539 * the thread to terminate by setting the timer_event to the signalled
1541 * But ticktack() interrupts the wait state after the timer's interval
1542 * length to call the signal handler.
1545 static unsigned __stdcall
ticktack(void *dummy
)
1547 while (WaitForSingleObject(timer_event
, timer_interval
) == WAIT_TIMEOUT
) {
1548 if (timer_fn
== SIG_DFL
)
1550 if (timer_fn
!= SIG_IGN
)
1558 static int start_timer_thread(void)
1560 timer_event
= CreateEvent(NULL
, FALSE
, FALSE
, NULL
);
1562 timer_thread
= (HANDLE
) _beginthreadex(NULL
, 0, ticktack
, NULL
, 0, NULL
);
1564 return errno
= ENOMEM
,
1565 error("cannot start timer thread");
1567 return errno
= ENOMEM
,
1568 error("cannot allocate resources for timer");
1572 static void stop_timer_thread(void)
1575 SetEvent(timer_event
); /* tell thread to terminate */
1577 int rc
= WaitForSingleObject(timer_thread
, 1000);
1578 if (rc
== WAIT_TIMEOUT
)
1579 error("timer thread did not terminate timely");
1580 else if (rc
!= WAIT_OBJECT_0
)
1581 error("waiting for timer thread failed: %lu",
1583 CloseHandle(timer_thread
);
1586 CloseHandle(timer_event
);
1588 timer_thread
= NULL
;
1591 static inline int is_timeval_eq(const struct timeval
*i1
, const struct timeval
*i2
)
1593 return i1
->tv_sec
== i2
->tv_sec
&& i1
->tv_usec
== i2
->tv_usec
;
1596 int setitimer(int type
, struct itimerval
*in
, struct itimerval
*out
)
1598 static const struct timeval zero
;
1599 static int atexit_done
;
1602 return errno
= EINVAL
,
1603 error("setitimer param 3 != NULL not implemented");
1604 if (!is_timeval_eq(&in
->it_interval
, &zero
) &&
1605 !is_timeval_eq(&in
->it_interval
, &in
->it_value
))
1606 return errno
= EINVAL
,
1607 error("setitimer: it_interval must be zero or eq it_value");
1610 stop_timer_thread();
1612 if (is_timeval_eq(&in
->it_value
, &zero
) &&
1613 is_timeval_eq(&in
->it_interval
, &zero
))
1616 timer_interval
= in
->it_value
.tv_sec
* 1000 + in
->it_value
.tv_usec
/ 1000;
1617 one_shot
= is_timeval_eq(&in
->it_interval
, &zero
);
1619 atexit(stop_timer_thread
);
1622 return start_timer_thread();
1625 int sigaction(int sig
, struct sigaction
*in
, struct sigaction
*out
)
1628 return errno
= EINVAL
,
1629 error("sigaction only implemented for SIGALRM");
1631 return errno
= EINVAL
,
1632 error("sigaction: param 3 != NULL not implemented");
1634 timer_fn
= in
->sa_handler
;
1639 sig_handler_t
mingw_signal(int sig
, sig_handler_t handler
)
1641 sig_handler_t old
= timer_fn
;
1643 return signal(sig
, handler
);
1648 static const char *make_backslash_path(const char *path
)
1650 static char buf
[PATH_MAX
+ 1];
1653 if (strlcpy(buf
, path
, PATH_MAX
) >= PATH_MAX
)
1654 die("Too long path: %.*s", 60, path
);
1656 for (c
= buf
; *c
; c
++) {
1663 void mingw_open_html(const char *unixpath
)
1665 const char *htmlpath
= make_backslash_path(unixpath
);
1666 typedef HINSTANCE (WINAPI
*T
)(HWND
, const char *,
1667 const char *, const char *, const char *, INT
);
1672 shell32
= LoadLibrary("shell32.dll");
1674 die("cannot load shell32.dll");
1675 ShellExecute
= (T
)GetProcAddress(shell32
, "ShellExecuteA");
1677 die("cannot run browser");
1679 printf("Launching default browser to display HTML ...\n");
1680 r
= (int)ShellExecute(NULL
, "open", htmlpath
, NULL
, "\\", SW_SHOWNORMAL
);
1681 FreeLibrary(shell32
);
1682 /* see the MSDN documentation referring to the result codes here */
1684 die("failed to launch browser for %.*s", MAX_PATH
, unixpath
);
1688 int link(const char *oldpath
, const char *newpath
)
1690 typedef BOOL (WINAPI
*T
)(const char*, const char*, LPSECURITY_ATTRIBUTES
);
1691 static T create_hard_link
= NULL
;
1692 if (!create_hard_link
) {
1693 create_hard_link
= (T
) GetProcAddress(
1694 GetModuleHandle("kernel32.dll"), "CreateHardLinkA");
1695 if (!create_hard_link
)
1696 create_hard_link
= (T
)-1;
1698 if (create_hard_link
== (T
)-1) {
1702 if (!create_hard_link(newpath
, oldpath
, NULL
)) {
1703 errno
= err_win_to_posix(GetLastError());
1709 char *getpass(const char *prompt
)
1711 struct strbuf buf
= STRBUF_INIT
;
1713 fputs(prompt
, stderr
);
1716 if (c
== '\r' || c
== '\n')
1718 strbuf_addch(&buf
, c
);
1720 fputs("\n", stderr
);
1721 return strbuf_detach(&buf
, NULL
);
1724 pid_t
waitpid(pid_t pid
, int *status
, unsigned options
)
1726 HANDLE h
= OpenProcess(SYNCHRONIZE
| PROCESS_QUERY_INFORMATION
,
1733 if (pid
> 0 && options
& WNOHANG
) {
1734 if (WAIT_OBJECT_0
!= WaitForSingleObject(h
, 0)) {
1738 options
&= ~WNOHANG
;
1742 struct pinfo_t
**ppinfo
;
1743 if (WaitForSingleObject(h
, INFINITE
) != WAIT_OBJECT_0
) {
1749 GetExitCodeProcess(h
, (LPDWORD
)status
);
1751 EnterCriticalSection(&pinfo_cs
);
1755 struct pinfo_t
*info
= *ppinfo
;
1756 if (info
->pid
== pid
) {
1757 CloseHandle(info
->proc
);
1758 *ppinfo
= info
->next
;
1762 ppinfo
= &info
->next
;
1765 LeaveCriticalSection(&pinfo_cs
);
1776 const char *get_windows_home_directory(void)
1778 static const char *home_directory
= NULL
;
1779 struct strbuf buf
= STRBUF_INIT
;
1782 return home_directory
;
1784 home_directory
= getenv("HOME");
1785 if (home_directory
&& *home_directory
)
1786 return home_directory
;
1788 strbuf_addf(&buf
, "%s/%s", getenv("HOMEDRIVE"), getenv("HOMEPATH"));
1789 home_directory
= strbuf_detach(&buf
, NULL
);
1791 return home_directory
;
1794 int mingw_offset_1st_component(const char *path
)
1797 if (has_dos_drive_prefix(path
))
1801 else if (is_dir_sep(path
[0]) && is_dir_sep(path
[1])) {
1803 /* skip server name */
1804 char *pos
= strpbrk(path
+ 2, "\\/");
1806 return 0; /* Error: malformed unc path */
1810 } while (*pos
&& !is_dir_sep(*pos
));
1812 offset
= pos
- path
;
1815 return offset
+ is_dir_sep(path
[offset
]);