… | |
… | |
4 | * Copyright (c) 2007,2008,2009 Marc Alexander Lehmann <libev@schmorp.de> |
4 | * Copyright (c) 2007,2008,2009 Marc Alexander Lehmann <libev@schmorp.de> |
5 | * All rights reserved. |
5 | * All rights reserved. |
6 | * |
6 | * |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
8 | * tion, are permitted provided that the following conditions are met: |
8 | * tion, are permitted provided that the following conditions are met: |
9 | * |
9 | * |
10 | * 1. Redistributions of source code must retain the above copyright notice, |
10 | * 1. Redistributions of source code must retain the above copyright notice, |
11 | * this list of conditions and the following disclaimer. |
11 | * this list of conditions and the following disclaimer. |
12 | * |
12 | * |
13 | * 2. Redistributions in binary form must reproduce the above copyright |
13 | * 2. Redistributions in binary form must reproduce the above copyright |
14 | * notice, this list of conditions and the following disclaimer in the |
14 | * notice, this list of conditions and the following disclaimer in the |
15 | * documentation and/or other materials provided with the distribution. |
15 | * documentation and/or other materials provided with the distribution. |
16 | * |
16 | * |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED |
18 | * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER- |
18 | * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER- |
19 | * CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO |
19 | * CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO |
20 | * EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE- |
20 | * EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE- |
21 | * CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
21 | * CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
… | |
… | |
37 | * either the BSD or the GPL. |
37 | * either the BSD or the GPL. |
38 | */ |
38 | */ |
39 | |
39 | |
40 | #ifdef _WIN32 |
40 | #ifdef _WIN32 |
41 | |
41 | |
42 | /* timeb.h is actually xsi legacy functionality */ |
|
|
43 | #include <sys/timeb.h> |
|
|
44 | |
|
|
45 | /* note: the comment below could not be substantiated, but what would I care */ |
42 | /* note: the comment below could not be substantiated, but what would I care */ |
46 | /* MSDN says this is required to handle SIGFPE */ |
43 | /* MSDN says this is required to handle SIGFPE */ |
47 | /* my wild guess would be that using something floating-pointy is required */ |
44 | /* my wild guess would be that using something floating-pointy is required */ |
48 | /* for the crt to do something about it */ |
45 | /* for the crt to do something about it */ |
49 | volatile double SIGFPE_REQ = 0.0f; |
46 | volatile double SIGFPE_REQ = 0.0f; |
|
|
47 | |
|
|
48 | static SOCKET |
|
|
49 | ev_tcp_socket (void) |
|
|
50 | { |
|
|
51 | #if EV_USE_WSASOCKET |
|
|
52 | return WSASocket (AF_INET, SOCK_STREAM, 0, 0, 0, 0); |
|
|
53 | #else |
|
|
54 | return socket (AF_INET, SOCK_STREAM, 0); |
|
|
55 | #endif |
|
|
56 | } |
50 | |
57 | |
51 | /* oh, the humanity! */ |
58 | /* oh, the humanity! */ |
52 | static int |
59 | static int |
53 | ev_pipe (int filedes [2]) |
60 | ev_pipe (int filedes [2]) |
54 | { |
61 | { |
… | |
… | |
57 | struct sockaddr_in adr2; |
64 | struct sockaddr_in adr2; |
58 | int adr2_size = sizeof (adr2); |
65 | int adr2_size = sizeof (adr2); |
59 | SOCKET listener; |
66 | SOCKET listener; |
60 | SOCKET sock [2] = { -1, -1 }; |
67 | SOCKET sock [2] = { -1, -1 }; |
61 | |
68 | |
62 | if ((listener = socket (AF_INET, SOCK_STREAM, 0)) == INVALID_SOCKET) |
69 | if ((listener = ev_tcp_socket ()) == INVALID_SOCKET) |
63 | return -1; |
70 | return -1; |
64 | |
71 | |
65 | addr.sin_family = AF_INET; |
72 | addr.sin_family = AF_INET; |
66 | addr.sin_addr.s_addr = htonl (INADDR_LOOPBACK); |
73 | addr.sin_addr.s_addr = htonl (INADDR_LOOPBACK); |
67 | addr.sin_port = 0; |
74 | addr.sin_port = 0; |
… | |
… | |
73 | goto fail; |
80 | goto fail; |
74 | |
81 | |
75 | if (listen (listener, 1)) |
82 | if (listen (listener, 1)) |
76 | goto fail; |
83 | goto fail; |
77 | |
84 | |
78 | if ((sock [0] = socket (AF_INET, SOCK_STREAM, 0)) == INVALID_SOCKET) |
85 | if ((sock [0] = ev_tcp_socket ()) == INVALID_SOCKET) |
79 | goto fail; |
86 | goto fail; |
80 | |
87 | |
81 | if (connect (sock [0], (struct sockaddr *)&addr, addr_size)) |
88 | if (connect (sock [0], (struct sockaddr *)&addr, addr_size)) |
82 | goto fail; |
89 | goto fail; |
83 | |
90 | |
|
|
91 | /* TODO: returns INVALID_SOCKET on winsock accept, not < 0. fix it */ |
|
|
92 | /* when convenient, probably by just removing error checking altogether? */ |
84 | if ((sock [1] = accept (listener, 0, 0)) < 0) |
93 | if ((sock [1] = accept (listener, 0, 0)) < 0) |
85 | goto fail; |
94 | goto fail; |
86 | |
95 | |
87 | /* windows vista returns fantasy port numbers for sockets: |
96 | /* windows vista returns fantasy port numbers for sockets: |
88 | * example for two interconnected tcp sockets: |
97 | * example for two interconnected tcp sockets: |
… | |
… | |
109 | goto fail; |
118 | goto fail; |
110 | |
119 | |
111 | closesocket (listener); |
120 | closesocket (listener); |
112 | |
121 | |
113 | #if EV_SELECT_IS_WINSOCKET |
122 | #if EV_SELECT_IS_WINSOCKET |
114 | filedes [0] = _open_osfhandle (sock [0], 0); |
123 | filedes [0] = EV_WIN32_HANDLE_TO_FD (sock [0]); |
115 | filedes [1] = _open_osfhandle (sock [1], 0); |
124 | filedes [1] = EV_WIN32_HANDLE_TO_FD (sock [1]); |
116 | #else |
125 | #else |
117 | /* when select isn't winsocket, we also expect socket, connect, accept etc. |
126 | /* when select isn't winsocket, we also expect socket, connect, accept etc. |
118 | * to work on fds */ |
127 | * to work on fds */ |
119 | filedes [0] = sock [0]; |
128 | filedes [0] = sock [0]; |
120 | filedes [1] = sock [1]; |
129 | filedes [1] = sock [1]; |
… | |
… | |
132 | } |
141 | } |
133 | |
142 | |
134 | #undef pipe |
143 | #undef pipe |
135 | #define pipe(filedes) ev_pipe (filedes) |
144 | #define pipe(filedes) ev_pipe (filedes) |
136 | |
145 | |
137 | static int |
146 | #define EV_HAVE_EV_TIME 1 |
138 | ev_gettimeofday (struct timeval *tv, struct timezone *tz) |
147 | ev_tstamp |
|
|
148 | ev_time (void) |
139 | { |
149 | { |
140 | struct _timeb tb; |
150 | FILETIME ft; |
|
|
151 | ULARGE_INTEGER ui; |
141 | |
152 | |
142 | _ftime (&tb); |
153 | GetSystemTimeAsFileTime (&ft); |
|
|
154 | ui.u.LowPart = ft.dwLowDateTime; |
|
|
155 | ui.u.HighPart = ft.dwHighDateTime; |
143 | |
156 | |
144 | tv->tv_sec = (long)tb.time; |
157 | /* msvc cannot convert ulonglong to double... yes, it is that sucky */ |
145 | tv->tv_usec = ((long)tb.millitm) * 1000; |
158 | return (LONGLONG)(ui.QuadPart - 116444736000000000) * 1e-7; |
146 | |
|
|
147 | return 0; |
|
|
148 | } |
159 | } |
149 | |
|
|
150 | #undef gettimeofday |
|
|
151 | #define gettimeofday(tv,tz) ev_gettimeofday (tv, tz) |
|
|
152 | |
160 | |
153 | #endif |
161 | #endif |
154 | |
162 | |