compat / mingw.hon commit Merge branch 'en/merge-octopus-fix' (9058b8f)
   1#ifdef __MINGW64_VERSION_MAJOR
   2#include <stdint.h>
   3#include <wchar.h>
   4typedef _sigset_t sigset_t;
   5#endif
   6#include <winsock2.h>
   7#include <ws2tcpip.h>
   8
   9/* MinGW-w64 reports to have flockfile, but it does not actually have it. */
  10#ifdef __MINGW64_VERSION_MAJOR
  11#undef _POSIX_THREAD_SAFE_FUNCTIONS
  12#endif
  13
  14/*
  15 * things that are not available in header files
  16 */
  17
  18typedef int uid_t;
  19typedef int socklen_t;
  20#ifndef __MINGW64_VERSION_MAJOR
  21typedef int pid_t;
  22#define hstrerror strerror
  23#endif
  24
  25#define S_IFLNK    0120000 /* Symbolic link */
  26#define S_ISLNK(x) (((x) & S_IFMT) == S_IFLNK)
  27#define S_ISSOCK(x) 0
  28
  29#ifndef S_IRWXG
  30#define S_IRGRP 0
  31#define S_IWGRP 0
  32#define S_IXGRP 0
  33#define S_IRWXG (S_IRGRP | S_IWGRP | S_IXGRP)
  34#endif
  35#ifndef S_IRWXO
  36#define S_IROTH 0
  37#define S_IWOTH 0
  38#define S_IXOTH 0
  39#define S_IRWXO (S_IROTH | S_IWOTH | S_IXOTH)
  40#endif
  41
  42#define S_ISUID 0004000
  43#define S_ISGID 0002000
  44#define S_ISVTX 0001000
  45
  46#define WIFEXITED(x) 1
  47#define WIFSIGNALED(x) 0
  48#define WEXITSTATUS(x) ((x) & 0xff)
  49#define WTERMSIG(x) SIGTERM
  50
  51#ifndef EWOULDBLOCK
  52#define EWOULDBLOCK EAGAIN
  53#endif
  54#ifndef ELOOP
  55#define ELOOP EMLINK
  56#endif
  57#define SHUT_WR SD_SEND
  58
  59#define SIGHUP 1
  60#define SIGQUIT 3
  61#define SIGKILL 9
  62#define SIGPIPE 13
  63#define SIGALRM 14
  64#define SIGCHLD 17
  65
  66#define F_GETFD 1
  67#define F_SETFD 2
  68#define FD_CLOEXEC 0x1
  69
  70#ifndef EAFNOSUPPORT
  71#define EAFNOSUPPORT WSAEAFNOSUPPORT
  72#endif
  73#ifndef ECONNABORTED
  74#define ECONNABORTED WSAECONNABORTED
  75#endif
  76
  77struct passwd {
  78        char *pw_name;
  79        char *pw_gecos;
  80        char *pw_dir;
  81};
  82
  83typedef void (__cdecl *sig_handler_t)(int);
  84struct sigaction {
  85        sig_handler_t sa_handler;
  86        unsigned sa_flags;
  87};
  88#define SA_RESTART 0
  89
  90struct itimerval {
  91        struct timeval it_value, it_interval;
  92};
  93#define ITIMER_REAL 0
  94
  95struct utsname {
  96        char sysname[16];
  97        char nodename[1];
  98        char release[16];
  99        char version[16];
 100        char machine[1];
 101};
 102
 103/*
 104 * sanitize preprocessor namespace polluted by Windows headers defining
 105 * macros which collide with git local versions
 106 */
 107#undef HELP_COMMAND /* from winuser.h */
 108
 109/*
 110 * trivial stubs
 111 */
 112
 113static inline int readlink(const char *path, char *buf, size_t bufsiz)
 114{ errno = ENOSYS; return -1; }
 115static inline int symlink(const char *oldpath, const char *newpath)
 116{ errno = ENOSYS; return -1; }
 117static inline int fchmod(int fildes, mode_t mode)
 118{ errno = ENOSYS; return -1; }
 119#ifndef __MINGW64_VERSION_MAJOR
 120static inline pid_t fork(void)
 121{ errno = ENOSYS; return -1; }
 122#endif
 123static inline unsigned int alarm(unsigned int seconds)
 124{ return 0; }
 125static inline int fsync(int fd)
 126{ return _commit(fd); }
 127static inline void sync(void)
 128{}
 129static inline uid_t getuid(void)
 130{ return 1; }
 131static inline struct passwd *getpwnam(const char *name)
 132{ return NULL; }
 133static inline int fcntl(int fd, int cmd, ...)
 134{
 135        if (cmd == F_GETFD || cmd == F_SETFD)
 136                return 0;
 137        errno = EINVAL;
 138        return -1;
 139}
 140/* bash cannot reliably detect negative return codes as failure */
 141#define exit(code) exit((code) & 0xff)
 142#define sigemptyset(x) (void)0
 143static inline int sigaddset(sigset_t *set, int signum)
 144{ return 0; }
 145#define SIG_UNBLOCK 0
 146static inline int sigprocmask(int how, const sigset_t *set, sigset_t *oldset)
 147{ return 0; }
 148static inline pid_t getppid(void)
 149{ return 1; }
 150static inline pid_t getpgid(pid_t pid)
 151{ return pid == 0 ? getpid() : pid; }
 152static inline pid_t tcgetpgrp(int fd)
 153{ return getpid(); }
 154
 155/*
 156 * simple adaptors
 157 */
 158
 159int mingw_mkdir(const char *path, int mode);
 160#define mkdir mingw_mkdir
 161
 162#define WNOHANG 1
 163pid_t waitpid(pid_t pid, int *status, int options);
 164
 165#define kill mingw_kill
 166int mingw_kill(pid_t pid, int sig);
 167
 168#ifndef NO_OPENSSL
 169#include <openssl/ssl.h>
 170static inline int mingw_SSL_set_fd(SSL *ssl, int fd)
 171{
 172        return SSL_set_fd(ssl, _get_osfhandle(fd));
 173}
 174#define SSL_set_fd mingw_SSL_set_fd
 175
 176static inline int mingw_SSL_set_rfd(SSL *ssl, int fd)
 177{
 178        return SSL_set_rfd(ssl, _get_osfhandle(fd));
 179}
 180#define SSL_set_rfd mingw_SSL_set_rfd
 181
 182static inline int mingw_SSL_set_wfd(SSL *ssl, int fd)
 183{
 184        return SSL_set_wfd(ssl, _get_osfhandle(fd));
 185}
 186#define SSL_set_wfd mingw_SSL_set_wfd
 187#endif
 188
 189/*
 190 * implementations of missing functions
 191 */
 192
 193int pipe(int filedes[2]);
 194unsigned int sleep (unsigned int seconds);
 195int mkstemp(char *template);
 196int gettimeofday(struct timeval *tv, void *tz);
 197#ifndef __MINGW64_VERSION_MAJOR
 198struct tm *gmtime_r(const time_t *timep, struct tm *result);
 199struct tm *localtime_r(const time_t *timep, struct tm *result);
 200#endif
 201int getpagesize(void);  /* defined in MinGW's libgcc.a */
 202struct passwd *getpwuid(uid_t uid);
 203int setitimer(int type, struct itimerval *in, struct itimerval *out);
 204int sigaction(int sig, struct sigaction *in, struct sigaction *out);
 205int link(const char *oldpath, const char *newpath);
 206int uname(struct utsname *buf);
 207
 208/*
 209 * replacements of existing functions
 210 */
 211
 212int mingw_unlink(const char *pathname);
 213#define unlink mingw_unlink
 214
 215int mingw_rmdir(const char *path);
 216#define rmdir mingw_rmdir
 217
 218int mingw_open (const char *filename, int oflags, ...);
 219#define open mingw_open
 220
 221int mingw_fgetc(FILE *stream);
 222#define fgetc mingw_fgetc
 223
 224FILE *mingw_fopen (const char *filename, const char *otype);
 225#define fopen mingw_fopen
 226
 227FILE *mingw_freopen (const char *filename, const char *otype, FILE *stream);
 228#define freopen mingw_freopen
 229
 230int mingw_fflush(FILE *stream);
 231#define fflush mingw_fflush
 232
 233ssize_t mingw_write(int fd, const void *buf, size_t len);
 234#define write mingw_write
 235
 236int mingw_access(const char *filename, int mode);
 237#undef access
 238#define access mingw_access
 239
 240int mingw_chdir(const char *dirname);
 241#define chdir mingw_chdir
 242
 243int mingw_chmod(const char *filename, int mode);
 244#define chmod mingw_chmod
 245
 246char *mingw_mktemp(char *template);
 247#define mktemp mingw_mktemp
 248
 249char *mingw_getcwd(char *pointer, int len);
 250#define getcwd mingw_getcwd
 251
 252char *mingw_getenv(const char *name);
 253#define getenv mingw_getenv
 254int mingw_putenv(const char *namevalue);
 255#define putenv mingw_putenv
 256#define unsetenv mingw_putenv
 257
 258int mingw_gethostname(char *host, int namelen);
 259#define gethostname mingw_gethostname
 260
 261struct hostent *mingw_gethostbyname(const char *host);
 262#define gethostbyname mingw_gethostbyname
 263
 264void mingw_freeaddrinfo(struct addrinfo *res);
 265#define freeaddrinfo mingw_freeaddrinfo
 266
 267int mingw_getaddrinfo(const char *node, const char *service,
 268                      const struct addrinfo *hints, struct addrinfo **res);
 269#define getaddrinfo mingw_getaddrinfo
 270
 271int mingw_getnameinfo(const struct sockaddr *sa, socklen_t salen,
 272                      char *host, DWORD hostlen, char *serv, DWORD servlen,
 273                      int flags);
 274#define getnameinfo mingw_getnameinfo
 275
 276int mingw_socket(int domain, int type, int protocol);
 277#define socket mingw_socket
 278
 279int mingw_connect(int sockfd, struct sockaddr *sa, size_t sz);
 280#define connect mingw_connect
 281
 282int mingw_bind(int sockfd, struct sockaddr *sa, size_t sz);
 283#define bind mingw_bind
 284
 285int mingw_setsockopt(int sockfd, int lvl, int optname, void *optval, int optlen);
 286#define setsockopt mingw_setsockopt
 287
 288int mingw_shutdown(int sockfd, int how);
 289#define shutdown mingw_shutdown
 290
 291int mingw_listen(int sockfd, int backlog);
 292#define listen mingw_listen
 293
 294int mingw_accept(int sockfd, struct sockaddr *sa, socklen_t *sz);
 295#define accept mingw_accept
 296
 297int mingw_rename(const char*, const char*);
 298#define rename mingw_rename
 299
 300#if defined(USE_WIN32_MMAP) || defined(_MSC_VER)
 301int mingw_getpagesize(void);
 302#define getpagesize mingw_getpagesize
 303#endif
 304
 305struct rlimit {
 306        unsigned int rlim_cur;
 307};
 308#define RLIMIT_NOFILE 0
 309
 310static inline int getrlimit(int resource, struct rlimit *rlp)
 311{
 312        if (resource != RLIMIT_NOFILE) {
 313                errno = EINVAL;
 314                return -1;
 315        }
 316
 317        rlp->rlim_cur = 2048;
 318        return 0;
 319}
 320
 321/*
 322 * Use mingw specific stat()/lstat()/fstat() implementations on Windows.
 323 */
 324#ifndef __MINGW64_VERSION_MAJOR
 325#define off_t off64_t
 326#define lseek _lseeki64
 327#endif
 328
 329/* use struct stat with 64 bit st_size */
 330#ifdef stat
 331#undef stat
 332#endif
 333#define stat _stati64
 334int mingw_lstat(const char *file_name, struct stat *buf);
 335int mingw_stat(const char *file_name, struct stat *buf);
 336int mingw_fstat(int fd, struct stat *buf);
 337#ifdef fstat
 338#undef fstat
 339#endif
 340#define fstat mingw_fstat
 341#ifdef lstat
 342#undef lstat
 343#endif
 344#define lstat mingw_lstat
 345
 346#ifndef _stati64
 347# define _stati64(x,y) mingw_stat(x,y)
 348#elif defined (_USE_32BIT_TIME_T)
 349# define _stat32i64(x,y) mingw_stat(x,y)
 350#else
 351# define _stat64(x,y) mingw_stat(x,y)
 352#endif
 353
 354int mingw_utime(const char *file_name, const struct utimbuf *times);
 355#define utime mingw_utime
 356
 357pid_t mingw_spawnvpe(const char *cmd, const char **argv, char **env,
 358                     const char *dir,
 359                     int fhin, int fhout, int fherr);
 360int mingw_execvp(const char *cmd, char *const *argv);
 361#define execvp mingw_execvp
 362int mingw_execv(const char *cmd, char *const *argv);
 363#define execv mingw_execv
 364
 365static inline unsigned int git_ntohl(unsigned int x)
 366{ return (unsigned int)ntohl(x); }
 367#define ntohl git_ntohl
 368
 369sig_handler_t mingw_signal(int sig, sig_handler_t handler);
 370#define signal mingw_signal
 371
 372int mingw_raise(int sig);
 373#define raise mingw_raise
 374
 375/*
 376 * ANSI emulation wrappers
 377 */
 378
 379void winansi_init(void);
 380HANDLE winansi_get_osfhandle(int fd);
 381
 382/*
 383 * git specific compatibility
 384 */
 385
 386#define has_dos_drive_prefix(path) \
 387        (isalpha(*(path)) && (path)[1] == ':' ? 2 : 0)
 388int mingw_skip_dos_drive_prefix(char **path);
 389#define skip_dos_drive_prefix mingw_skip_dos_drive_prefix
 390#define is_dir_sep(c) ((c) == '/' || (c) == '\\')
 391static inline char *mingw_find_last_dir_sep(const char *path)
 392{
 393        char *ret = NULL;
 394        for (; *path; ++path)
 395                if (is_dir_sep(*path))
 396                        ret = (char *)path;
 397        return ret;
 398}
 399static inline void convert_slashes(char *path)
 400{
 401        for (; *path; path++)
 402                if (*path == '\\')
 403                        *path = '/';
 404}
 405#define find_last_dir_sep mingw_find_last_dir_sep
 406int mingw_offset_1st_component(const char *path);
 407#define offset_1st_component mingw_offset_1st_component
 408#define PATH_SEP ';'
 409#if !defined(__MINGW64_VERSION_MAJOR) && (!defined(_MSC_VER) || _MSC_VER < 1800)
 410#define PRIuMAX "I64u"
 411#define PRId64 "I64d"
 412#else
 413#include <inttypes.h>
 414#endif
 415
 416void mingw_open_html(const char *path);
 417#define open_html mingw_open_html
 418
 419void mingw_mark_as_git_dir(const char *dir);
 420#define mark_as_git_dir mingw_mark_as_git_dir
 421
 422/**
 423 * Converts UTF-8 encoded string to UTF-16LE.
 424 *
 425 * To support repositories with legacy-encoded file names, invalid UTF-8 bytes
 426 * 0xa0 - 0xff are converted to corresponding printable Unicode chars \u00a0 -
 427 * \u00ff, and invalid UTF-8 bytes 0x80 - 0x9f (which would make non-printable
 428 * Unicode) are converted to hex-code.
 429 *
 430 * Lead-bytes not followed by an appropriate number of trail-bytes, over-long
 431 * encodings and 4-byte encodings > \u10ffff are detected as invalid UTF-8.
 432 *
 433 * Maximum space requirement for the target buffer is two wide chars per UTF-8
 434 * char (((strlen(utf) * 2) + 1) [* sizeof(wchar_t)]).
 435 *
 436 * The maximum space is needed only if the entire input string consists of
 437 * invalid UTF-8 bytes in range 0x80-0x9f, as per the following table:
 438 *
 439 *               |                   | UTF-8 | UTF-16 |
 440 *   Code point  |  UTF-8 sequence   | bytes | words  | ratio
 441 * --------------+-------------------+-------+--------+-------
 442 * 000000-00007f | 0-7f              |   1   |   1    |  1
 443 * 000080-0007ff | c2-df + 80-bf     |   2   |   1    |  0.5
 444 * 000800-00ffff | e0-ef + 2 * 80-bf |   3   |   1    |  0.33
 445 * 010000-10ffff | f0-f4 + 3 * 80-bf |   4   |  2 (a) |  0.5
 446 * invalid       | 80-9f             |   1   |  2 (b) |  2
 447 * invalid       | a0-ff             |   1   |   1    |  1
 448 *
 449 * (a) encoded as UTF-16 surrogate pair
 450 * (b) encoded as two hex digits
 451 *
 452 * Note that, while the UTF-8 encoding scheme can be extended to 5-byte, 6-byte
 453 * or even indefinite-byte sequences, the largest valid code point \u10ffff
 454 * encodes as only 4 UTF-8 bytes.
 455 *
 456 * Parameters:
 457 * wcs: wide char target buffer
 458 * utf: string to convert
 459 * wcslen: size of target buffer (in wchar_t's)
 460 * utflen: size of string to convert, or -1 if 0-terminated
 461 *
 462 * Returns:
 463 * length of converted string (_wcslen(wcs)), or -1 on failure
 464 *
 465 * Errors:
 466 * EINVAL: one of the input parameters is invalid (e.g. NULL)
 467 * ERANGE: the output buffer is too small
 468 */
 469int xutftowcsn(wchar_t *wcs, const char *utf, size_t wcslen, int utflen);
 470
 471/**
 472 * Simplified variant of xutftowcsn, assumes input string is \0-terminated.
 473 */
 474static inline int xutftowcs(wchar_t *wcs, const char *utf, size_t wcslen)
 475{
 476        return xutftowcsn(wcs, utf, wcslen, -1);
 477}
 478
 479/**
 480 * Simplified file system specific variant of xutftowcsn, assumes output
 481 * buffer size is MAX_PATH wide chars and input string is \0-terminated,
 482 * fails with ENAMETOOLONG if input string is too long.
 483 */
 484static inline int xutftowcs_path(wchar_t *wcs, const char *utf)
 485{
 486        int result = xutftowcsn(wcs, utf, MAX_PATH, -1);
 487        if (result < 0 && errno == ERANGE)
 488                errno = ENAMETOOLONG;
 489        return result;
 490}
 491
 492/**
 493 * Converts UTF-16LE encoded string to UTF-8.
 494 *
 495 * Maximum space requirement for the target buffer is three UTF-8 chars per
 496 * wide char ((_wcslen(wcs) * 3) + 1).
 497 *
 498 * The maximum space is needed only if the entire input string consists of
 499 * UTF-16 words in range 0x0800-0xd7ff or 0xe000-0xffff (i.e. \u0800-\uffff
 500 * modulo surrogate pairs), as per the following table:
 501 *
 502 *               |                       | UTF-16 | UTF-8 |
 503 *   Code point  |  UTF-16 sequence      | words  | bytes | ratio
 504 * --------------+-----------------------+--------+-------+-------
 505 * 000000-00007f | 0000-007f             |   1    |   1   |  1
 506 * 000080-0007ff | 0080-07ff             |   1    |   2   |  2
 507 * 000800-00ffff | 0800-d7ff / e000-ffff |   1    |   3   |  3
 508 * 010000-10ffff | d800-dbff + dc00-dfff |   2    |   4   |  2
 509 *
 510 * Note that invalid code points > 10ffff cannot be represented in UTF-16.
 511 *
 512 * Parameters:
 513 * utf: target buffer
 514 * wcs: wide string to convert
 515 * utflen: size of target buffer
 516 *
 517 * Returns:
 518 * length of converted string, or -1 on failure
 519 *
 520 * Errors:
 521 * EINVAL: one of the input parameters is invalid (e.g. NULL)
 522 * ERANGE: the output buffer is too small
 523 */
 524int xwcstoutf(char *utf, const wchar_t *wcs, size_t utflen);
 525
 526/*
 527 * A critical section used in the implementation of the spawn
 528 * functions (mingw_spawnv[p]e()) and waitpid(). Intialised in
 529 * the replacement main() macro below.
 530 */
 531extern CRITICAL_SECTION pinfo_cs;
 532
 533/*
 534 * A replacement of main() that adds win32 specific initialization.
 535 */
 536
 537void mingw_startup();
 538#define main(c,v) dummy_decl_mingw_main(); \
 539static int mingw_main(c,v); \
 540int main(int argc, char **argv) \
 541{ \
 542        mingw_startup(); \
 543        return mingw_main(__argc, (void *)__argv); \
 544} \
 545static int mingw_main(c,v)
 546
 547/*
 548 * Used by Pthread API implementation for Windows
 549 */
 550extern int err_win_to_posix(DWORD winerr);