4 #if defined(__cplusplus)
32 #if defined(__cplusplus) && defined(_MSC_VER)
35 #if !defined(_WIN64) && !defined(WIN32)
40 #if !defined(_MSC_VER) || _MSC_VER >= 1400
43 #if defined(__cplusplus) && defined(_MSC_VER)
63 #if defined(__cplusplus) && defined(_MSC_VER) && _MSC_VER == 1200
67 #if defined(__cplusplus) && defined(_MSC_VER) && _MSC_VER == 1200
72 #include <sys/types.h>
73 #ifdef HAVE_SYS_UTIME_H
74 # include <sys/utime.h>
80 #if defined __MINGW32__ || __BORLANDC__ >= 0x0580
83 # if !defined(_INTPTR_T_DEFINED)
89 # define _INTPTR_T_DEFINED
91 # if !defined(INTPTR_MAX)
93 # define INTPTR_MAX 9223372036854775807I64
95 # define INTPTR_MAX 2147483647
97 # define INTPTR_MIN (-INTPTR_MAX-1)
99 # if !defined(_UINTPTR_T_DEFINED)
105 # define _UINTPTR_T_DEFINED
107 # if !defined(UINTPTR_MAX)
109 # define UINTPTR_MAX 18446744073709551615UI64
111 # define UINTPTR_MAX 4294967295U
122 #define rb_w32_iswinnt() TRUE
123 #define rb_w32_iswin95() FALSE
128 #define CLOCK_REALTIME 0
129 #define CLOCK_MONOTONIC 1
143 #define getc(_stream) rb_w32_getc(_stream)
144 #define getchar() rb_w32_getc(stdin)
145 #define putc(_c, _stream) rb_w32_putc(_c, _stream)
146 #define putchar(_c) rb_w32_putc(_c, stdout)
148 #define fgetc(_stream) getc(_stream)
149 #define fputc(_c, _stream) putc(_c, _stream)
150 #define fgetchar() getchar()
151 #define fputchar(_c) putchar(_c)
152 #define utime(_p, _t) rb_w32_utime(_p, _t)
153 #define lseek(_f, _o, _w) _lseeki64(_f, _o, _w)
155 #define pipe(p) rb_w32_pipe(p)
156 #define open rb_w32_open
157 #define close(h) rb_w32_close(h)
158 #define fclose(f) rb_w32_fclose(f)
159 #define read(f, b, s) rb_w32_read(f, b, s)
160 #define write(f, b, s) rb_w32_write(f, b, s)
161 #define getpid() rb_w32_getpid()
162 #define getppid() rb_w32_getppid()
163 #define sleep(x) rb_w32_Sleep((x)*1000)
164 #define Sleep(msec) (void)rb_w32_Sleep(msec)
165 #define fstati64(fd,st) rb_w32_fstati64(fd,st)
167 #define creat(p, m) _creat(p, m)
169 #define filelength(h) _filelength(h)
170 #define mktemp(t) _mktemp(t)
171 #define tell(h) _tell(h)
175 #define fopen(p, m) rb_w32_fopen(p, m)
177 #define fdopen(h, m) rb_w32_fdopen(h, m)
179 #define fsopen(p, m, sh) rb_w32_fsopen(p, m, sh)
183 #define execv(path,argv) rb_w32_aspawn(P_OVERLAY,path,argv)
184 #if !defined(__BORLANDC__)
186 #define isatty(h) rb_w32_isatty(h)
190 #define mkdir(p, m) rb_w32_mkdir(p, m)
192 #define rmdir(p) rb_w32_rmdir(p)
194 #define unlink(p) rb_w32_unlink(p)
197 #if SIZEOF_OFF_T == 8
198 #define off_t __int64
200 #define fstat(fd,st) fstati64(fd,st)
201 #if defined(__BORLANDC__)
202 #define stati64(path, st) rb_w32_stati64(path, st)
203 #elif !defined(_MSC_VER) || RT_VER < 80
204 #define stati64 _stati64
206 #define _stati64(path, st) rb_w32_stati64(path, st)
209 #define stati64 _stat64
210 #define _stat64(path, st) rb_w32_stati64(path, st)
213 #define stat(path,st) rb_w32_stat(path,st)
214 #define fstat(fd,st) rb_w32_fstat(fd,st)
218 #define access(path,mode) rb_w32_access(path,mode)
220 #define strcasecmp _stricmp
221 #define strncasecmp _strnicmp
222 #define fsync _commit
228 #define isascii __isascii
257 #define IFNAMSIZ IF_NAMESIZE
261 #ifdef IFF_POINTTOPOINT
262 #define IFF_POINTOPOINT IFF_POINTTOPOINT
267 extern rb_pid_t
rb_w32_pipe_exec(
const char *,
const char *,
int,
int *,
int *);
268 extern int flock(
int fd,
int oper);
271 extern int WSAAPI
rb_w32_accept(
int,
struct sockaddr *,
int *);
272 extern int WSAAPI
rb_w32_bind(
int,
const struct sockaddr *,
int);
273 extern int WSAAPI
rb_w32_connect(
int,
const struct sockaddr *,
int);
283 extern int WSAAPI
rb_w32_recv(
int,
char *,
int,
int);
284 extern int WSAAPI
rb_w32_recvfrom(
int,
char *,
int,
int,
struct sockaddr *,
int *);
285 extern int WSAAPI
rb_w32_send(
int,
const char *,
int,
int);
286 extern int WSAAPI
rb_w32_sendto(
int,
const char *,
int,
int,
const struct sockaddr *,
int);
315 extern int chown(
const char *,
int,
int);
317 extern int link(
const char *,
const char *);
322 extern rb_pid_t
waitpid (rb_pid_t,
int *,
int);
323 extern rb_pid_t
rb_w32_spawn(
int,
const char *,
const char*);
324 extern rb_pid_t
rb_w32_aspawn(
int,
const char *,
char *
const *);
326 extern rb_pid_t
rb_w32_uspawn(
int,
const char *,
const char*);
329 extern int kill(
int,
int);
330 extern int fcntl(
int,
int, ...);
333 #if !defined(__BORLANDC__)
354 extern FILE *rb_w32_fopen(
const char *,
const char *);
355 extern FILE *rb_w32_fdopen(
int,
const char *);
356 extern FILE *rb_w32_fsopen(
const char *,
const char *,
int);
361 #if defined _MSC_VER && _MSC_VER >= 1800 && defined INFINITY
362 #pragma warning(push)
363 #pragma warning(disable:4756)
365 rb_infinity_float(
void)
371 #define INFINITY rb_infinity_float()
374 #if !defined __MINGW32__ || defined __NO_ISOCEXT
376 #define isnan(x) _isnan(x)
384 #define copysign(a, b) _copysign(a, b)
392 __declspec(dllimport) extern
int finite(
double);
395 #if !defined S_IFIFO && defined _S_IFIFO
396 #define S_IFIFO _S_IFIFO
399 #if 0 && defined __BORLANDC__
405 #define S_ISDIR(m) (((unsigned short)(m) & S_IFMT) == S_IFDIR)
406 #define S_ISFIFO(m) (((unsigned short)(m) & S_IFMT) == S_IFIFO)
407 #define S_ISBLK(m) (((unsigned short)(m) & S_IFMT) == S_IFBLK)
408 #define S_ISCHR(m) (((unsigned short)(m) & S_IFMT) == S_IFCHR)
409 #define S_ISREG(m) (((unsigned short)(m) & S_IFMT) == S_IFREG)
412 #if !defined S_IRUSR && !defined __MINGW32__
422 #if !defined S_IWUSR && !defined __MINGW32__
432 #if !defined S_IXUSR && !defined __MINGW32__
451 #undef HAVE_FTRUNCATE
452 #define HAVE_FTRUNCATE 1
453 #if defined HAVE_FTRUNCATE64
454 #define ftruncate ftruncate64
456 #define ftruncate rb_w32_ftruncate
460 #define HAVE_TRUNCATE 1
461 #if defined HAVE_TRUNCATE64
462 #define truncate truncate64
464 #define truncate rb_w32_truncate
470 extern int ioctl (
int,
int, ...);
471 extern rb_uid_t
getuid (
void);
472 extern rb_uid_t
geteuid (
void);
473 extern rb_gid_t
getgid (
void);
474 extern rb_gid_t
getegid (
void);
475 extern int setuid (rb_uid_t);
476 extern int setgid (rb_gid_t);
478 extern int fstati64(
int,
struct stati64 *);
483 #define strerror(e) rb_w32_strerror(e)
486 #define PIPE_BUF 1024
509 # define EWOULDBLOCK WSAEWOULDBLOCK
512 # define EINPROGRESS WSAEINPROGRESS
515 # define EALREADY WSAEALREADY
518 # define ENOTSOCK WSAENOTSOCK
521 # define EDESTADDRREQ WSAEDESTADDRREQ
524 # define EMSGSIZE WSAEMSGSIZE
527 # define EPROTOTYPE WSAEPROTOTYPE
530 # define ENOPROTOOPT WSAENOPROTOOPT
532 #ifndef EPROTONOSUPPORT
533 # define EPROTONOSUPPORT WSAEPROTONOSUPPORT
535 #ifndef ESOCKTNOSUPPORT
536 # define ESOCKTNOSUPPORT WSAESOCKTNOSUPPORT
539 # define EOPNOTSUPP WSAEOPNOTSUPP
542 # define EPFNOSUPPORT WSAEPFNOSUPPORT
545 # define EAFNOSUPPORT WSAEAFNOSUPPORT
548 # define EADDRINUSE WSAEADDRINUSE
550 #ifndef EADDRNOTAVAIL
551 # define EADDRNOTAVAIL WSAEADDRNOTAVAIL
554 # define ENETDOWN WSAENETDOWN
557 # define ENETUNREACH WSAENETUNREACH
560 # define ENETRESET WSAENETRESET
563 # define ECONNABORTED WSAECONNABORTED
566 # define ECONNRESET WSAECONNRESET
569 # define ENOBUFS WSAENOBUFS
572 # define EISCONN WSAEISCONN
575 # define ENOTCONN WSAENOTCONN
578 # define ESHUTDOWN WSAESHUTDOWN
581 # define ETOOMANYREFS WSAETOOMANYREFS
584 # define ETIMEDOUT WSAETIMEDOUT
587 # define ECONNREFUSED WSAECONNREFUSED
590 # define ELOOP WSAELOOP
594 # define EHOSTDOWN WSAEHOSTDOWN
597 # define EHOSTUNREACH WSAEHOSTUNREACH
601 # define EPROCLIM WSAEPROCLIM
604 # define EUSERS WSAEUSERS
607 # define EDQUOT WSAEDQUOT
610 # define ESTALE WSAESTALE
613 # define EREMOTE WSAEREMOTE
629 #define FD_SET(fd, set) do {\
631 SOCKET s = _get_osfhandle(fd);\
633 for (i = 0; i < (set)->fd_count; i++) {\
634 if ((set)->fd_array[i] == s) {\
638 if (i == (set)->fd_count) {\
639 if ((set)->fd_count < FD_SETSIZE) {\
640 (set)->fd_array[i] = s;\
647 #define FD_CLR(f, s) rb_w32_fdclr(f, s)
650 #define FD_ISSET(f, s) rb_w32_fdisset(f, s)
654 #define inet_ntop(f,a,n,l) rb_w32_inet_ntop(f,a,n,l)
657 #define inet_pton(f,s,d) rb_w32_inet_pton(f,s,d)
660 #define accept(s, a, l) rb_w32_accept(s, a, l)
663 #define bind(s, a, l) rb_w32_bind(s, a, l)
666 #define connect(s, a, l) rb_w32_connect(s, a, l)
669 #define select(n, r, w, e, t) rb_w32_select(n, r, w, e, t)
672 #define getpeername(s, a, l) rb_w32_getpeername(s, a, l)
675 #define getsockname(s, a, l) rb_w32_getsockname(s, a, l)
678 #define getsockopt(s, v, n, o, l) rb_w32_getsockopt(s, v, n, o, l)
681 #define ioctlsocket(s, c, a) rb_w32_ioctlsocket(s, c, a)
684 #define listen(s, b) rb_w32_listen(s, b)
687 #define recv(s, b, l, f) rb_w32_recv(s, b, l, f)
690 #define recvfrom(s, b, l, f, fr, frl) rb_w32_recvfrom(s, b, l, f, fr, frl)
693 #define send(s, b, l, f) rb_w32_send(s, b, l, f)
696 #define sendto(s, b, l, f, t, tl) rb_w32_sendto(s, b, l, f, t, tl)
699 #define setsockopt(s, v, n, o, l) rb_w32_setsockopt(s, v, n, o, l)
702 #define shutdown(s, h) rb_w32_shutdown(s, h)
705 #define socket(s, t, p) rb_w32_socket(s, t, p)
708 #define gethostbyaddr(a, l, t) rb_w32_gethostbyaddr(a, l, t)
711 #define gethostbyname(n) rb_w32_gethostbyname(n)
714 #define gethostname(n, l) rb_w32_gethostname(n, l)
716 #undef getprotobyname
717 #define getprotobyname(n) rb_w32_getprotobyname(n)
719 #undef getprotobynumber
720 #define getprotobynumber(n) rb_w32_getprotobynumber(n)
723 #define getservbyname(n, p) rb_w32_getservbyname(n, p)
726 #define getservbyport(p, pr) rb_w32_getservbyport(p, pr)
729 #define get_osfhandle(h) rb_w32_get_osfhandle(h)
732 #define getcwd(b, s) rb_w32_getcwd(b, s)
735 #define getenv(n) rb_w32_getenv(n)
738 #define rename(o, n) rb_w32_rename(o, n)
741 #define times(t) rb_w32_times(t)
744 #define dup2(o, n) rb_w32_dup2(o, n)
756 struct tm *
gmtime_r(
const time_t *,
struct tm *);
757 struct tm *
localtime_r(
const time_t *,
struct tm *);
794 #ifdef __MINGW_ATTRIB_PURE
797 #define frexp(_X, _Y) __extension__ ({\
798 int intpart_frexp_bug = intpart_frexp_bug;\
799 double result_frexp_bug = frexp((_X), &intpart_frexp_bug);\
800 *(_Y) = intpart_frexp_bug;\
804 #define modf(_X, _Y) __extension__ ({\
805 double intpart_modf_bug = intpart_modf_bug;\
806 double result_modf_bug = modf((_X), &intpart_modf_bug);\
807 *(_Y) = intpart_modf_bug;\
812 #if defined(__cplusplus)
819 #if defined(__MINGW64__)
826 rb_w32_pow(
double x,
double y)
830 #elif defined(__MINGW64_VERSION_MAJOR)
831 double rb_w32_pow(
double x,
double y);
833 #if defined(__MINGW64_VERSION_MAJOR) || defined(__MINGW64__)
834 #define pow rb_w32_pow
RUBY_EXTERN int flock(int, int)
char * rb_w32_wstr_to_mbstr(UINT, const WCHAR *, int, long *)
char * rb_w32_ugetenv(const char *)
int gettimeofday(struct timeval *, struct timezone *)
int rb_w32_wait_events_blocking(HANDLE *events, int num, DWORD timeout)
#define rb_w32_stati64(path, st)
rb_pid_t rb_w32_getppid(void)
ssize_t rb_w32_write(int, const void *, size_t)
int rb_w32_fstat(int, struct stat *)
int sendmsg(int, const struct msghdr *, int)
int WSAAPI rb_w32_connect(int, const struct sockaddr *, int)
int WSAAPI rb_w32_bind(int, const struct sockaddr *, int)
int WSAAPI rb_w32_sendto(int, const char *, int, int, const struct sockaddr *, int)
RUBY_EXTERN int finite(double)
struct sockaddr * ifa_broadaddr
SSL_METHOD *(* func)(void)
int rb_w32_dup2(int, int)
int rb_w32_ustati64(const char *, struct stati64 *)
int rb_w32_wrap_io_handle(HANDLE, int)
SOCKET rb_w32_get_osfhandle(int)
int rb_w32_umkdir(const char *, int)
rb_pid_t rb_w32_pipe_exec(const char *, const char *, int, int *, int *)
ssize_t rb_w32_read(int, void *, size_t)
rb_pid_t rb_w32_aspawn_flags(int, const char *, char *const *, DWORD)
static struct tm * localtime_r(const time_t *t, struct tm *tm)
rb_pid_t rb_w32_uaspawn_flags(int, const char *, char *const *, DWORD)
int WSAAPI rb_w32_getsockopt(int, int, int, char *, int *)
int rb_w32_urename(const char *, const char *)
int rb_w32_fdisset(int, fd_set *)
struct servent *WSAAPI rb_w32_getservbyname(const char *, const char *)
int rb_w32_open(const char *, int,...)
int WSAAPI rb_w32_select(int, fd_set *, fd_set *, fd_set *, struct timeval *)
void rb_w32_free_environ(char **)
int WSAAPI rb_w32_accept(int, struct sockaddr *, int *)
struct sockaddr * ifa_addr
struct protoent *WSAAPI rb_w32_getprotobynumber(int)
rb_pid_t rb_w32_getpid(void)
int rb_w32_uaccess(const char *, int)
int rb_w32_map_errno(DWORD)
int recvmsg(int, struct msghdr *, int)
static struct tm * gmtime_r(const time_t *t, struct tm *tm)
void freeifaddrs(struct ifaddrs *)
void rb_w32_fdclr(int, fd_set *)
int rb_w32_times(struct tms *)
int WSAAPI rb_w32_socket(int, int, int)
int rb_w32_is_socket(int)
int rb_w32_cmdvector(const char *, char ***)
int WSAAPI rb_w32_getsockname(int, struct sockaddr *, int *)
const char *WSAAPI rb_w32_inet_ntop(int, const void *, char *, size_t)
struct hostent *WSAAPI rb_w32_gethostbyaddr(const char *, int, int)
struct hostent *WSAAPI rb_w32_gethostbyname(const char *)
int getifaddrs(struct ifaddrs **)
int rb_w32_wopen(const WCHAR *, int,...)
struct ifaddrs * ifa_next
uintptr_t(* asynchronous_func_t)(uintptr_t self, int argc, uintptr_t *argv)
int WSAAPI rb_w32_send(int, const char *, int, int)
rb_pid_t rb_w32_spawn(int, const char *, const char *)
int WINAPI rb_w32_Sleep(unsigned long msec)
int WSAAPI rb_w32_recvfrom(int, char *, int, int, struct sockaddr *, int *)
int chown(const char *, int, int)
int WSAAPI rb_w32_listen(int, int)
int rb_w32_sleep(unsigned long msec)
int rb_w32_mkdir(const char *, int)
struct sockaddr * ifa_dstaddr
int rb_w32_uutime(const char *, const struct utimbuf *)
int rb_w32_rmdir(const char *)
int link(const char *, const char *)
int rb_w32_unwrap_io_handle(int)
int rb_w32_putc(int, FILE *)
int rb_w32_fstati64(int, struct stati64 *)
int rb_w32_time_subtract(struct timeval *rest, const struct timeval *wait)
int rb_w32_unlink(const char *)
int rb_w32_truncate(const char *path, off_t length)
#define RUBY_SYMBOL_EXPORT_END
int rb_w32_urmdir(const char *)
int fstati64(int, struct stati64 *)
char ** rb_w32_get_environ(void)
int rb_w32_uopen(const char *, int,...)
int rb_w32_uchmod(const char *, int)
char * rb_w32_getenv(const char *)
rb_pid_t rb_w32_uaspawn(int, const char *, char *const *)
#define RUBY_SYMBOL_EXPORT_BEGIN
struct protoent *WSAAPI rb_w32_getprotobyname(const char *)
int clock_gettime(clockid_t, struct timespec *)
int WSAAPI rb_w32_setsockopt(int, int, int, const char *, int)
int rb_w32_access(const char *, int)
rb_pid_t rb_w32_aspawn(int, const char *, char *const *)
int rb_w32_uchdir(const char *)
int rb_w32_ulink(const char *, const char *)
long rb_w32_write_console(uintptr_t, int)
char * rb_w32_strerror(int)
int clock_getres(clockid_t, struct timespec *)
int WSAAPI rb_w32_ioctlsocket(int, long, u_long *)
struct servent *WSAAPI rb_w32_getservbyport(int, const char *)
int WSAAPI rb_w32_gethostname(char *, int)
WCHAR * rb_w32_mbstr_to_wstr(UINT, const char *, int, long *)
int rb_w32_ftruncate(int fd, off_t length)
void rb_w32_fdset(int, fd_set *)
int WSAAPI rb_w32_shutdown(int, int)
int WSAAPI rb_w32_inet_pton(int, const char *, void *)
struct sockaddr * ifa_netmask
int WSAAPI rb_w32_getpeername(int, struct sockaddr *, int *)
char * rb_w32_getcwd(char *, int)
static double scalb(double a, long b)
int rb_w32_fclose(FILE *)
int socketpair(int, int, int, int *)
char rb_w32_fd_is_text(int)
rb_pid_t rb_w32_uspawn(int, const char *, const char *)
int WSAAPI rb_w32_recv(int, char *, int, int)
int rb_w32_io_cancelable_p(int)
uintptr_t rb_w32_asynchronize(asynchronous_func_t func, uintptr_t self, int argc, uintptr_t *argv, uintptr_t intrval)
int rb_w32_uunlink(const char *)
int rb_w32_stat(const char *, struct stat *)
int rb_w32_utime(const char *, const struct utimbuf *)
rb_pid_t waitpid(rb_pid_t, int *, int)
int rb_w32_uchown(const char *, int, int)
int rb_w32_rename(const char *, const char *)