1 /*=============================================================================
\r
5 ===============================================================================
\r
6 / Copyright (C) 1997-2007 Sota. All rights reserved.
\r
8 / Redistribution and use in source and binary forms, with or without
\r
9 / modification, are permitted provided that the following conditions
\r
12 / 1. Redistributions of source code must retain the above copyright
\r
13 / notice, this list of conditions and the following disclaimer.
\r
14 / 2. Redistributions in binary form must reproduce the above copyright
\r
15 / notice, this list of conditions and the following disclaimer in the
\r
16 / documentation and/or other materials provided with the distribution.
\r
18 / THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
\r
19 / IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
\r
20 / OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
\r
21 / IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
\r
22 / INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
\r
23 / BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
\r
24 / USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
\r
25 / ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
\r
26 / (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
\r
27 / THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
\r
28 /============================================================================*/
\r
32 #include <winsock2.h>
\r
33 #include <windows.h>
\r
38 #include <windowsx.h>
\r
39 #include <commctrl.h>
\r
42 #include "resource.h"
\r
50 // Winsock2で定義される定数と名前が重複し値が異なるため使用不可
\r
51 //#define FD_CONNECT_BIT 0x0001
\r
52 //#define FD_CLOSE_BIT 0x0002
\r
53 //#define FD_ACCEPT_BIT 0x0004
\r
54 //#define FD_READ_BIT 0x0008
\r
55 //#define FD_WRITE_BIT 0x0010
\r
70 struct sockaddr_in HostAddrIPv4;
\r
71 struct sockaddr_in SocksAddrIPv4;
\r
72 struct sockaddr_in6 HostAddrIPv6;
\r
73 struct sockaddr_in6 SocksAddrIPv6;
\r
81 } ASYNCSIGNALDATABASE;
\r
86 //#define MAX_SIGNAL_ENTRY 10
\r
87 //#define MAX_SIGNAL_ENTRY_DBASE 5
\r
88 #define MAX_SIGNAL_ENTRY 16
\r
89 #define MAX_SIGNAL_ENTRY_DBASE 16
\r
94 /*===== プロトタイプ =====*/
\r
96 static LRESULT CALLBACK SocketWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam);
\r
97 static int AskAsyncDone(SOCKET s, int *Error, int Mask);
\r
98 static int AskAsyncDoneDbase(HANDLE Async, int *Error);
\r
99 static int RegisterAsyncTable(SOCKET s);
\r
100 static int RegisterAsyncTableDbase(HANDLE Async);
\r
101 static int UnregisterAsyncTable(SOCKET s);
\r
102 static int UnregisterAsyncTableDbase(HANDLE Async);
\r
105 /*===== 外部参照 =====*/
\r
107 extern int TimeOut;
\r
110 /*===== ローカルなワーク =====*/
\r
112 static const char SocketWndClass[] = "FFFTPSocketWnd";
\r
113 static HWND hWndSocket;
\r
115 static ASYNCSIGNAL Signal[MAX_SIGNAL_ENTRY];
\r
116 static ASYNCSIGNALDATABASE SignalDbase[MAX_SIGNAL_ENTRY_DBASE];
\r
118 //static HANDLE hAsyncTblAccMutex;
\r
120 static HANDLE hAsyncTblAccMutex;
\r
132 * FFFTP_SUCCESS/FFFTP_FAIL
\r
133 *----------------------------------------------------------------------------*/
\r
135 int MakeSocketWin(HWND hWnd, HINSTANCE hInst)
\r
141 wClass.cbSize = sizeof(WNDCLASSEX);
\r
143 wClass.lpfnWndProc = SocketWndProc;
\r
144 wClass.cbClsExtra = 0;
\r
145 wClass.cbWndExtra = 0;
\r
146 wClass.hInstance = hInst;
\r
147 wClass.hIcon = NULL;
\r
148 wClass.hCursor = NULL;
\r
149 wClass.hbrBackground = (HBRUSH)CreateSolidBrush(GetSysColor(COLOR_INFOBK));
\r
150 wClass.lpszMenuName = NULL;
\r
151 wClass.lpszClassName = SocketWndClass;
\r
152 wClass.hIconSm = NULL;
\r
153 RegisterClassEx(&wClass);
\r
156 hWndSocket = CreateWindowEx(0, SocketWndClass, NULL,
\r
157 WS_BORDER | WS_POPUP,
\r
159 hWnd, NULL, hInst, NULL);
\r
161 if(hWndSocket != NULL)
\r
163 // hAsyncTblAccMutex = CreateMutex(NULL, FALSE, NULL);
\r
166 // for(i = 0; i < MAX_SIGNAL_ENTRY; i++)
\r
167 // Signal[i].Socket = INVALID_SOCKET;
\r
168 // for(i = 0; i < MAX_SIGNAL_ENTRY_DBASE; i++)
\r
169 // SignalDbase[i].Async = 0;
\r
170 if(hAsyncTblAccMutex = CreateMutex(NULL, FALSE, NULL))
\r
172 for(i = 0; i < MAX_SIGNAL_ENTRY; i++)
\r
173 Signal[i].Socket = INVALID_SOCKET;
\r
174 for(i = 0; i < MAX_SIGNAL_ENTRY_DBASE; i++)
\r
175 SignalDbase[i].Async = 0;
\r
177 Sts = FFFTP_SUCCESS;
\r
190 *----------------------------------------------------------------------------*/
\r
192 void DeleteSocketWin(void)
\r
194 // CloseHandle(hAsyncTblAccMutex);
\r
196 CloseHandle(hAsyncTblAccMutex);
\r
197 hAsyncTblAccMutex = NULL;
\r
199 if(hWndSocket != NULL)
\r
200 DestroyWindow(hWndSocket);
\r
208 * HWND hWnd : ウインドウハンドル
\r
209 * UINT message : メッセージ番号
\r
210 * WPARAM wParam : メッセージの WPARAM 引数
\r
211 * LPARAM lParam : メッセージの LPARAM 引数
\r
215 *----------------------------------------------------------------------------*/
\r
217 static LRESULT CALLBACK SocketWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
\r
223 case WM_ASYNC_SOCKET :
\r
225 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
226 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
228 if(Signal[Pos].Socket == (SOCKET)wParam)
\r
230 Signal[Pos].Error = WSAGETSELECTERROR(lParam);
\r
232 if(WSAGETSELECTERROR(lParam) != 0)
\r
233 DoPrintf("####### Signal: error (%d)", WSAGETSELECTERROR(lParam));
\r
236 switch(WSAGETSELECTEVENT(lParam))
\r
239 Signal[Pos].FdConnect = 1;
\r
241 DoPrintf("####### Signal: connect (S=%x)", Signal[Pos].Socket);
\r
246 Signal[Pos].FdClose = 1;
\r
248 DoPrintf("####### Signal: close (S=%x)", Signal[Pos].Socket);
\r
250 //SetTaskMsg("####### Signal: close (%d) (S=%x)", Pos, Signal[Pos].Socket);
\r
254 Signal[Pos].FdAccept = 1;
\r
256 DoPrintf("####### Signal: accept (S=%x)", Signal[Pos].Socket);
\r
261 Signal[Pos].FdRead = 1;
\r
263 DoPrintf("####### Signal: read (S=%x)", Signal[Pos].Socket);
\r
268 Signal[Pos].FdWrite = 1;
\r
270 DoPrintf("####### Signal: write (S=%x)", Signal[Pos].Socket);
\r
278 ReleaseMutex(hAsyncTblAccMutex);
\r
281 case WM_ASYNC_DBASE :
\r
282 // APIの仕様上ハンドルが登録される前にウィンドウメッセージが呼び出される可能性あり
\r
283 RegisterAsyncTableDbase((HANDLE)wParam);
\r
285 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
286 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY_DBASE; Pos++)
\r
288 if(SignalDbase[Pos].Async == (HANDLE)wParam)
\r
290 if(HIWORD(lParam) != 0)
\r
292 SignalDbase[Pos].ErrorDb = 1;
\r
294 DoPrintf("##### SignalDatabase: error");
\r
297 SignalDbase[Pos].Done = 1;
\r
299 DoPrintf("##### SignalDatabase: Done");
\r
305 ReleaseMutex(hAsyncTblAccMutex);
\r
309 return(DefWindowProc(hWnd, message, wParam, lParam));
\r
324 *----------------------------------------------------------------------------*/
\r
326 static int AskAsyncDone(SOCKET s, int *Error, int Mask)
\r
332 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
335 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
337 if(Signal[Pos].Socket == s)
\r
339 *Error = Signal[Pos].Error;
\r
340 if(Signal[Pos].Error != 0)
\r
342 if((Mask & FD_CONNECT) && (Signal[Pos].FdConnect != 0))
\r
346 DoPrintf("### Ask: connect (Sts=%d, Error=%d)", Sts, *Error);
\r
349 if((Mask & FD_CLOSE) && (Signal[Pos].FdClose != 0))
\r
350 // if(Mask & FD_CLOSE)
\r
354 DoPrintf("### Ask: close (Sts=%d, Error=%d)", Sts, *Error);
\r
357 if((Mask & FD_ACCEPT) && (Signal[Pos].FdAccept != 0))
\r
359 Signal[Pos].FdAccept = 0;
\r
362 DoPrintf("### Ask: accept (Sts=%d, Error=%d)", Sts, *Error);
\r
365 if((Mask & FD_READ) && (Signal[Pos].FdRead != 0))
\r
367 Signal[Pos].FdRead = 0;
\r
370 DoPrintf("### Ask: read (Sts=%d, Error=%d)", Sts, *Error);
\r
373 if((Mask & FD_WRITE) && (Signal[Pos].FdWrite != 0))
\r
375 Signal[Pos].FdWrite = 0;
\r
378 DoPrintf("### Ask: write (Sts=%d, Error=%d)", Sts, *Error);
\r
385 ReleaseMutex(hAsyncTblAccMutex);
\r
387 if(Pos == MAX_SIGNAL_ENTRY)
\r
389 if(Mask & FD_CLOSE)
\r
395 MessageBox(GetMainHwnd(), "AskAsyncDone called with unregisterd socket.", "FFFTP inner error", MB_OK);
\r
410 *----------------------------------------------------------------------------*/
\r
412 static int AskAsyncDoneDbase(HANDLE Async, int *Error)
\r
418 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
421 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY_DBASE; Pos++)
\r
423 if(SignalDbase[Pos].Async == Async)
\r
425 if(SignalDbase[Pos].Done != 0)
\r
427 *Error = SignalDbase[Pos].ErrorDb;
\r
430 DoPrintf("### Ask: Dbase (Sts=%d, Error=%d)", Sts, *Error);
\r
437 ReleaseMutex(hAsyncTblAccMutex);
\r
439 if(Pos == MAX_SIGNAL_ENTRY_DBASE)
\r
441 MessageBox(GetMainHwnd(), "AskAsyncDoneDbase called with unregisterd handle.", "FFFTP inner error", MB_OK);
\r
456 *----------------------------------------------------------------------------*/
\r
458 static int RegisterAsyncTable(SOCKET s)
\r
464 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
466 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
468 if(Signal[Pos].Socket == s)
\r
470 // 強制的に閉じられたソケットがあると重複する可能性あり
\r
471 // MessageBox(GetMainHwnd(), "Async socket already registerd.", "FFFTP inner error", MB_OK);
\r
473 Signal[Pos].Socket = INVALID_SOCKET;
\r
477 ReleaseMutex(hAsyncTblAccMutex);
\r
479 if(Pos == MAX_SIGNAL_ENTRY)
\r
482 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
483 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
485 if(Signal[Pos].Socket == INVALID_SOCKET)
\r
488 //SetTaskMsg("############### Regist socket (%d)", Pos);
\r
490 Signal[Pos].Socket = s;
\r
491 Signal[Pos].Error = 0;
\r
492 Signal[Pos].FdConnect = 0;
\r
493 Signal[Pos].FdClose = 0;
\r
494 Signal[Pos].FdAccept = 0;
\r
495 Signal[Pos].FdRead = 0;
\r
496 Signal[Pos].FdWrite = 0;
\r
498 memset(&Signal[Pos].HostAddrIPv4, 0, sizeof(struct sockaddr_in));
\r
499 memset(&Signal[Pos].SocksAddrIPv4, 0, sizeof(struct sockaddr_in));
\r
500 memset(&Signal[Pos].HostAddrIPv6, 0, sizeof(struct sockaddr_in6));
\r
501 memset(&Signal[Pos].SocksAddrIPv6, 0, sizeof(struct sockaddr_in6));
\r
507 ReleaseMutex(hAsyncTblAccMutex);
\r
509 if(Pos == MAX_SIGNAL_ENTRY)
\r
511 MessageBox(GetMainHwnd(), "No more async regist space.", "FFFTP inner error", MB_OK);
\r
527 *----------------------------------------------------------------------------*/
\r
529 static int RegisterAsyncTableDbase(HANDLE Async)
\r
535 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
537 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY_DBASE; Pos++)
\r
539 if(SignalDbase[Pos].Async == Async)
\r
541 // 強制的に閉じられたハンドルがあると重複する可能性あり
\r
542 // MessageBox(GetMainHwnd(), "Async handle already registerd.", "FFFTP inner error", MB_OK);
\r
543 // APIの仕様上ハンドルが登録される前にウィンドウメッセージが呼び出される可能性あり
\r
548 ReleaseMutex(hAsyncTblAccMutex);
\r
550 if(Pos == MAX_SIGNAL_ENTRY_DBASE)
\r
553 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
554 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
556 if(SignalDbase[Pos].Async == 0)
\r
559 //SetTaskMsg("############### Regist dbase (%d)", Pos);
\r
561 SignalDbase[Pos].Async = Async;
\r
562 SignalDbase[Pos].Done = 0;
\r
563 SignalDbase[Pos].ErrorDb = 0;
\r
569 ReleaseMutex(hAsyncTblAccMutex);
\r
571 if(Pos == MAX_SIGNAL_ENTRY_DBASE)
\r
573 MessageBox(GetMainHwnd(), "No more async dbase regist space.", "FFFTP inner error", MB_OK);
\r
589 *----------------------------------------------------------------------------*/
\r
591 static int UnregisterAsyncTable(SOCKET s)
\r
597 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
599 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
601 if(Signal[Pos].Socket == s)
\r
604 //SetTaskMsg("############### UnRegist socket (%d)", Pos);
\r
606 Signal[Pos].Socket = INVALID_SOCKET;
\r
612 ReleaseMutex(hAsyncTblAccMutex);
\r
624 *----------------------------------------------------------------------------*/
\r
626 static int UnregisterAsyncTableDbase(HANDLE Async)
\r
632 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
634 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY_DBASE; Pos++)
\r
636 if(SignalDbase[Pos].Async == Async)
\r
639 //SetTaskMsg("############### UnRegist dbase (%d)", Pos);
\r
641 SignalDbase[Pos].Async = 0;
\r
647 ReleaseMutex(hAsyncTblAccMutex);
\r
654 int SetAsyncTableDataIPv4(SOCKET s, struct sockaddr_in* Host, struct sockaddr_in* Socks)
\r
659 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
661 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
663 if(Signal[Pos].Socket == s)
\r
666 memcpy(&Signal[Pos].HostAddrIPv4, Host, sizeof(struct sockaddr_in));
\r
668 memcpy(&Signal[Pos].SocksAddrIPv4, Socks, sizeof(struct sockaddr_in));
\r
673 ReleaseMutex(hAsyncTblAccMutex);
\r
678 int SetAsyncTableDataIPv6(SOCKET s, struct sockaddr_in6* Host, struct sockaddr_in6* Socks)
\r
683 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
685 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
687 if(Signal[Pos].Socket == s)
\r
690 memcpy(&Signal[Pos].HostAddrIPv6, Host, sizeof(struct sockaddr_in6));
\r
692 memcpy(&Signal[Pos].SocksAddrIPv6, Socks, sizeof(struct sockaddr_in6));
\r
697 ReleaseMutex(hAsyncTblAccMutex);
\r
702 int GetAsyncTableDataIPv4(SOCKET s, struct sockaddr_in* Host, struct sockaddr_in* Socks)
\r
707 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
709 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
711 if(Signal[Pos].Socket == s)
\r
714 memcpy(Host, &Signal[Pos].HostAddrIPv4, sizeof(struct sockaddr_in));
\r
716 memcpy(Socks, &Signal[Pos].SocksAddrIPv4, sizeof(struct sockaddr_in));
\r
721 ReleaseMutex(hAsyncTblAccMutex);
\r
726 int GetAsyncTableDataIPv6(SOCKET s, struct sockaddr_in6* Host, struct sockaddr_in6* Socks)
\r
731 WaitForSingleObject(hAsyncTblAccMutex, INFINITE);
\r
733 for(Pos = 0; Pos < MAX_SIGNAL_ENTRY; Pos++)
\r
735 if(Signal[Pos].Socket == s)
\r
738 memcpy(Host, &Signal[Pos].HostAddrIPv6, sizeof(struct sockaddr_in6));
\r
740 memcpy(Socks, &Signal[Pos].SocksAddrIPv6, sizeof(struct sockaddr_in6));
\r
745 ReleaseMutex(hAsyncTblAccMutex);
\r
757 //struct hostent *do_gethostbyname(const char *Name, char *Buf, int Len, int *CancelCheckWork)
\r
758 struct hostent *do_gethostbynameIPv4(const char *Name, char *Buf, int Len, int *CancelCheckWork)
\r
761 struct hostent *Ret;
\r
766 DoPrintf("# Start gethostbyname");
\r
770 // *CancelCheckWork = NO;
\r
773 // hAsync = WSAAsyncGetHostByName(hWndSocket, WM_ASYNC_DBASE, Name, Buf, Len);
\r
774 hAsync = WSAAsyncGetHostByNameM(hWndSocket, WM_ASYNC_DBASE, Name, Buf, Len);
\r
777 RegisterAsyncTableDbase(hAsync);
\r
778 while((*CancelCheckWork == NO) && (AskAsyncDoneDbase(hAsync, &Error) != YES))
\r
781 if(BackgrndMessageProc() == YES)
\r
782 *CancelCheckWork = YES;
\r
785 if(*CancelCheckWork == YES)
\r
787 WSACancelAsyncRequest(hAsync);
\r
789 else if(Error == 0)
\r
791 Ret = (struct hostent *)Buf;
\r
793 UnregisterAsyncTableDbase(hAsync);
\r
797 return(gethostbyname(Name));
\r
802 struct hostent *do_gethostbynameIPv6(const char *Name, char *Buf, int Len, int *CancelCheckWork)
\r
805 struct hostent *Ret;
\r
810 DoPrintf("# Start gethostbyname");
\r
814 // *CancelCheckWork = NO;
\r
817 // hAsync = WSAAsyncGetHostByName(hWndSocket, WM_ASYNC_DBASE, Name, Buf, Len);
\r
818 hAsync = WSAAsyncGetHostByNameIPv6M(hWndSocket, WM_ASYNC_DBASE, Name, Buf, Len, AF_INET6);
\r
821 RegisterAsyncTableDbase(hAsync);
\r
822 while((*CancelCheckWork == NO) && (AskAsyncDoneDbase(hAsync, &Error) != YES))
\r
825 if(BackgrndMessageProc() == YES)
\r
826 *CancelCheckWork = YES;
\r
829 if(*CancelCheckWork == YES)
\r
831 WSACancelAsyncRequestIPv6(hAsync);
\r
833 else if(Error == 0)
\r
835 Ret = (struct hostent *)Buf;
\r
837 UnregisterAsyncTableDbase(hAsync);
\r
841 return(gethostbyname(Name));
\r
849 SOCKET do_socket(int af, int type, int protocol)
\r
853 Ret = socket(af, type, protocol);
\r
854 if(Ret != INVALID_SOCKET)
\r
856 RegisterAsyncTable(Ret);
\r
859 DoPrintf("# do_socket (S=%x)", Ret);
\r
866 int do_closesocket(SOCKET s)
\r
871 int CancelCheckWork;
\r
874 DoPrintf("# Start close (S=%x)", s);
\r
876 CancelCheckWork = NO;
\r
879 WSAAsyncSelect(s, hWndSocket, WM_ASYNC_SOCKET, 0);
\r
880 UnregisterAsyncTable(s);
\r
882 // Ret = closesocket(s);
\r
883 Ret = FTPS_closesocket(s);
\r
884 if(Ret == SOCKET_ERROR)
\r
887 while((CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_CLOSE) != YES))
\r
890 if(BackgrndMessageProc() == YES)
\r
891 CancelCheckWork = YES;
\r
894 if((CancelCheckWork == NO) && (Error == 0))
\r
899 // WSAAsyncSelect(s, hWndSocket, WM_ASYNC_SOCKET, 0);
\r
900 if(BackgrndMessageProc() == YES)
\r
901 CancelCheckWork = YES;
\r
903 // UnregisterAsyncTable(s);
\r
906 DoPrintf("# Exit close");
\r
910 return(closesocket(s));
\r
919 int do_connect(SOCKET s, const struct sockaddr *name, int namelen, int *CancelCheckWork)
\r
926 DoPrintf("# Start connect (S=%x)", s);
\r
929 // *CancelCheckWork = NO;
\r
932 DoPrintf("## Async set: FD_CONNECT|FD_CLOSE|FD_ACCEPT|FD_READ|FD_WRITE");
\r
934 // 高速化のためFD_READとFD_WRITEを使用しない
\r
935 // Ret = WSAAsyncSelect(s, hWndSocket, WM_ASYNC_SOCKET, FD_CONNECT | FD_CLOSE | FD_ACCEPT | FD_READ | FD_WRITE);
\r
936 Ret = WSAAsyncSelect(s, hWndSocket, WM_ASYNC_SOCKET, FD_CONNECT | FD_CLOSE | FD_ACCEPT);
\r
937 if(Ret != SOCKET_ERROR)
\r
939 Ret = connect(s, name, namelen);
\r
940 if(Ret == SOCKET_ERROR)
\r
945 while((*CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_CONNECT) != YES))
\r
948 if(BackgrndMessageProc() == YES)
\r
949 *CancelCheckWork = YES;
\r
952 if(*CancelCheckWork == YES)
\r
958 // Error = WSAGetLastError();
\r
959 DoPrintf("#### Connect: Error=%d", Error);
\r
962 while((Ret != 0) && (Error == WSAEWOULDBLOCK));
\r
966 DoPrintf("#### Connect: AsyncSelect error (%d)", WSAGetLastError());
\r
969 DoPrintf("# Exit connect (%d)", Ret);
\r
973 return(connect(s, name, namelen));
\r
981 int do_listen(SOCKET s, int backlog)
\r
987 DoPrintf("# Start listen (S=%x)", s);
\r
988 DoPrintf("## Async set: FD_CLOSE|FD_ACCEPT");
\r
991 Ret = WSAAsyncSelect(s, hWndSocket, WM_ASYNC_SOCKET, FD_CLOSE | FD_ACCEPT);
\r
992 if(Ret != SOCKET_ERROR)
\r
993 Ret = listen(s, backlog);
\r
996 DoPrintf("# Exit listen (%d)", Ret);
\r
1003 SOCKET do_accept(SOCKET s, struct sockaddr *addr, int *addrlen)
\r
1007 int CancelCheckWork;
\r
1011 DoPrintf("# Start accept (S=%x)", s);
\r
1013 CancelCheckWork = NO;
\r
1014 Ret2 = INVALID_SOCKET;
\r
1017 while((CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_ACCEPT) != YES))
\r
1019 if(AskAsyncDone(s, &Error, FD_CLOSE) == YES)
\r
1025 if(BackgrndMessageProc() == YES)
\r
1026 CancelCheckWork = YES;
\r
1029 if((CancelCheckWork == NO) && (Error == 0))
\r
1033 Ret2 = accept(s, addr, addrlen);
\r
1034 if(Ret2 != INVALID_SOCKET)
\r
1037 DoPrintf("## do_sccept (S=%x)", Ret2);
\r
1038 DoPrintf("## Async set: FD_CONNECT|FD_CLOSE|FD_ACCEPT|FD_READ|FD_WRITE");
\r
1040 RegisterAsyncTable(Ret2);
\r
1041 // 高速化のためFD_READとFD_WRITEを使用しない
\r
1042 // if(WSAAsyncSelect(Ret2, hWndSocket, WM_ASYNC_SOCKET, FD_CONNECT | FD_CLOSE | FD_ACCEPT | FD_READ | FD_WRITE) == SOCKET_ERROR)
\r
1043 if(WSAAsyncSelect(Ret2, hWndSocket, WM_ASYNC_SOCKET, FD_CONNECT | FD_CLOSE | FD_ACCEPT) == SOCKET_ERROR)
\r
1045 do_closesocket(Ret2);
\r
1046 Ret2 = INVALID_SOCKET;
\r
1050 Error = WSAGetLastError();
\r
1052 if(BackgrndMessageProc() == YES)
\r
1055 while(Error == WSAEWOULDBLOCK);
\r
1059 DoPrintf("# Exit accept");
\r
1063 return(accept(s, addr, addrlen));
\r
1070 /*----- recv相当の関数 --------------------------------------------------------
\r
1074 * char *buf : データを読み込むバッファ
\r
1076 * int flags : recvに与えるフラグ
\r
1077 * int *TimeOutErr : タイムアウトしたかどうかを返すワーク
\r
1080 * int : recvの戻り値と同じ
\r
1083 * タイムアウトの時は TimeOut=YES、Ret=SOCKET_ERROR になる
\r
1084 *----------------------------------------------------------------------------*/
\r
1085 int do_recv(SOCKET s, char *buf, int len, int flags, int *TimeOutErr, int *CancelCheckWork)
\r
1090 time_t ElapseTime;
\r
1094 DoPrintf("# Start recv (S=%x)", s);
\r
1098 // *CancelCheckWork = NO;
\r
1099 Ret = SOCKET_ERROR;
\r
1106 // OpenSSLでは受信確認はFD_READが複数回受信される可能性がある
\r
1107 // while((*CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_READ) != YES))
\r
1108 // 短時間にFD_READが2回以上通知される対策
\r
1109 // while(!IsSSLAttached(s) && (*CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_READ) != YES))
\r
1111 // if(AskAsyncDone(s, &Error, FD_CLOSE) == YES)
\r
1117 // if(BackgrndMessageProc() == YES)
\r
1118 // *CancelCheckWork = YES;
\r
1119 // else if(TimeOut != 0)
\r
1121 // time(&ElapseTime);
\r
1122 // ElapseTime -= StartTime;
\r
1123 // if(ElapseTime >= TimeOut)
\r
1125 // DoPrintf("do_recv timed out");
\r
1126 // *TimeOutErr = YES;
\r
1127 // *CancelCheckWork = YES;
\r
1132 if(/*(Ret != 0) && */(Error == 0) && (*CancelCheckWork == NO) && (*TimeOutErr == NO))
\r
1137 DoPrintf("## recv()");
\r
1141 // Ret = recv(s, buf, len, flags);
\r
1142 Ret = FTPS_recv(s, buf, len, flags);
\r
1143 if(Ret != SOCKET_ERROR)
\r
1145 Error = WSAGetLastError();
\r
1147 if(BackgrndMessageProc() == YES)
\r
1150 // 受信確認をバイパスしたためここでタイムアウトの確認
\r
1151 if(BackgrndMessageProc() == YES)
\r
1152 *CancelCheckWork = YES;
\r
1153 else if(TimeOut != 0)
\r
1155 time(&ElapseTime);
\r
1156 ElapseTime -= StartTime;
\r
1157 if(ElapseTime >= TimeOut)
\r
1159 DoPrintf("do_recv timed out");
\r
1160 *TimeOutErr = YES;
\r
1161 *CancelCheckWork = YES;
\r
1164 if(*CancelCheckWork == YES)
\r
1167 while(Error == WSAEWOULDBLOCK);
\r
1170 if(BackgrndMessageProc() == YES)
\r
1171 Ret = SOCKET_ERROR;
\r
1174 DoPrintf("# Exit recv (%d)", Ret);
\r
1178 return(recv(s, buf, len, flags));
\r
1184 int do_send(SOCKET s, const char *buf, int len, int flags, int *TimeOutErr, int *CancelCheckWork)
\r
1189 time_t ElapseTime;
\r
1193 DoPrintf("# Start send (S=%x)", s);
\r
1197 // *CancelCheckWork = NO;
\r
1198 Ret = SOCKET_ERROR;
\r
1205 DoPrintf("## Async set: FD_CONNECT|FD_CLOSE|FD_ACCEPT|FD_READ|FD_WRITE");
\r
1207 // Windows 2000でFD_WRITEが通知されないことがあるバグ修正
\r
1208 // 毎回通知されたのはNT 4.0までのバグであり仕様ではない
\r
1209 // XP以降は互換性のためか毎回通知される
\r
1210 // WSAAsyncSelect(s, hWndSocket, WM_ASYNC_SOCKET, FD_CONNECT | FD_CLOSE | FD_ACCEPT | FD_READ | FD_WRITE);
\r
1211 if(BackgrndMessageProc() == YES)
\r
1212 *CancelCheckWork = YES;
\r
1215 // 送信バッファの空き確認には影響しないが念のため
\r
1216 // while((*CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_WRITE) != YES))
\r
1217 // Windows 2000でFD_WRITEが通知されないことがあるバグ修正
\r
1218 // while(!IsSSLAttached(s) && (*CancelCheckWork == NO) && (AskAsyncDone(s, &Error, FD_WRITE) != YES))
\r
1220 // if(AskAsyncDone(s, &Error, FD_CLOSE) == YES)
\r
1227 // if(BackgrndMessageProc() == YES)
\r
1228 // *CancelCheckWork = YES;
\r
1229 // else if(TimeOut != 0)
\r
1231 // time(&ElapseTime);
\r
1232 // ElapseTime -= StartTime;
\r
1233 // if(ElapseTime >= TimeOut)
\r
1235 // DoPrintf("do_write timed out");
\r
1236 // *TimeOutErr = YES;
\r
1237 // *CancelCheckWork = YES;
\r
1242 if((Error == 0) && (*CancelCheckWork == NO) && (*TimeOutErr == NO))
\r
1247 DoPrintf("## send()");
\r
1251 // Ret = send(s, buf, len, flags);
\r
1252 Ret = FTPS_send(s, buf, len, flags);
\r
1253 if(Ret != SOCKET_ERROR)
\r
1256 DoPrintf("## send() OK");
\r
1260 Error = WSAGetLastError();
\r
1262 if(BackgrndMessageProc() == YES)
\r
1265 // 送信バッファ確認をバイパスしたためここでタイムアウトの確認
\r
1266 if(BackgrndMessageProc() == YES)
\r
1267 *CancelCheckWork = YES;
\r
1268 else if(TimeOut != 0)
\r
1270 time(&ElapseTime);
\r
1271 ElapseTime -= StartTime;
\r
1272 if(ElapseTime >= TimeOut)
\r
1274 DoPrintf("do_recv timed out");
\r
1275 *TimeOutErr = YES;
\r
1276 *CancelCheckWork = YES;
\r
1279 if(*CancelCheckWork == YES)
\r
1282 while(Error == WSAEWOULDBLOCK);
\r
1285 if(BackgrndMessageProc() == YES)
\r
1286 Ret = SOCKET_ERROR;
\r
1289 DoPrintf("# Exit send (%d)", Ret);
\r
1293 return(send(s, buf, len, flags));
\r
1299 void RemoveReceivedData(SOCKET s)
\r
1304 while((len = FTPS_recv(s, buf, sizeof(buf), MSG_PEEK)) > 0)
\r
1306 // AskAsyncDone(s, &Error, FD_READ);
\r
1307 FTPS_recv(s, buf, len, 0);
\r
1318 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1319 *----------------------------------------------------------------------------*/
\r
1321 int CheckClosedAndReconnect(void)
\r
1326 //SetTaskMsg("!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!");
\r
1328 Sts = FFFTP_SUCCESS;
\r
1329 if(AskAsyncDone(AskCmdCtrlSkt(), &Error, FD_CLOSE) == YES)
\r
1331 Sts = ReConnectCmdSkt();
\r
1339 int CheckClosedAndReconnectTrnSkt(SOCKET *Skt, int *CancelCheckWork)
\r
1344 //SetTaskMsg("!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!");
\r
1346 Sts = FFFTP_SUCCESS;
\r
1347 if(AskAsyncDone(*Skt, &Error, FD_CLOSE) == YES)
\r
1349 Sts = ReConnectTrnSkt(Skt, CancelCheckWork);
\r