diff options
author | usa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2011-08-05 11:31:52 +0000 |
---|---|---|
committer | usa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2011-08-05 11:31:52 +0000 |
commit | 1adf7962be7f1403a4df8a850d2156a21d6f8aa8 (patch) | |
tree | 6e3ca749dd755abd60ddf04babf8bd3f4b39e9c4 /win32 | |
parent | c3d8ff4e84f650ad96e9944f4abebfafc99c6211 (diff) |
more clarified the license.
updated version of r32830, but not included include/ruby/win32.h.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@32861 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'win32')
-rw-r--r-- | win32/win32.c | 448 |
1 files changed, 229 insertions, 219 deletions
diff --git a/win32/win32.c b/win32/win32.c index f95b53e568..9f86e7c850 100644 --- a/win32/win32.c +++ b/win32/win32.c @@ -9,6 +9,15 @@ * Some of this code was derived from the MSDOS port(s) and the OS/2 port. * */ +/* + The parts licensed under above copyright notice are marked as "Artistic or + GPL". + Another parts are licensed under Ruby's License. + + Copyright (C) 1993-2011 Yukihiro Matsumoto + Copyright (C) 2000 Network Applied Communication Laboratory, Inc. + Copyright (C) 2000 Information-technology Promotion Agency, Japan + */ #include "ruby/ruby.h" #include "ruby/encoding.h" @@ -209,7 +218,7 @@ static struct { { WSAEREMOTE, EREMOTE }, }; -/* non GPL */ +/* License: Ruby's */ int rb_w32_map_errno(DWORD winerr) { @@ -237,7 +246,7 @@ static const char *NTLoginName; static OSVERSIONINFO osver; -/* GPL */ +/* License: Artistic or GPL */ static void get_version(void) { @@ -247,7 +256,7 @@ get_version(void) } #ifdef _M_IX86 -/* GPL */ +/* License: Artistic or GPL */ DWORD rb_w32_osid(void) { @@ -255,7 +264,7 @@ rb_w32_osid(void) } #endif -/* GPL */ +/* License: Artistic or GPL */ DWORD rb_w32_osver(void) { @@ -270,7 +279,7 @@ rb_w32_osver(void) #define IfWin95(win95, winnt) (winnt) #endif -/* non GPL */ +/* License: Ruby's */ HANDLE GetCurrentThreadHandle(void) { @@ -289,7 +298,7 @@ GetCurrentThreadHandle(void) /* simulate flock by locking a range on the file */ -/* GPL */ +/* License: Artistic or GPL */ #define LK_ERR(f,i) \ do { \ if (f) \ @@ -306,7 +315,7 @@ GetCurrentThreadHandle(void) } while (0) #define LK_LEN ULONG_MAX -/* GPL */ +/* License: Artistic or GPL */ static uintptr_t flock_winnt(uintptr_t self, int argc, uintptr_t* argv) { @@ -344,7 +353,7 @@ flock_winnt(uintptr_t self, int argc, uintptr_t* argv) } #ifdef WIN95 -/* GPL */ +/* License: Artistic or GPL */ static uintptr_t flock_win95(uintptr_t self, int argc, uintptr_t* argv) { @@ -375,7 +384,7 @@ flock_win95(uintptr_t self, int argc, uintptr_t* argv) #undef LK_ERR -/* GPL */ +/* License: Artistic or GPL */ int flock(int fd, int oper) { @@ -397,7 +406,7 @@ flock(int fd, int oper) (DWORD)-1); } -/* non GPL */ +/* License: Ruby's */ static inline WCHAR * translate_wchar(WCHAR *p, int from, int to) { @@ -408,7 +417,7 @@ translate_wchar(WCHAR *p, int from, int to) return p; } -/* non GPL */ +/* License: Ruby's */ static inline char * translate_char(char *p, int from, int to) { @@ -436,7 +445,7 @@ translate_char(char *p, int from, int to) #define CSIDL_PROFILE 40 #endif -/* non GPL */ +/* License: Ruby's */ static BOOL get_special_folder(int n, WCHAR *env) { @@ -452,7 +461,7 @@ get_special_folder(int n, WCHAR *env) return f; } -/* non GPL */ +/* License: Ruby's */ static void regulate_path(WCHAR *path) { @@ -463,7 +472,7 @@ regulate_path(WCHAR *path) } } -/* non GPL */ +/* License: Ruby's */ static FARPROC get_proc_address(const char *module, const char *func, HANDLE *mh) { @@ -487,7 +496,7 @@ get_proc_address(const char *module, const char *func, HANDLE *mh) return ptr; } -/* non GPL */ +/* License: Ruby's */ static UINT get_system_directory(WCHAR *path, UINT len) { @@ -501,7 +510,7 @@ get_system_directory(WCHAR *path, UINT len) #define numberof(array) (sizeof(array) / sizeof(*array)) -/* non GPL */ +/* License: Ruby's */ VALUE rb_w32_special_folder(int type) { @@ -512,7 +521,7 @@ rb_w32_special_folder(int type) return rb_w32_conv_from_wchar(path, rb_filesystem_encoding()); } -/* non GPL */ +/* License: Ruby's */ UINT rb_w32_system_tmpdir(WCHAR *path, UINT len) { @@ -529,7 +538,7 @@ rb_w32_system_tmpdir(WCHAR *path, UINT len) return p - path + numberof(temp) - 1; } -/* non GPL */ +/* License: Ruby's */ static void init_env(void) { @@ -596,7 +605,7 @@ init_env(void) typedef BOOL (WINAPI *cancel_io_t)(HANDLE); static cancel_io_t cancel_io = NULL; -/* non GPL */ +/* License: Ruby's */ static void init_func(void) { @@ -607,7 +616,7 @@ init_func(void) static void init_stdhandle(void); #if RT_VER >= 80 -/* non GPL */ +/* License: Ruby's */ static void invalid_parameter(const wchar_t *expr, const wchar_t *func, const wchar_t *file, unsigned int line, uintptr_t dummy) { @@ -616,7 +625,7 @@ invalid_parameter(const wchar_t *expr, const wchar_t *func, const wchar_t *file, int ruby_w32_rtc_error; -/* non GPL */ +/* License: Ruby's */ static int __cdecl rtc_error_handler(int e, const char *src, int line, const char *exe, const char *fmt, ...) { @@ -639,7 +648,7 @@ static int NtSocketsInitialized = 0; static st_table *socklist = NULL; static char *envarea; -/* non GPL */ +/* License: Ruby's */ static void exit_handler(void) { @@ -656,7 +665,7 @@ exit_handler(void) DeleteCriticalSection(&select_mutex); } -/* GPL */ +/* License: Artistic or GPL */ static void StartSockets(void) { @@ -681,7 +690,7 @@ StartSockets(void) // // Initialization stuff // -/* non GPL */ +/* License: Ruby's */ void rb_w32_sysinit(int *argc, char ***argv) { @@ -729,19 +738,19 @@ getlogin(void) #define MAXCHILDNUM 256 /* max num of child processes */ -/* non GPL */ +/* License: Ruby's */ static struct ChildRecord { HANDLE hProcess; /* process handle */ rb_pid_t pid; /* process id */ } ChildRecord[MAXCHILDNUM]; -/* non GPL */ +/* License: Ruby's */ #define FOREACH_CHILD(v) do { \ struct ChildRecord* v; \ for (v = ChildRecord; v < ChildRecord + sizeof(ChildRecord) / sizeof(ChildRecord[0]); ++v) #define END_FOREACH_CHILD } while (0) -/* non GPL */ +/* License: Ruby's */ static struct ChildRecord * FindChildSlot(rb_pid_t pid) { @@ -754,7 +763,7 @@ FindChildSlot(rb_pid_t pid) return NULL; } -/* non GPL */ +/* License: Ruby's */ static struct ChildRecord * FindChildSlotByHandle(HANDLE h) { @@ -767,7 +776,7 @@ FindChildSlotByHandle(HANDLE h) return NULL; } -/* non GPL */ +/* License: Ruby's */ static void CloseChildHandle(struct ChildRecord *child) { @@ -777,7 +786,7 @@ CloseChildHandle(struct ChildRecord *child) CloseHandle(h); } -/* non GPL */ +/* License: Ruby's */ static struct ChildRecord * FindFreeChildSlot(void) { @@ -850,14 +859,14 @@ static const char *const szInternalCmds[] = { "\3" "vol" + 1, }; -/* non GPL */ +/* License: Ruby's */ static int internal_match(const void *key, const void *elem) { return strcmp(key, *(const char *const *)elem); } -/* non GPL */ +/* License: Ruby's */ static int is_command_com(const char *interp) { @@ -872,7 +881,7 @@ is_command_com(const char *interp) static int internal_cmd_match(const char *cmdname, int nt); -/* non GPL */ +/* License: Ruby's */ static int is_internal_cmd(const char *cmd, int nt) { @@ -901,7 +910,7 @@ is_internal_cmd(const char *cmd, int nt) return internal_cmd_match(cmdname, nt); } -/* non GPL */ +/* License: Ruby's */ static int internal_cmd_match(const char *cmdname, int nt) { @@ -916,14 +925,14 @@ internal_cmd_match(const char *cmdname, int nt) return 1; } -/* non GPL */ +/* License: Ruby's */ SOCKET rb_w32_get_osfhandle(int fh) { return _get_osfhandle(fh); } -/* non GPL */ +/* License: Ruby's */ static int join_argv(char *cmd, char *const *argv, BOOL escape) { @@ -998,11 +1007,11 @@ join_argv(char *cmd, char *const *argv, BOOL escape) # define MAXPATHLEN 512 #endif -/* non GPL */ +/* License: Ruby's */ #define STRNDUPV(ptr, v, src, len) \ (((char *)memcpy(((ptr) = ALLOCV((v), (len) + 1)), (src), (len)))[len] = 0) -/* non GPL */ +/* License: Ruby's */ static int check_spawn_mode(int mode) { @@ -1016,7 +1025,7 @@ check_spawn_mode(int mode) } } -/* non GPL */ +/* License: Ruby's */ static rb_pid_t child_result(struct ChildRecord *child, int mode) { @@ -1039,7 +1048,7 @@ child_result(struct ChildRecord *child, int mode) } } -/* non GPL */ +/* License: Ruby's */ static struct ChildRecord * CreateChild(const WCHAR *cmd, const WCHAR *prog, SECURITY_ATTRIBUTES *psa, HANDLE hInput, HANDLE hOutput, HANDLE hError) @@ -1125,7 +1134,7 @@ CreateChild(const WCHAR *cmd, const WCHAR *prog, SECURITY_ATTRIBUTES *psa, return child; } -/* non GPL */ +/* License: Ruby's */ static int is_batch(const char *cmd) { @@ -1148,7 +1157,7 @@ static char *wstr_to_mbstr(UINT, const WCHAR *, int, long *); #define utf8_to_wstr(str, plen) mbstr_to_wstr(CP_UTF8, str, -1, plen) #define wstr_to_utf8(str, plen) wstr_to_mbstr(CP_UTF8, str, -1, plen) -/* GPL */ +/* License: Artistic or GPL */ rb_pid_t rb_w32_spawn(int mode, const char *cmd, const char *prog) { @@ -1251,7 +1260,7 @@ rb_w32_spawn(int mode, const char *cmd, const char *prog) return ret; } -/* GPL */ +/* License: Artistic or GPL */ rb_pid_t rb_w32_aspawn(int mode, const char *prog, char *const *argv) { @@ -1318,7 +1327,7 @@ rb_w32_aspawn(int mode, const char *prog, char *const *argv) return ret; } -/* GPL */ +/* License: Artistic or GPL */ typedef struct _NtCmdLineElement { struct _NtCmdLineElement *next; char *str; @@ -1334,7 +1343,7 @@ typedef struct _NtCmdLineElement { #define NTMALLOC 0x2 // string in element was malloc'ed #define NTSTRING 0x4 // element contains a quoted string -/* non GPL */ +/* License: Ruby's */ static int insert(const char *path, VALUE vinfo, void *enc) { @@ -1354,7 +1363,7 @@ insert(const char *path, VALUE vinfo, void *enc) return 0; } -/* GPL */ +/* License: Artistic or GPL */ static NtCmdLineElement ** cmdglob(NtCmdLineElement *patt, NtCmdLineElement **tail) { @@ -1387,7 +1396,7 @@ cmdglob(NtCmdLineElement *patt, NtCmdLineElement **tail) // characters that require it to be executed by a command interpreter // -/* GPL */ +/* License: Artistic or GPL */ static int has_redirection(const char *cmd) { @@ -1435,7 +1444,7 @@ has_redirection(const char *cmd) return FALSE; } -/* non GPL */ +/* License: Ruby's */ static inline char * skipspace(char *ptr) { @@ -1444,7 +1453,7 @@ skipspace(char *ptr) return ptr; } -/* GPL */ +/* License: Artistic or GPL */ int rb_w32_cmdvector(const char *cmd, char ***vec) { @@ -1691,7 +1700,7 @@ rb_w32_cmdvector(const char *cmd, char ***vec) // return the pointer to the current file name. // -/* non GPL */ +/* License: Ruby's */ #define GetBit(bits, i) ((bits)[(i) / CHAR_BIT] & (1 << (i) % CHAR_BIT)) #define SetBit(bits, i) ((bits)[(i) / CHAR_BIT] |= (1 << (i) % CHAR_BIT)) @@ -1699,7 +1708,7 @@ rb_w32_cmdvector(const char *cmd, char ***vec) #define BitOfIsRep(n) ((n) * 2 + 1) #define DIRENT_PER_CHAR (CHAR_BIT / 2) -/* GPL */ +/* License: Artistic or GPL */ static HANDLE open_dir_handle(const WCHAR *filename, WIN32_FIND_DATAW *fd) { @@ -1733,7 +1742,7 @@ open_dir_handle(const WCHAR *filename, WIN32_FIND_DATAW *fd) return fh; } -/* GPL */ +/* License: Artistic or GPL */ static DIR * opendir_internal(WCHAR *wpath, const char *filename) { @@ -1818,7 +1827,7 @@ opendir_internal(WCHAR *wpath, const char *filename) return p; } -/* non GPL */ +/* License: Ruby's */ static inline UINT filecp(void) { @@ -1826,7 +1835,7 @@ filecp(void) return cp; } -/* non GPL */ +/* License: Ruby's */ static char * wstr_to_mbstr(UINT cp, const WCHAR *wstr, int clen, long *plen) { @@ -1838,7 +1847,7 @@ wstr_to_mbstr(UINT cp, const WCHAR *wstr, int clen, long *plen) return ptr; } -/* non GPL */ +/* License: Ruby's */ static WCHAR * mbstr_to_wstr(UINT cp, const char *str, int clen, long *plen) { @@ -1850,7 +1859,7 @@ mbstr_to_wstr(UINT cp, const char *str, int clen, long *plen) return ptr; } -/* non GPL */ +/* License: Ruby's */ DIR * rb_w32_opendir(const char *filename) { @@ -1863,7 +1872,7 @@ rb_w32_opendir(const char *filename) return ret; } -/* non GPL */ +/* License: Ruby's */ DIR * rb_w32_uopendir(const char *filename) { @@ -1880,7 +1889,7 @@ rb_w32_uopendir(const char *filename) // Move to next entry // -/* GPL */ +/* License: Artistic or GPL */ static void move_to_next_entry(DIR *dirp) { @@ -1897,7 +1906,7 @@ move_to_next_entry(DIR *dirp) // Readdir just returns the current string pointer and bumps the // string pointer to the next entry. // -/* non GPL */ +/* License: Ruby's */ static BOOL win32_direct_conv(const WCHAR *file, struct direct *entry, rb_encoding *dummy) { @@ -1906,7 +1915,7 @@ win32_direct_conv(const WCHAR *file, struct direct *entry, rb_encoding *dummy) return TRUE; } -/* non GPL */ +/* License: Ruby's */ VALUE rb_w32_conv_from_wchar(const WCHAR *wstr, rb_encoding *enc) { @@ -1926,7 +1935,7 @@ rb_w32_conv_from_wchar(const WCHAR *wstr, rb_encoding *enc) return rb_str_encode(src, rb_enc_from_encoding(enc), ECONV_UNDEF_REPLACE, Qnil); } -/* non GPL */ +/* License: Ruby's */ char * rb_w32_conv_from_wstr(const WCHAR *wstr, long *lenp, rb_encoding *enc) { @@ -1941,7 +1950,7 @@ rb_w32_conv_from_wstr(const WCHAR *wstr, long *lenp, rb_encoding *enc) return ptr; } -/* non GPL */ +/* License: Ruby's */ static BOOL ruby_direct_conv(const WCHAR *file, struct direct *entry, rb_encoding *enc) { @@ -1950,7 +1959,7 @@ ruby_direct_conv(const WCHAR *file, struct direct *entry, rb_encoding *enc) return TRUE; } -/* GPL */ +/* License: Artistic or GPL */ static struct direct * readdir_internal(DIR *dirp, BOOL (*conv)(const WCHAR *, struct direct *, rb_encoding *), rb_encoding *enc) { @@ -1989,14 +1998,14 @@ readdir_internal(DIR *dirp, BOOL (*conv)(const WCHAR *, struct direct *, rb_enco return NULL; } -/* non GPL */ +/* License: Ruby's */ struct direct * rb_w32_readdir(DIR *dirp) { return readdir_internal(dirp, win32_direct_conv, NULL); } -/* non GPL */ +/* License: Ruby's */ struct direct * rb_w32_readdir_with_enc(DIR *dirp, rb_encoding *enc) { @@ -2010,7 +2019,7 @@ rb_w32_readdir_with_enc(DIR *dirp, rb_encoding *enc) // Telldir returns the current string pointer position // -/* GPL */ +/* License: Artistic or GPL */ long rb_w32_telldir(DIR *dirp) { @@ -2021,7 +2030,7 @@ rb_w32_telldir(DIR *dirp) // Seekdir moves the string pointer to a previously saved position // (Saved by telldir). -/* non GPL */ +/* License: Ruby's */ void rb_w32_seekdir(DIR *dirp, long loc) { @@ -2036,7 +2045,7 @@ rb_w32_seekdir(DIR *dirp, long loc) // Rewinddir resets the string pointer to the start // -/* GPL */ +/* License: Artistic or GPL */ void rb_w32_rewinddir(DIR *dirp) { @@ -2048,7 +2057,7 @@ rb_w32_rewinddir(DIR *dirp) // This just free's the memory allocated by opendir // -/* GPL */ +/* License: Artistic or GPL */ void rb_w32_closedir(DIR *dirp) { @@ -2077,7 +2086,7 @@ rb_w32_closedir(DIR *dirp) # define STHREAD_ONLY(x) x #endif -/* non GPL */ +/* License: Ruby's */ typedef struct { intptr_t osfhnd; /* underlying OS file HANDLE */ char osfile; /* attributes of file (e.g., open in text mode?) */ @@ -2110,7 +2119,7 @@ EXTERN_C _CRTIMP ioinfo * __pioinfo[]; #if RT_VER >= 80 static size_t pioinfo_extra = 0; /* workaround for VC++8 SP1 */ -/* non GPL */ +/* License: Ruby's */ static void set_pioinfo_extra(void) { @@ -2147,14 +2156,14 @@ set_pioinfo_extra(void) static int is_socket(SOCKET); static int is_console(SOCKET); -/* non GPL */ +/* License: Ruby's */ int rb_w32_io_cancelable_p(int fd) { return cancel_io != NULL && (is_socket(TO_SOCKET(fd)) || !is_console(TO_SOCKET(fd))); } -/* non GPL */ +/* License: Ruby's */ static int rb_w32_open_osfhandle(intptr_t osfhandle, int flags) { @@ -2196,7 +2205,7 @@ rb_w32_open_osfhandle(intptr_t osfhandle, int flags) return fh; /* return handle */ } -/* non GPL */ +/* License: Ruby's */ static void init_stdhandle(void) { @@ -2234,14 +2243,14 @@ init_stdhandle(void) #define _set_osfhnd(fh, osfh) (void)((fh), (osfh)) #define _set_osflags(fh, flags) (void)((fh), (flags)) -/* non GPL */ +/* License: Ruby's */ static void init_stdhandle(void) { } #endif -/* non GPL */ +/* License: Ruby's */ #ifdef __BORLANDC__ static int rb_w32_open_osfhandle(intptr_t osfhandle, int flags) @@ -2257,7 +2266,7 @@ rb_w32_open_osfhandle(intptr_t osfhandle, int flags) #undef getsockopt -/* non GPL */ +/* License: Ruby's */ static int is_socket(SOCKET sock) { @@ -2267,7 +2276,7 @@ is_socket(SOCKET sock) return FALSE; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_is_socket(int fd) { @@ -2282,7 +2291,7 @@ rb_w32_is_socket(int fd) #undef strerror -/* GPL */ +/* License: Artistic or GPL */ char * rb_w32_strerror(int e) { @@ -2350,42 +2359,42 @@ rb_w32_strerror(int e) #define ROOT_UID 0 #define ROOT_GID 0 -/* GPL */ +/* License: Artistic or GPL */ rb_uid_t getuid(void) { return ROOT_UID; } -/* GPL */ +/* License: Artistic or GPL */ rb_uid_t geteuid(void) { return ROOT_UID; } -/* GPL */ +/* License: Artistic or GPL */ rb_gid_t getgid(void) { return ROOT_GID; } -/* GPL */ +/* License: Artistic or GPL */ rb_gid_t getegid(void) { return ROOT_GID; } -/* GPL */ +/* License: Artistic or GPL */ int setuid(rb_uid_t uid) { return (uid == ROOT_UID ? 0 : -1); } -/* GPL */ +/* License: Artistic or GPL */ int setgid(rb_gid_t gid) { @@ -2396,7 +2405,7 @@ setgid(rb_gid_t gid) // File system stuff // -/* GPL */ +/* License: Artistic or GPL */ int ioctl(int i, int u, ...) { @@ -2427,7 +2436,7 @@ rb_w32_fdset(int fd, fd_set *set) #undef FD_CLR -/* non GPL */ +/* License: Ruby's */ void rb_w32_fdclr(int fd, fd_set *set) { @@ -2445,7 +2454,7 @@ rb_w32_fdclr(int fd, fd_set *set) #undef FD_ISSET -/* non GPL */ +/* License: Ruby's */ int rb_w32_fdisset(int fd, fd_set *set) { @@ -2457,7 +2466,7 @@ rb_w32_fdisset(int fd, fd_set *set) return ret; } -/* non GPL */ +/* License: Ruby's */ void rb_w32_fd_dup(rb_fdset_t *dst, const rb_fdset_t *src) { @@ -2478,7 +2487,7 @@ rb_w32_fd_dup(rb_fdset_t *dst, const rb_fdset_t *src) #undef select -/* non GPL */ +/* License: Ruby's */ static int extract_fd(rb_fdset_t *dst, fd_set *src, int (*func)(SOCKET)) { @@ -2520,7 +2529,7 @@ extract_fd(rb_fdset_t *dst, fd_set *src, int (*func)(SOCKET)) return dst ? dst->fdset->fd_count : m; } -/* non GPL */ +/* License: Ruby's */ static int copy_fd(fd_set *dst, fd_set *src) { @@ -2542,14 +2551,14 @@ copy_fd(fd_set *dst, fd_set *src) return dst->fd_count; } -/* non GPL */ +/* License: Ruby's */ static int is_not_socket(SOCKET sock) { return !is_socket(sock); } -/* non GPL */ +/* License: Ruby's */ static int is_pipe(SOCKET sock) /* DONT call this for SOCKET! it clains it is PIPE. */ { @@ -2562,7 +2571,7 @@ is_pipe(SOCKET sock) /* DONT call this for SOCKET! it clains it is PIPE. */ return ret; } -/* non GPL */ +/* License: Ruby's */ static int is_readable_pipe(SOCKET sock) /* call this for pipe only */ { @@ -2581,7 +2590,7 @@ is_readable_pipe(SOCKET sock) /* call this for pipe only */ return ret; } -/* non GPL */ +/* License: Ruby's */ static int is_console(SOCKET sock) /* DONT call this for SOCKET! */ { @@ -2596,7 +2605,7 @@ is_console(SOCKET sock) /* DONT call this for SOCKET! */ return ret; } -/* non GPL */ +/* License: Ruby's */ static int is_readable_console(SOCKET sock) /* call this for console only */ { @@ -2619,14 +2628,14 @@ is_readable_console(SOCKET sock) /* call this for console only */ return ret; } -/* non GPL */ +/* License: Ruby's */ static int is_invalid_handle(SOCKET sock) { return (HANDLE)sock == INVALID_HANDLE_VALUE; } -/* GPL */ +/* License: Artistic or GPL */ static int do_select(int nfds, fd_set *rd, fd_set *wr, fd_set *ex, struct timeval *timeout) @@ -2658,7 +2667,7 @@ do_select(int nfds, fd_set *rd, fd_set *wr, fd_set *ex, * rest -= wait * return 0 if rest is smaller than wait. */ -/* non GPL */ +/* License: Ruby's */ int rb_w32_time_subtract(struct timeval *rest, const struct timeval *wait) { @@ -2677,7 +2686,7 @@ rb_w32_time_subtract(struct timeval *rest, const struct timeval *wait) return rest->tv_sec != 0 || rest->tv_usec != 0; } -/* non GPL */ +/* License: Ruby's */ static inline int compare(const struct timeval *t1, const struct timeval *t2) { @@ -2697,7 +2706,7 @@ compare(const struct timeval *t1, const struct timeval *t2) int rb_w32_check_interrupt(void *); /* @internal */ /* @internal */ -/* non GPL */ +/* License: Ruby's */ int rb_w32_select_with_thread(int nfds, fd_set *rd, fd_set *wr, fd_set *ex, struct timeval *timeout, void *th) @@ -2835,7 +2844,7 @@ rb_w32_select_with_thread(int nfds, fd_set *rd, fd_set *wr, fd_set *ex, return r; } -/* non GPL */ +/* License: Ruby's */ int WSAAPI rb_w32_select(int nfds, fd_set *rd, fd_set *wr, fd_set *ex, struct timeval *timeout) @@ -2843,7 +2852,7 @@ rb_w32_select(int nfds, fd_set *rd, fd_set *wr, fd_set *ex, return rb_w32_select_with_thread(nfds, rd, wr, ex, timeout, 0); } -/* non GPL */ +/* License: Ruby's */ static FARPROC get_wsa_extension_function(SOCKET s, GUID *guid) { @@ -2859,7 +2868,7 @@ get_wsa_extension_function(SOCKET s, GUID *guid) #undef accept -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_accept(int s, struct sockaddr *addr, int *addrlen) { @@ -2895,7 +2904,7 @@ rb_w32_accept(int s, struct sockaddr *addr, int *addrlen) #undef bind -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_bind(int s, const struct sockaddr *addr, int addrlen) { @@ -2914,7 +2923,7 @@ rb_w32_bind(int s, const struct sockaddr *addr, int addrlen) #undef connect -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_connect(int s, const struct sockaddr *addr, int addrlen) { @@ -2938,7 +2947,7 @@ rb_w32_connect(int s, const struct sockaddr *addr, int addrlen) #undef getpeername -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_getpeername(int s, struct sockaddr *addr, int *addrlen) { @@ -2956,7 +2965,7 @@ rb_w32_getpeername(int s, struct sockaddr *addr, int *addrlen) #undef getsockname -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_getsockname(int s, struct sockaddr *addr, int *addrlen) { @@ -2972,7 +2981,7 @@ rb_w32_getsockname(int s, struct sockaddr *addr, int *addrlen) return r; } -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_getsockopt(int s, int level, int optname, char *optval, int *optlen) { @@ -2990,7 +2999,7 @@ rb_w32_getsockopt(int s, int level, int optname, char *optval, int *optlen) #undef ioctlsocket -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_ioctlsocket(int s, long cmd, u_long *argp) { @@ -3008,7 +3017,7 @@ rb_w32_ioctlsocket(int s, long cmd, u_long *argp) #undef listen -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_listen(int s, int backlog) { @@ -3029,7 +3038,7 @@ rb_w32_listen(int s, int backlog) #undef send #undef sendto -/* non GPL */ +/* License: Ruby's */ static int finish_overlapped_socket(SOCKET s, WSAOVERLAPPED *wol, int result, DWORD *len, DWORD size) { @@ -3068,7 +3077,7 @@ finish_overlapped_socket(SOCKET s, WSAOVERLAPPED *wol, int result, DWORD *len, D return result; } -/* GPL */ +/* License: Artistic or GPL */ static int overlapped_socket_io(BOOL input, int fd, char *buf, int len, int flags, struct sockaddr *addr, int *addrlen) @@ -3138,14 +3147,14 @@ overlapped_socket_io(BOOL input, int fd, char *buf, int len, int flags, return r; } -/* non GPL */ +/* License: Ruby's */ int WSAAPI rb_w32_recv(int fd, char *buf, int len, int flags) { return overlapped_socket_io(TRUE, fd, buf, len, flags, NULL, NULL); } -/* non GPL */ +/* License: Ruby's */ int WSAAPI rb_w32_recvfrom(int fd, char *buf, int len, int flags, struct sockaddr *from, int *fromlen) @@ -3153,14 +3162,14 @@ rb_w32_recvfrom(int fd, char *buf, int len, int flags, return overlapped_socket_io(TRUE, fd, buf, len, flags, from, fromlen); } -/* non GPL */ +/* License: Ruby's */ int WSAAPI rb_w32_send(int fd, const char *buf, int len, int flags) { return overlapped_socket_io(FALSE, fd, (char *)buf, len, flags, NULL, NULL); } -/* non GPL */ +/* License: Ruby's */ int WSAAPI rb_w32_sendto(int fd, const char *buf, int len, int flags, const struct sockaddr *to, int tolen) @@ -3170,7 +3179,7 @@ rb_w32_sendto(int fd, const char *buf, int len, int flags, } #if !defined(MSG_TRUNC) && !defined(__MINGW32__) -/* non GPL */ +/* License: Ruby's */ typedef struct { SOCKADDR *name; int namelen; @@ -3187,7 +3196,7 @@ typedef struct { #define WSAID_WSASENDMSG {0xa441e712,0x754f,0x43ca,{0x84,0xa7,0x0d,0xee,0x44,0xcf,0x60,0x6d}} #endif -/* non GPL */ +/* License: Ruby's */ #define msghdr_to_wsamsg(msg, wsamsg) \ do { \ int i; \ @@ -3204,7 +3213,7 @@ typedef struct { (wsamsg)->dwFlags = (msg)->msg_flags; \ } while (0) -/* non GPL */ +/* License: Ruby's */ int recvmsg(int fd, struct msghdr *msg, int flags) { @@ -3264,7 +3273,7 @@ recvmsg(int fd, struct msghdr *msg, int flags) return len; } -/* non GPL */ +/* License: Ruby's */ int sendmsg(int fd, const struct msghdr *msg, int flags) { @@ -3318,7 +3327,7 @@ sendmsg(int fd, const struct msghdr *msg, int flags) #undef setsockopt -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_setsockopt(int s, int level, int optname, const char *optval, int optlen) { @@ -3336,7 +3345,7 @@ rb_w32_setsockopt(int s, int level, int optname, const char *optval, int optlen) #undef shutdown -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_shutdown(int s, int how) { @@ -3352,7 +3361,7 @@ rb_w32_shutdown(int s, int how) return r; } -/* non GPL */ +/* License: Ruby's */ static SOCKET open_ifs_socket(int af, int type, int protocol) { @@ -3402,7 +3411,7 @@ open_ifs_socket(int af, int type, int protocol) #undef socket -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_socket(int af, int type, int protocol) { @@ -3431,7 +3440,7 @@ rb_w32_socket(int af, int type, int protocol) #undef gethostbyaddr -/* GPL */ +/* License: Artistic or GPL */ struct hostent * WSAAPI rb_w32_gethostbyaddr(const char *addr, int len, int type) { @@ -3449,7 +3458,7 @@ rb_w32_gethostbyaddr(const char *addr, int len, int type) #undef gethostbyname -/* GPL */ +/* License: Artistic or GPL */ struct hostent * WSAAPI rb_w32_gethostbyname(const char *name) { @@ -3467,7 +3476,7 @@ rb_w32_gethostbyname(const char *name) #undef gethostname -/* GPL */ +/* License: Artistic or GPL */ int WSAAPI rb_w32_gethostname(char *name, int len) { @@ -3485,7 +3494,7 @@ rb_w32_gethostname(char *name, int len) #undef getprotobyname -/* GPL */ +/* License: Artistic or GPL */ struct protoent * WSAAPI rb_w32_getprotobyname(const char *name) { @@ -3503,7 +3512,7 @@ rb_w32_getprotobyname(const char *name) #undef getprotobynumber -/* GPL */ +/* License: Artistic or GPL */ struct protoent * WSAAPI rb_w32_getprotobynumber(int num) { @@ -3521,7 +3530,7 @@ rb_w32_getprotobynumber(int num) #undef getservbyname -/* GPL */ +/* License: Artistic or GPL */ struct servent * WSAAPI rb_w32_getservbyname(const char *name, const char *proto) { @@ -3539,7 +3548,7 @@ rb_w32_getservbyname(const char *name, const char *proto) #undef getservbyport -/* GPL */ +/* License: Artistic or GPL */ struct servent * WSAAPI rb_w32_getservbyport(int port, const char *proto) { @@ -3555,7 +3564,7 @@ rb_w32_getservbyport(int port, const char *proto) return r; } -/* non GPL */ +/* License: Ruby's */ static int socketpair_internal(int af, int type, int protocol, SOCKET *sv) { @@ -3646,7 +3655,7 @@ socketpair_internal(int af, int type, int protocol, SOCKET *sv) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_socketpair(int af, int type, int protocol, int *sv) { @@ -3699,7 +3708,7 @@ void setprotoent (int stayopen) {} void setservent (int stayopen) {} -/* non GPL */ +/* License: Ruby's */ int fcntl(int fd, int cmd, ...) { @@ -3748,7 +3757,7 @@ fcntl(int fd, int cmd, ...) #define WNOHANG -1 #endif -/* non GPL */ +/* License: Ruby's */ static rb_pid_t poll_child_status(struct ChildRecord *child, int *stat_loc) { @@ -3784,20 +3793,20 @@ poll_child_status(struct ChildRecord *child, int *stat_loc) return 0; } -/* GPL */ +/* License: Artistic or GPL */ rb_pid_t waitpid(rb_pid_t pid, int *stat_loc, int options) { DWORD timeout; - /* GPL start */ + /* Artistic or GPL part start */ if (options == WNOHANG) { timeout = 0; } else { timeout = INFINITE; } - /* GPL end */ + /* Artistic or GPL part end */ if (pid == -1) { int count = 0; @@ -3848,7 +3857,7 @@ waitpid(rb_pid_t pid, int *stat_loc, int options) #include <sys/timeb.h> -/* non GPL */ +/* License: Ruby's */ static int filetime_to_timeval(const FILETIME* ft, struct timeval *tv) { @@ -3872,7 +3881,7 @@ filetime_to_timeval(const FILETIME* ft, struct timeval *tv) return tv->tv_sec > 0 ? 0 : -1; } -/* non GPL */ +/* License: Ruby's */ int _cdecl gettimeofday(struct timeval *tv, struct timezone *tz) { @@ -3884,7 +3893,7 @@ gettimeofday(struct timeval *tv, struct timezone *tz) return 0; } -/* non GPL */ +/* License: Ruby's */ char * rb_w32_getcwd(char *buffer, int size) { @@ -3924,21 +3933,21 @@ rb_w32_getcwd(char *buffer, int size) return p; } -/* GPL */ +/* License: Artistic or GPL */ int chown(const char *path, int owner, int group) { return 0; } -/* GPL */ +/* License: Artistic or GPL */ int rb_w32_uchown(const char *path, int owner, int group) { return 0; } -/* non GPL */ +/* License: Ruby's */ int kill(int pid, int sig) { @@ -4043,7 +4052,7 @@ kill(int pid, int sig) return ret; } -/* non GPL */ +/* License: Ruby's */ static int wlink(const WCHAR *from, const WCHAR *to) { @@ -4069,7 +4078,7 @@ wlink(const WCHAR *from, const WCHAR *to) return 0; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_ulink(const char *from, const char *to) { @@ -4089,7 +4098,7 @@ rb_w32_ulink(const char *from, const char *to) return ret; } -/* non GPL */ +/* License: Ruby's */ int link(const char *from, const char *to) { @@ -4109,14 +4118,14 @@ link(const char *from, const char *to) return ret; } -/* non GPL */ +/* License: Ruby's */ int wait(int *status) { return waitpid(-1, status, 0); } -/* non GPL */ +/* License: Ruby's */ char * rb_w32_getenv(const char *name) { @@ -4138,7 +4147,7 @@ rb_w32_getenv(const char *name) return NULL; } -/* GPL */ +/* License: Artistic or GPL */ static int wrename(const WCHAR *oldpath, const WCHAR *newpath) { @@ -4191,7 +4200,7 @@ wrename(const WCHAR *oldpath, const WCHAR *newpath) return res; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_urename(const char *from, const char *to) { WCHAR *wfrom; @@ -4210,7 +4219,7 @@ int rb_w32_urename(const char *from, const char *to) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_rename(const char *from, const char *to) { WCHAR *wfrom; @@ -4229,7 +4238,7 @@ int rb_w32_rename(const char *from, const char *to) return ret; } -/* non GPL */ +/* License: Ruby's */ static int isUNCRoot(const WCHAR *path) { @@ -4267,7 +4276,7 @@ isUNCRoot(const WCHAR *path) #ifdef __BORLANDC__ #undef fstat -/* non GPL */ +/* License: Ruby's */ int rb_w32_fstat(int fd, struct stat *st) { @@ -4283,7 +4292,7 @@ rb_w32_fstat(int fd, struct stat *st) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_fstati64(int fd, struct stati64 *st) { @@ -4304,7 +4313,7 @@ rb_w32_fstati64(int fd, struct stati64 *st) } #endif -/* non GPL */ +/* License: Ruby's */ static time_t filetime_to_unixtime(const FILETIME *ft) { @@ -4316,7 +4325,7 @@ filetime_to_unixtime(const FILETIME *ft) return tv.tv_sec; } -/* non GPL */ +/* License: Ruby's */ static unsigned fileattr_to_unixmode(DWORD attr, const WCHAR *path) { @@ -4358,7 +4367,7 @@ fileattr_to_unixmode(DWORD attr, const WCHAR *path) return mode; } -/* non GPL */ +/* License: Ruby's */ static int check_valid_dir(const WCHAR *path) { @@ -4370,7 +4379,7 @@ check_valid_dir(const WCHAR *path) return 0; } -/* non GPL */ +/* License: Ruby's */ static int winnt_stat(const WCHAR *path, struct stati64 *st) { @@ -4414,7 +4423,7 @@ winnt_stat(const WCHAR *path, struct stati64 *st) } #ifdef WIN95 -/* non GPL */ +/* License: Ruby's */ static int win95_stat(const WCHAR *path, struct stati64 *st) { @@ -4429,7 +4438,7 @@ win95_stat(const WCHAR *path, struct stati64 *st) #define win95_stat(path, st) -1 #endif -/* non GPL */ +/* License: Ruby's */ int rb_w32_stat(const char *path, struct stat *st) { @@ -4440,7 +4449,7 @@ rb_w32_stat(const char *path, struct stat *st) return 0; } -/* non GPL */ +/* License: Ruby's */ static int wstati64(const WCHAR *path, struct stati64 *st) { @@ -4489,7 +4498,7 @@ wstati64(const WCHAR *path, struct stati64 *st) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_ustati64(const char *path, struct stati64 *st) { @@ -4503,7 +4512,7 @@ rb_w32_ustati64(const char *path, struct stati64 *st) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_stati64(const char *path, struct stati64 *st) { @@ -4517,7 +4526,7 @@ rb_w32_stati64(const char *path, struct stati64 *st) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_access(const char *path, int mode) { @@ -4532,7 +4541,7 @@ rb_w32_access(const char *path, int mode) return 0; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_uaccess(const char *path, int mode) { @@ -4547,7 +4556,7 @@ rb_w32_uaccess(const char *path, int mode) return 0; } -/* non GPL */ +/* License: Ruby's */ static int rb_chsize(HANDLE h, off_t size) { @@ -4579,7 +4588,7 @@ rb_chsize(HANDLE h, off_t size) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_truncate(const char *path, off_t length) { @@ -4606,7 +4615,7 @@ rb_w32_truncate(const char *path, off_t length) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_ftruncate(int fd, off_t length) { @@ -4623,7 +4632,7 @@ rb_w32_ftruncate(int fd, off_t length) } #ifdef __BORLANDC__ -/* non GPL */ +/* License: Ruby's */ off_t _filelengthi64(int fd) { @@ -4638,7 +4647,7 @@ _filelengthi64(int fd) return ((off_t)u << 32) | l; } -/* non GPL */ +/* License: Ruby's */ off_t _lseeki64(int fd, off_t offset, int whence) { @@ -4660,7 +4669,7 @@ _lseeki64(int fd, off_t offset, int whence) } #endif -/* non GPL */ +/* License: Ruby's */ int fseeko(FILE *stream, off_t offset, int whence) { @@ -4683,7 +4692,7 @@ fseeko(FILE *stream, off_t offset, int whence) return fsetpos(stream, (fpos_t *)&pos); } -/* non GPL */ +/* License: Ruby's */ off_t rb_w32_ftello(FILE *stream) { @@ -4692,7 +4701,7 @@ rb_w32_ftello(FILE *stream) return pos; } -/* non GPL */ +/* License: Ruby's */ static long filetime_to_clock(FILETIME *ft) { @@ -4703,7 +4712,7 @@ filetime_to_clock(FILETIME *ft) return (long) qw; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_times(struct tms *tmbuf) { @@ -4727,7 +4736,7 @@ rb_w32_times(struct tms *tmbuf) #define yield_once() Sleep(0) #define yield_until(condition) do yield_once(); while (!(condition)) -/* non GPL */ +/* License: Ruby's */ static void catch_interrupt(void) { @@ -4737,7 +4746,7 @@ catch_interrupt(void) #if defined __BORLANDC__ #undef read -/* non GPL */ +/* License: Ruby's */ int read(int fd, void *buf, size_t size) { @@ -4752,7 +4761,7 @@ read(int fd, void *buf, size_t size) #endif #undef fgetc -/* non GPL */ +/* License: Ruby's */ int rb_w32_getc(FILE* stream) { @@ -4773,7 +4782,7 @@ rb_w32_getc(FILE* stream) } #undef fputc -/* non GPL */ +/* License: Ruby's */ int rb_w32_putc(int c, FILE* stream) { @@ -4787,7 +4796,7 @@ rb_w32_putc(int c, FILE* stream) return c; } -/* non GPL */ +/* License: Ruby's */ struct asynchronous_arg_t { /* output field */ void* stackaddr; @@ -4800,7 +4809,7 @@ struct asynchronous_arg_t { uintptr_t* argv; }; -/* non GPL */ +/* License: Ruby's */ static DWORD WINAPI call_asynchronous(PVOID argp) { @@ -4812,7 +4821,7 @@ call_asynchronous(PVOID argp) return ret; } -/* non GPL */ +/* License: Ruby's */ uintptr_t rb_w32_asynchronize(asynchronous_func_t func, uintptr_t self, int argc, uintptr_t* argv, uintptr_t intrval) @@ -4875,7 +4884,7 @@ rb_w32_asynchronize(asynchronous_func_t func, uintptr_t self, return val; } -/* non GPL */ +/* License: Ruby's */ char ** rb_w32_get_environ(void) { @@ -4911,7 +4920,7 @@ rb_w32_get_environ(void) return myenvtop; } -/* non GPL */ +/* License: Ruby's */ void rb_w32_free_environ(char **env) { @@ -4921,7 +4930,7 @@ rb_w32_free_environ(char **env) free(env); } -/* non GPL */ +/* License: Ruby's */ rb_pid_t rb_w32_getpid(void) { @@ -4935,7 +4944,7 @@ rb_w32_getpid(void) } -/* non GPL */ +/* License: Ruby's */ rb_pid_t rb_w32_getppid(void) { @@ -4966,7 +4975,7 @@ rb_w32_getppid(void) return ppid; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_uopen(const char *file, int oflag, ...) { @@ -4986,7 +4995,7 @@ rb_w32_uopen(const char *file, int oflag, ...) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_open(const char *file, int oflag, ...) { @@ -5176,7 +5185,7 @@ rb_w32_wopen(const WCHAR *file, int oflag, ...) return fd; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_fclose(FILE *fp) { @@ -5199,7 +5208,7 @@ rb_w32_fclose(FILE *fp) return 0; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_pipe(int fds[2]) { @@ -5292,7 +5301,7 @@ rb_w32_pipe(int fds[2]) return 0; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_close(int fd) { @@ -5318,7 +5327,7 @@ rb_w32_close(int fd) } #undef read -/* non GPL */ +/* License: Ruby's */ ssize_t rb_w32_read(int fd, void *buf, size_t size) { @@ -5475,7 +5484,7 @@ rb_w32_read(int fd, void *buf, size_t size) } #undef write -/* non GPL */ +/* License: Ruby's */ ssize_t rb_w32_write(int fd, const void *buf, size_t size) { @@ -5601,7 +5610,7 @@ rb_w32_write(int fd, const void *buf, size_t size) return ret; } -/* non GPL */ +/* License: Ruby's */ long rb_w32_write_console(uintptr_t strarg, int fd) { @@ -5627,7 +5636,7 @@ rb_w32_write_console(uintptr_t strarg, int fd) return (long)reslen; } -/* non GPL */ +/* License: Ruby's */ static int unixtime_to_filetime(time_t time, FILETIME *ft) { @@ -5652,7 +5661,7 @@ unixtime_to_filetime(time_t time, FILETIME *ft) return 0; } -/* non GPL */ +/* License: Ruby's */ static int wutime(const WCHAR *path, const struct utimbuf *times) { @@ -5702,7 +5711,7 @@ wutime(const WCHAR *path, const struct utimbuf *times) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_uutime(const char *path, const struct utimbuf *times) { @@ -5716,7 +5725,7 @@ rb_w32_uutime(const char *path, const struct utimbuf *times) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_utime(const char *path, const struct utimbuf *times) { @@ -5730,7 +5739,7 @@ rb_w32_utime(const char *path, const struct utimbuf *times) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_uchdir(const char *path) { @@ -5744,7 +5753,7 @@ rb_w32_uchdir(const char *path) return ret; } -/* non GPL */ +/* License: Ruby's */ static int wmkdir(const WCHAR *wpath, int mode) { @@ -5764,7 +5773,7 @@ wmkdir(const WCHAR *wpath, int mode) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_umkdir(const char *path, int mode) { @@ -5778,7 +5787,7 @@ rb_w32_umkdir(const char *path, int mode) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_mkdir(const char *path, int mode) { @@ -5792,7 +5801,7 @@ rb_w32_mkdir(const char *path, int mode) return ret; } -/* non GPL */ +/* License: Ruby's */ static int wrmdir(const WCHAR *wpath) { @@ -5813,7 +5822,7 @@ wrmdir(const WCHAR *wpath) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_rmdir(const char *path) { @@ -5827,7 +5836,7 @@ rb_w32_rmdir(const char *path) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_urmdir(const char *path) { @@ -5841,7 +5850,7 @@ rb_w32_urmdir(const char *path) return ret; } -/* non GPL */ +/* License: Ruby's */ static int wunlink(const WCHAR *path) { @@ -5862,7 +5871,7 @@ wunlink(const WCHAR *path) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_uunlink(const char *path) { @@ -5876,7 +5885,7 @@ rb_w32_uunlink(const char *path) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_unlink(const char *path) { @@ -5890,7 +5899,7 @@ rb_w32_unlink(const char *path) return ret; } -/* non GPL */ +/* License: Ruby's */ int rb_w32_uchmod(const char *path, int mode) { @@ -5905,7 +5914,7 @@ rb_w32_uchmod(const char *path, int mode) } #if !defined(__BORLANDC__) -/* non GPL */ +/* License: Ruby's */ int rb_w32_isatty(int fd) { @@ -5928,7 +5937,7 @@ rb_w32_isatty(int fd) // #ifdef __BORLANDC__ -/* non GPL */ +/* License: Ruby's */ static int too_many_files(void) { @@ -5940,7 +5949,7 @@ too_many_files(void) } #undef fopen -/* non GPL */ +/* License: Ruby's */ FILE * rb_w32_fopen(const char *path, const char *mode) { @@ -5952,7 +5961,7 @@ rb_w32_fopen(const char *path, const char *mode) return f; } -/* non GPL */ +/* License: Ruby's */ FILE * rb_w32_fdopen(int handle, const char *type) { @@ -5966,7 +5975,7 @@ rb_w32_fdopen(int handle, const char *type) return f; } -/* non GPL */ +/* License: Ruby's */ FILE * rb_w32_fsopen(const char *path, const char *mode, int shflags) { @@ -5981,13 +5990,14 @@ rb_w32_fsopen(const char *path, const char *mode, int shflags) #if defined(_MSC_VER) && RT_VER <= 60 extern long _ftol(double); -/* non GPL */ +/* License: Ruby's */ long _ftol2(double d) { return _ftol(d); } -/* non GPL */ + +/* License: Ruby's */ long _ftol2_sse(double d) { @@ -5996,7 +6006,7 @@ _ftol2_sse(double d) #endif #ifndef signbit -/* non GPL */ +/* License: Ruby's */ int signbit(double x) { @@ -6005,7 +6015,7 @@ signbit(double x) } #endif -/* non GPL */ +/* License: Ruby's */ char * WSAAPI rb_w32_inet_ntop(int af, void *addr, char *numaddr, size_t numaddr_len) { |