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
36 #include <mbstring.h>
\r
38 #include <winsock.h>
\r
39 #include <windowsx.h>
\r
40 #include <commctrl.h>
\r
43 #include "resource.h"
\r
45 #include <htmlhelp.h>
\r
49 #undef __MBSWRAPPER_H__
\r
50 #include "mbswrapper.h"
\r
53 /*===== プロトタイプ =====*/
\r
55 static BOOL CALLBACK QuickConDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
56 static int SendInitCommand(char *Cmd);
\r
57 static void AskUseFireWall(char *Host, int *Fire, int *Pasv, int *List);
\r
58 static void SaveCurrentSetToHistory(void);
\r
59 static int ReConnectSkt(SOCKET *Skt);
\r
62 //static SOCKET DoConnect(char *Host, char *User, char *Pass, char *Acct, int Port, int Fwall, int SavePass, int Security);
\r
63 static SOCKET DoConnectCrypt(int CryptMode, HOSTDATA* HostData, char *Host, char *User, char *Pass, char *Acct, int Port, int Fwall, int SavePass, int Security, int *CancelCheckWork);
\r
64 static SOCKET DoConnect(HOSTDATA* HostData, char *Host, char *User, char *Pass, char *Acct, int Port, int Fwall, int SavePass, int Security, int *CancelCheckWork);
\r
65 static int CheckOneTimePassword(char *Pass, char *Reply, int Type);
\r
66 static BOOL CALLBACK BlkHookFnc(void);
\r
67 static int Socks5MakeCmdPacket(SOCKS5REQUEST *Packet, char Cmd, int ValidIP, ulong IP, char *Host, ushort Port);
\r
68 static int SocksSendCmd(SOCKET Socket, void *Data, int Size, int *CancelCheckWork);
\r
70 //static int Socks5GetCmdReply(SOCKET Socket, SOCKS5REPLY *Packet);
\r
71 static int Socks5GetCmdReply(SOCKET Socket, SOCKS5REPLY *Packet, int *CancelCheckWork);
\r
73 //static int Socks4GetCmdReply(SOCKET Socket, SOCKS4REPLY *Packet);
\r
74 static int Socks4GetCmdReply(SOCKET Socket, SOCKS4REPLY *Packet, int *CancelCheckWork);
\r
75 static int Socks5SelMethod(SOCKET Socket, int *CancelCheckWork);
\r
77 /*===== 外部参照 =====*/
\r
79 extern char FilterStr[FILTER_EXT_LEN+1];
\r
80 extern char TitleHostName[HOST_ADRS_LEN+1];
\r
81 extern int CancelFlg;
\r
84 extern char UserMailAdrs[USER_MAIL_LEN+1];
\r
85 extern char FwallHost[HOST_ADRS_LEN+1];
\r
86 extern char FwallUser[USER_NAME_LEN+1];
\r
87 extern char FwallPass[PASSWORD_LEN+1];
\r
88 extern int FwallPort;
\r
89 extern int FwallType;
\r
90 extern int FwallDefault;
\r
91 extern int FwallSecurity;
\r
92 extern int FwallResolv;
\r
93 extern int FwallLower;
\r
94 extern int FwallDelimiter;
\r
95 extern int PasvDefault;
\r
96 extern int QuickAnonymous;
\r
98 /*===== ローカルなワーク =====*/
\r
100 static int Anonymous;
\r
101 static int TryConnect = NO;
\r
102 static SOCKET CmdCtrlSocket = INVALID_SOCKET;
\r
103 static SOCKET TrnCtrlSocket = INVALID_SOCKET;
\r
104 static HOSTDATA CurHost;
\r
106 static int TmpNameKanjiCode;
\r
108 /* 接続中の接続先、SOCKSサーバのアドレス情報を保存しておく */
\r
109 /* この情報はlistenソケットを取得する際に用いる */
\r
110 static struct sockaddr_in SocksSockAddr; /* SOCKSサーバのアドレス情報 */
\r
111 static struct sockaddr_in CurSockAddr; /* 接続先ホストのアドレス情報 */
\r
113 static int UseIPadrs;
\r
114 static char DomainName[HOST_ADRS_LEN+1];
\r
119 /*----- ホスト一覧を使ってホストへ接続 ----------------------------------------
\r
122 * int Type : ダイアログのタイプ (DLG_TYPE_xxx)
\r
123 * int Num : 接続するホスト番号(0~, -1=ダイアログを出す)
\r
127 *----------------------------------------------------------------------------*/
\r
129 void ConnectProc(int Type, int Num)
\r
138 SaveCurrentSetToHost();
\r
140 if((Num >= 0) || (SelectHost(Type) == YES))
\r
143 SetCurrentHost(Num);
\r
146 if(CmdCtrlSocket != INVALID_SOCKET)
\r
149 SetTaskMsg("----------------------------");
\r
152 CopyHostFromList(AskCurrentHost(), &CurHost);
\r
154 TmpNameKanjiCode = CurHost.NameKanjiCode;
\r
156 if(ConnectRas(CurHost.Dialup, CurHost.DialupAlways, CurHost.DialupNotify, CurHost.DialEntry) == FFFTP_SUCCESS)
\r
158 SetHostKanaCnvImm(CurHost.KanaCnv);
\r
159 SetHostKanjiCodeImm(CurHost.KanjiCode);
\r
160 SetSyncMoveMode(CurHost.SyncMove);
\r
162 if((AskSaveSortToHost() == YES) && (CurHost.Sort != SORT_NOTSAVED))
\r
164 DecomposeSortType(CurHost.Sort, &LFSort, &LDSort, &RFSort, &RDSort);
\r
165 SetSortTypeImm(LFSort, LDSort, RFSort, RDSort);
\r
166 ReSortDispList(WIN_LOCAL, &CancelFlg);
\r
170 if(strlen(CurHost.PassWord) > 0)
\r
176 // CmdCtrlSocket = DoConnect(CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, Save, CurHost.Security);
\r
177 CmdCtrlSocket = DoConnect(&CurHost, CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, Save, CurHost.Security, &CancelFlg);
\r
178 TrnCtrlSocket = CmdCtrlSocket;
\r
181 if(TmpNameKanjiCode == KANJI_AUTO)
\r
183 if(DoDirListCmdSkt("", "", 999, &CancelFlg) == FTP_COMPLETE)
\r
186 TmpNameKanjiCode = AnalyzeNameKanjiCode(999);
\r
190 if(CmdCtrlSocket != INVALID_SOCKET)
\r
192 strcpy(TitleHostName, CurHost.HostName);
\r
194 SoundPlay(SND_CONNECT);
\r
196 SendInitCommand(CurHost.InitCmd);
\r
198 if(strlen(CurHost.LocalInitDir) > 0)
\r
200 DoLocalCWD(CurHost.LocalInitDir);
\r
201 GetLocalDirForWnd();
\r
204 DoCWD(CurHost.RemoteInitDir, YES, YES, YES);
\r
207 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
210 SoundPlay(SND_ERROR);
\r
215 SetTaskMsg(MSGJPN001);
\r
221 /*----- ホスト名を入力してホストへ接続 ----------------------------------------
\r
228 *----------------------------------------------------------------------------*/
\r
230 void QuickConnectProc(void)
\r
232 char Tmp[FMAX_PATH+1 + USER_NAME_LEN+1 + PASSWORD_LEN+1 + 2];
\r
233 char File[FMAX_PATH+1];
\r
236 SaveCurrentSetToHost();
\r
238 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(hostname_dlg), GetMainHwnd(), QuickConDialogCallBack, (LPARAM)Tmp) == YES)
\r
241 if(CmdCtrlSocket != INVALID_SOCKET)
\r
244 SetTaskMsg("----------------------------");
\r
247 CopyDefaultHost(&CurHost);
\r
249 TmpNameKanjiCode = CurHost.NameKanjiCode;
\r
250 if(SplitUNCpath(Tmp, CurHost.HostAdrs, CurHost.RemoteInitDir, File, CurHost.UserName, CurHost.PassWord, &CurHost.Port) == FFFTP_SUCCESS)
\r
252 if(strlen(CurHost.UserName) == 0)
\r
254 strcpy(CurHost.UserName, Tmp + FMAX_PATH+1);
\r
255 strcpy(CurHost.PassWord, Tmp + FMAX_PATH+1 + USER_NAME_LEN+1);
\r
258 SetCurrentHost(HOSTNUM_NOENTRY);
\r
259 AskUseFireWall(CurHost.HostAdrs, &CurHost.FireWall, &CurHost.Pasv, &CurHost.ListCmdOnly);
\r
260 CurHost.FireWall = (int)Tmp[FMAX_PATH+1 + USER_NAME_LEN+1 + PASSWORD_LEN+1];
\r
261 CurHost.Pasv = (int)Tmp[FMAX_PATH+1 + USER_NAME_LEN+1 + PASSWORD_LEN+1 + 1];
\r
263 SetHostKanaCnvImm(CurHost.KanaCnv);
\r
264 SetHostKanjiCodeImm(CurHost.KanjiCode);
\r
265 SetSyncMoveMode(CurHost.SyncMove);
\r
270 // CmdCtrlSocket = DoConnect(CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security);
\r
271 CmdCtrlSocket = DoConnect(&CurHost, CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security, &CancelFlg);
\r
272 TrnCtrlSocket = CmdCtrlSocket;
\r
275 if(TmpNameKanjiCode == KANJI_AUTO)
\r
277 if(DoDirListCmdSkt("", "", 999, &CancelFlg) == FTP_COMPLETE)
\r
280 TmpNameKanjiCode = AnalyzeNameKanjiCode(999);
\r
284 if(CmdCtrlSocket != INVALID_SOCKET)
\r
286 strcpy(TitleHostName, CurHost.HostAdrs);
\r
288 SoundPlay(SND_CONNECT);
\r
291 DoCWD(CurHost.RemoteInitDir, YES, YES, YES);
\r
293 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
296 if(strlen(File) > 0)
\r
297 DirectDownLoadProc(File);
\r
301 SoundPlay(SND_ERROR);
\r
310 /*----- クイック接続ダイアログのコールバック ----------------------------------
\r
313 * HWND hDlg : ウインドウハンドル
\r
314 * UINT message : メッセージ番号
\r
315 * WPARAM wParam : メッセージの WPARAM 引数
\r
316 * LPARAM lParam : メッセージの LPARAM 引数
\r
320 *----------------------------------------------------------------------------*/
\r
322 static BOOL CALLBACK QuickConDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
328 //char Str[HOST_ADRS_LEN+USER_NAME_LEN+INIT_DIR_LEN+5+1];
\r
332 case WM_INITDIALOG :
\r
333 SendDlgItemMessage(hDlg, QHOST_HOST, CB_LIMITTEXT, FMAX_PATH, 0);
\r
334 SendDlgItemMessage(hDlg, QHOST_HOST, WM_SETTEXT, 0, (LPARAM)"");
\r
335 SendDlgItemMessage(hDlg, QHOST_USER, EM_LIMITTEXT, USER_NAME_LEN, 0);
\r
336 if(QuickAnonymous == YES)
\r
338 SendDlgItemMessage(hDlg, QHOST_USER, WM_SETTEXT, 0, (LPARAM)"anonymous");
\r
339 SendDlgItemMessage(hDlg, QHOST_PASS, WM_SETTEXT, 0, (LPARAM)UserMailAdrs);
\r
343 SendDlgItemMessage(hDlg, QHOST_USER, WM_SETTEXT, 0, (LPARAM)"");
\r
344 SendDlgItemMessage(hDlg, QHOST_PASS, WM_SETTEXT, 0, (LPARAM)"");
\r
346 SendDlgItemMessage(hDlg, QHOST_PASS, EM_LIMITTEXT, PASSWORD_LEN, 0);
\r
347 SendDlgItemMessage(hDlg, QHOST_FWALL, BM_SETCHECK, FwallDefault, 0);
\r
348 SendDlgItemMessage(hDlg, QHOST_PASV, BM_SETCHECK, PasvDefault, 0);
\r
349 for(i = 0; i < HISTORY_MAX; i++)
\r
351 if(GetHistoryByNum(i, &Tmp) == FFFTP_SUCCESS)
\r
353 //sprintf(Str, "%s (%s) %s", Tmp.HostAdrs, Tmp.UserName, Tmp.RemoteInitDir);
\r
354 //SendDlgItemMessage(hDlg, QHOST_HOST, CB_ADDSTRING, 0, (LPARAM)Str);
\r
355 SendDlgItemMessage(hDlg, QHOST_HOST, CB_ADDSTRING, 0, (LPARAM)Tmp.HostAdrs);
\r
358 Buf = (char *)lParam;
\r
362 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
365 SendDlgItemMessage(hDlg, QHOST_HOST, WM_GETTEXT, FMAX_PATH+1, (LPARAM)Buf);
\r
366 SendDlgItemMessage(hDlg, QHOST_USER, WM_GETTEXT, USER_NAME_LEN+1, (LPARAM)Buf + FMAX_PATH+1);
\r
367 SendDlgItemMessage(hDlg, QHOST_PASS, WM_GETTEXT, PASSWORD_LEN+1, (LPARAM)Buf + FMAX_PATH+1 + USER_NAME_LEN+1);
\r
368 *(Buf + FMAX_PATH+1 + USER_NAME_LEN+1 + PASSWORD_LEN+1) = (char)SendDlgItemMessage(hDlg, QHOST_FWALL, BM_GETCHECK, 0, 0);
\r
369 *(Buf + FMAX_PATH+1 + USER_NAME_LEN+1 + PASSWORD_LEN+1+1) = (char)SendDlgItemMessage(hDlg, QHOST_PASV, BM_GETCHECK, 0, 0);
\r
370 EndDialog(hDlg, YES);
\r
374 EndDialog(hDlg, NO);
\r
377 // case QHOST_HOST :
\r
378 // if(HIWORD(wParam) == CBN_EDITCHANGE)
\r
379 // DoPrintf("EDIT");
\r
388 /*----- 指定したホスト名でホストへ接続 ----------------------------------------
\r
391 * char *unc : UNC文字列
\r
392 * int Kanji : ホストの漢字コード (KANJI_xxx)
\r
393 * int Kana : 半角かな→全角変換モード (YES/NO)
\r
394 * int Fkanji : ファイル名の漢字コード (KANJI_xxx)
\r
395 * int TrMode : 転送モード (TYPE_xx)
\r
399 *----------------------------------------------------------------------------*/
\r
401 void DirectConnectProc(char *unc, int Kanji, int Kana, int Fkanji, int TrMode)
\r
403 char Host[HOST_ADRS_LEN+1];
\r
404 char Path[FMAX_PATH+1];
\r
405 char File[FMAX_PATH+1];
\r
406 char User[USER_NAME_LEN+1];
\r
407 char Pass[PASSWORD_LEN+1];
\r
411 SaveCurrentSetToHost();
\r
414 if(CmdCtrlSocket != INVALID_SOCKET)
\r
417 SetTaskMsg("----------------------------");
\r
420 if(SplitUNCpath(unc, Host, Path, File, User, Pass, &Port) == FFFTP_SUCCESS)
\r
422 if(strlen(User) == 0)
\r
424 strcpy(User, "anonymous");
\r
425 strcpy(Pass, UserMailAdrs);
\r
428 CopyDefaultHost(&CurHost);
\r
430 SetCurrentHost(HOSTNUM_NOENTRY);
\r
431 strcpy(CurHost.HostAdrs, Host);
\r
432 strcpy(CurHost.UserName, User);
\r
433 strcpy(CurHost.PassWord, Pass);
\r
434 strcpy(CurHost.RemoteInitDir, Path);
\r
435 AskUseFireWall(CurHost.HostAdrs, &CurHost.FireWall, &CurHost.Pasv, &CurHost.ListCmdOnly);
\r
436 CurHost.Port = Port;
\r
437 CurHost.KanjiCode = Kanji;
\r
438 CurHost.KanaCnv = Kana;
\r
439 CurHost.NameKanjiCode = Fkanji;
\r
440 CurHost.KanaCnv = YES; /* とりあえず */
\r
442 TmpNameKanjiCode = CurHost.NameKanjiCode;
\r
444 SetHostKanaCnvImm(CurHost.KanaCnv);
\r
445 SetHostKanjiCodeImm(CurHost.KanjiCode);
\r
446 SetSyncMoveMode(CurHost.SyncMove);
\r
448 if(TrMode != TYPE_DEFAULT)
\r
450 SetTransferTypeImm(TrMode);
\r
451 DispTransferType();
\r
457 // CmdCtrlSocket = DoConnect(CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security);
\r
458 CmdCtrlSocket = DoConnect(&CurHost, CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security, &CancelFlg);
\r
459 TrnCtrlSocket = CmdCtrlSocket;
\r
462 if(TmpNameKanjiCode == KANJI_AUTO)
\r
464 if(DoDirListCmdSkt("", "", 999, &CancelFlg) == FTP_COMPLETE)
\r
467 TmpNameKanjiCode = AnalyzeNameKanjiCode(999);
\r
471 if(CmdCtrlSocket != INVALID_SOCKET)
\r
473 strcpy(TitleHostName, CurHost.HostAdrs);
\r
475 SoundPlay(SND_CONNECT);
\r
478 DoCWD(CurHost.RemoteInitDir, YES, YES, YES);
\r
480 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
483 if(strlen(File) > 0)
\r
484 DirectDownLoadProc(File);
\r
486 ResetAutoExitFlg();
\r
490 SoundPlay(SND_ERROR);
\r
498 /*----- ホストのヒストリで指定されたホストへ接続 ------------------------------
\r
501 * int MenuCmd : 取り出すヒストリに割り当てられたメニューコマンド
\r
505 *----------------------------------------------------------------------------*/
\r
507 void HistoryConnectProc(int MenuCmd)
\r
515 if(GetHistoryByCmd(MenuCmd, &Hist) == FFFTP_SUCCESS)
\r
518 SaveCurrentSetToHost();
\r
521 if(CmdCtrlSocket != INVALID_SOCKET)
\r
524 SetTaskMsg("----------------------------");
\r
527 CopyHistoryToHost(&Hist, &CurHost);
\r
529 TmpNameKanjiCode = CurHost.NameKanjiCode;
\r
531 if(ConnectRas(CurHost.Dialup, CurHost.DialupAlways, CurHost.DialupNotify, CurHost.DialEntry) == FFFTP_SUCCESS)
\r
533 SetCurrentHost(HOSTNUM_NOENTRY);
\r
534 SetHostKanaCnvImm(CurHost.KanaCnv);
\r
535 SetHostKanjiCodeImm(CurHost.KanjiCode);
\r
536 SetSyncMoveMode(CurHost.SyncMove);
\r
538 DecomposeSortType(CurHost.Sort, &LFSort, &LDSort, &RFSort, &RDSort);
\r
539 SetSortTypeImm(LFSort, LDSort, RFSort, RDSort);
\r
540 ReSortDispList(WIN_LOCAL, &CancelFlg);
\r
542 SetTransferTypeImm(Hist.Type);
\r
543 DispTransferType();
\r
548 // CmdCtrlSocket = DoConnect(CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security);
\r
549 CmdCtrlSocket = DoConnect(&CurHost, CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security, &CancelFlg);
\r
550 TrnCtrlSocket = CmdCtrlSocket;
\r
553 if(TmpNameKanjiCode == KANJI_AUTO)
\r
555 if(DoDirListCmdSkt("", "", 999, &CancelFlg) == FTP_COMPLETE)
\r
558 TmpNameKanjiCode = AnalyzeNameKanjiCode(999);
\r
562 if(CmdCtrlSocket != INVALID_SOCKET)
\r
564 strcpy(TitleHostName, CurHost.HostAdrs);
\r
566 SoundPlay(SND_CONNECT);
\r
568 SendInitCommand(CurHost.InitCmd);
\r
570 DoLocalCWD(CurHost.LocalInitDir);
\r
571 GetLocalDirForWnd();
\r
574 DoCWD(CurHost.RemoteInitDir, YES, YES, YES);
\r
576 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
579 SoundPlay(SND_ERROR);
\r
584 SetTaskMsg(MSGJPN002);
\r
587 SoundPlay(SND_ERROR);
\r
593 /*----- ホストの初期化コマンドを送る ------------------------------------------
\r
596 * int Cmd : 初期化コマンドス
\r
602 * 初期化コマンドは以下のようなフォーマットであること
\r
604 * cmd1\r\ncmd2\r\n\0
\r
605 *----------------------------------------------------------------------------*/
\r
607 static int SendInitCommand(char *Cmd)
\r
609 char Tmp[INITCMD_LEN+1];
\r
612 while(strlen(Cmd) > 0)
\r
615 if((Pos = strchr(Tmp, '\r')) != NULL)
\r
617 if(strlen(Tmp) > 0)
\r
620 if((Cmd = strchr(Cmd, '\n')) != NULL)
\r
629 /*----- 指定のホストはFireWallを使う設定かどうかを返す ------------------------
\r
632 * char *Hots : ホスト名
\r
633 * int *Fire : FireWallを使うかどうかを返すワーク
\r
634 * int *Pasv : PASVモードを返すワーク
\r
635 * int *List : LISTコマンドのみ使用フラグ
\r
639 *----------------------------------------------------------------------------*/
\r
641 static void AskUseFireWall(char *Host, int *Fire, int *Pasv, int *List)
\r
646 *Fire = FwallDefault;
\r
647 *Pasv = PasvDefault;
\r
648 // NLSTを送ってしまうバグ修正(ただしNLSTを使うべきホストへクイック接続できなくなる)
\r
652 while(CopyHostFromList(i, &Tmp) == FFFTP_SUCCESS)
\r
654 if(strcmp(Host, Tmp.HostAdrs) == 0)
\r
656 *Fire = Tmp.FireWall;
\r
658 *List = Tmp.ListCmdOnly;
\r
667 /*----- 接続しているホストのアドレスを返す ------------------------------------
\r
674 *----------------------------------------------------------------------------*/
\r
676 char *AskHostAdrs(void)
\r
678 return(CurHost.HostAdrs);
\r
682 /*----- 接続しているホストのポートを返す --------------------------------------
\r
689 *----------------------------------------------------------------------------*/
\r
691 int AskHostPort(void)
\r
693 return(CurHost.Port);
\r
696 /*----- 接続しているホストのファイル名の漢字コードを返す ----------------------
\r
702 * int 漢字コード (KANJI_xxx)
\r
703 *----------------------------------------------------------------------------*/
\r
705 int AskHostNameKanji(void)
\r
708 // if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
709 // CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
711 // return(CurHost.NameKanjiCode);
\r
712 return(TmpNameKanjiCode);
\r
716 /*----- 接続しているホストのファイル名の半角カナ変換フラグを返す --------------
\r
722 * int 半角カナを全角に変換するかどうか (YES/NO)
\r
723 *----------------------------------------------------------------------------*/
\r
725 int AskHostNameKana(void)
\r
727 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
728 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
730 return(CurHost.NameKanaCnv);
\r
734 /*----- 接続しているホストのLISTコマンドモードを返す --------------------------
\r
740 * int LISTコマンドモード (YES/NO)
\r
741 *----------------------------------------------------------------------------*/
\r
743 int AskListCmdMode(void)
\r
745 if(CurHost.HostType == HTYPE_VMS)
\r
749 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
750 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
751 return(CurHost.ListCmdOnly);
\r
756 /*----- 接続しているホストでNLST -Rを使うかどうかを返す ------------------------
\r
762 * int NLST -Rを使うかどうか (YES/NO)
\r
763 *----------------------------------------------------------------------------*/
\r
765 int AskUseNLST_R(void)
\r
767 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
768 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
770 return(CurHost.UseNLST_R);
\r
774 /*----- 接続しているホストのChmodコマンドを返す -------------------------------
\r
781 *----------------------------------------------------------------------------*/
\r
783 char *AskHostChmodCmd(void)
\r
785 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
786 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
788 return(CurHost.ChmodCmd);
\r
792 /*----- 接続しているホストのタイムゾーンを返す --------------------------------
\r
799 *----------------------------------------------------------------------------*/
\r
801 int AskHostTimeZone(void)
\r
803 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
804 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
806 return(CurHost.TimeZone);
\r
810 /*----- 接続しているホストのPASVモードを返す ----------------------------------
\r
816 * int PASVモードかどうか (YES/NO)
\r
817 *----------------------------------------------------------------------------*/
\r
819 int AskPasvMode(void)
\r
821 return(CurHost.Pasv);
\r
825 /*----- 接続しているホストのLNSTファイル名を返す ------------------------------
\r
831 * char *ファイル名/オプション
\r
832 *----------------------------------------------------------------------------*/
\r
834 char *AskHostLsName(void)
\r
836 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
837 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
839 return(CurHost.LsName);
\r
843 /*----- 接続しているホストのホストタイプを返す --------------------------------
\r
849 * char *ファイル名/オプション
\r
850 *----------------------------------------------------------------------------*/
\r
852 int AskHostType(void)
\r
854 if(AskCurrentHost() != HOSTNUM_NOENTRY)
\r
855 CopyHostFromListInConnect(AskCurrentHost(), &CurHost);
\r
857 return(CurHost.HostType);
\r
861 /*----- 接続しているホストはFireWallを使うホストかどうかを返す ----------------
\r
867 * int FireWallを使うかどうか (YES/NO)
\r
868 *----------------------------------------------------------------------------*/
\r
870 int AskHostFireWall(void)
\r
872 return(CurHost.FireWall);
\r
876 /*----- 接続しているホストでフルパスでファイルアクセスしないかどうかを返す ----
\r
882 * int フルパスでアクセスしない (YES=フルパス禁止/NO)
\r
883 *----------------------------------------------------------------------------*/
\r
885 int AskNoFullPathMode(void)
\r
887 if(CurHost.HostType == HTYPE_VMS)
\r
890 return(CurHost.NoFullPath);
\r
894 /*----- 接続しているユーザ名を返す --------------------------------------------
\r
901 *----------------------------------------------------------------------------*/
\r
903 char *AskHostUserName(void)
\r
905 return(CurHost.UserName);
\r
909 /*----- 現在の設定をホストの設定にセットする ----------------------------------
\r
918 * カレントディレクトリ、ソート方法をホストの設定にセットする
\r
919 *----------------------------------------------------------------------------*/
\r
921 void SaveCurrentSetToHost(void)
\r
924 char LocDir[FMAX_PATH+1];
\r
925 char HostDir[FMAX_PATH+1];
\r
927 if(TrnCtrlSocket != INVALID_SOCKET)
\r
929 if((Host = AskCurrentHost()) != HOSTNUM_NOENTRY)
\r
931 CopyHostFromListInConnect(Host, &CurHost);
\r
932 if(CurHost.LastDir == YES)
\r
934 AskLocalCurDir(LocDir, FMAX_PATH);
\r
935 AskRemoteCurDir(HostDir, FMAX_PATH);
\r
936 SetHostDir(AskCurrentHost(), LocDir, HostDir);
\r
938 SetHostSort(AskCurrentHost(), AskSortType(ITEM_LFILE), AskSortType(ITEM_LDIR), AskSortType(ITEM_RFILE), AskSortType(ITEM_RDIR));
\r
945 /*----- 現在の設定をヒストリにセットする --------------------------------------
\r
952 *----------------------------------------------------------------------------*/
\r
954 static void SaveCurrentSetToHistory(void)
\r
956 char LocDir[FMAX_PATH+1];
\r
957 char HostDir[FMAX_PATH+1];
\r
959 AskLocalCurDir(LocDir, FMAX_PATH);
\r
960 AskRemoteCurDir(HostDir, FMAX_PATH);
\r
961 strcpy(CurHost.LocalInitDir, LocDir);
\r
962 strcpy(CurHost.RemoteInitDir, HostDir);
\r
964 CurHost.Sort = AskSortType(ITEM_LFILE) * 0x1000000 | AskSortType(ITEM_LDIR) * 0x10000 | AskSortType(ITEM_RFILE) * 0x100 | AskSortType(ITEM_RDIR);
\r
966 CurHost.KanjiCode = AskHostKanjiCode();
\r
967 CurHost.KanaCnv = AskHostKanaCnv();
\r
969 CurHost.SyncMove = AskSyncMoveMode();
\r
971 AddHostToHistory(&CurHost, AskTransferType());
\r
972 SetAllHistoryToMenu();
\r
978 /*----- コマンドコントロールソケットの再接続 ----------------------------------
\r
985 * FFFTP_SUCCESS/FFFTP_FAIL
\r
986 *----------------------------------------------------------------------------*/
\r
988 int ReConnectCmdSkt(void)
\r
993 if(CmdCtrlSocket != TrnCtrlSocket)
\r
994 do_closesocket(TrnCtrlSocket);
\r
995 TrnCtrlSocket = INVALID_SOCKET;
\r
997 Sts = ReConnectSkt(&CmdCtrlSocket);
\r
999 TrnCtrlSocket = CmdCtrlSocket;
\r
1005 /*----- 転送コントロールソケットの再接続 --------------------------------------
\r
1012 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1013 *----------------------------------------------------------------------------*/
\r
1015 //int ReConnectTrnSkt(void)
\r
1017 // return(ReConnectSkt(&TrnCtrlSocket));
\r
1020 int ReConnectTrnSkt(SOCKET *Skt, int *CancelCheckWork)
\r
1022 // char Path[FMAX_PATH+1];
\r
1025 HOSTDATA HostData;
\r
1029 SetTaskMsg(MSGJPN003);
\r
1031 // DisableUserOpe();
\r
1033 if(*Skt != INVALID_SOCKET)
\r
1034 do_closesocket(*Skt);
\r
1037 HostData = CurHost;
\r
1038 if(HostData.CryptMode != CRYPT_NONE)
\r
1039 HostData.UseNoEncryption = NO;
\r
1040 if(HostData.CryptMode != CRYPT_FTPES)
\r
1041 HostData.UseFTPES = NO;
\r
1042 if(HostData.CryptMode != CRYPT_FTPIS)
\r
1043 HostData.UseFTPIS = NO;
\r
1044 if(HostData.CryptMode != CRYPT_SFTP)
\r
1045 HostData.UseSFTP = NO;
\r
1048 // if((*Skt = DoConnect(CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security)) != INVALID_SOCKET)
\r
1049 if((*Skt = DoConnect(&HostData, CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security, CancelCheckWork)) != INVALID_SOCKET)
\r
1051 // AskRemoteCurDir(Path, FMAX_PATH);
\r
1052 // DoCWD(Path, YES, YES, YES);
\r
1053 Sts = FFFTP_SUCCESS;
\r
1056 SoundPlay(SND_ERROR);
\r
1058 // EnableUserOpe();
\r
1063 /*----- 回線の再接続 ----------------------------------------------------------
\r
1066 * SOCKET *Skt : 接続したソケットを返すワーク
\r
1070 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1071 *----------------------------------------------------------------------------*/
\r
1073 static int ReConnectSkt(SOCKET *Skt)
\r
1075 char Path[FMAX_PATH+1];
\r
1080 SetTaskMsg(MSGJPN003);
\r
1084 if(*Skt != INVALID_SOCKET)
\r
1085 do_closesocket(*Skt);
\r
1089 // if((*Skt = DoConnect(CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security)) != INVALID_SOCKET)
\r
1090 if((*Skt = DoConnect(&CurHost, CurHost.HostAdrs, CurHost.UserName, CurHost.PassWord, CurHost.Account, CurHost.Port, CurHost.FireWall, NO, CurHost.Security, &CancelFlg)) != INVALID_SOCKET)
\r
1092 AskRemoteCurDir(Path, FMAX_PATH);
\r
1093 DoCWD(Path, YES, YES, YES);
\r
1094 Sts = FFFTP_SUCCESS;
\r
1097 SoundPlay(SND_ERROR);
\r
1104 /*----- コマンドコントロールソケットを返す ------------------------------------
\r
1110 * SOCKET コマンドコントロールソケット
\r
1111 *----------------------------------------------------------------------------*/
\r
1113 SOCKET AskCmdCtrlSkt(void)
\r
1115 return(CmdCtrlSocket);
\r
1119 /*----- 転送コントロールソケットを返す ----------------------------------------
\r
1125 * SOCKET 転送コントロールソケット
\r
1126 *----------------------------------------------------------------------------*/
\r
1128 SOCKET AskTrnCtrlSkt(void)
\r
1130 return(TrnCtrlSocket);
\r
1134 /*----- コマンド/転送コントロールソケットの共有を解除 ------------------------
\r
1141 *----------------------------------------------------------------------------*/
\r
1143 void SktShareProh(void)
\r
1145 if(CmdCtrlSocket == TrnCtrlSocket)
\r
1148 //SetTaskMsg("############### SktShareProh");
\r
1151 // CmdCtrlSocket = INVALID_SOCKET;
\r
1152 // ReConnectSkt(&CmdCtrlSocket);
\r
1153 if(CurHost.ReuseCmdSkt == YES)
\r
1155 CmdCtrlSocket = INVALID_SOCKET;
\r
1156 ReConnectSkt(&CmdCtrlSocket);
\r
1163 /*----- コマンド/転送コントロールソケットの共有が解除されているかチェック ----
\r
1171 *----------------------------------------------------------------------------*/
\r
1173 int AskShareProh(void)
\r
1179 // if(CmdCtrlSocket == TrnCtrlSocket)
\r
1180 if(CmdCtrlSocket == TrnCtrlSocket || TrnCtrlSocket == INVALID_SOCKET)
\r
1187 /*----- ホストから切断 --------------------------------------------------------
\r
1194 *----------------------------------------------------------------------------*/
\r
1196 void DisconnectProc(void)
\r
1199 //SetTaskMsg("############### Disconnect Cmd=%x, Trn=%x", CmdCtrlSocket,TrnCtrlSocket);
\r
1201 if((CmdCtrlSocket != INVALID_SOCKET) && (CmdCtrlSocket != TrnCtrlSocket))
\r
1203 DoQUIT(CmdCtrlSocket);
\r
1204 DoClose(CmdCtrlSocket);
\r
1207 if(TrnCtrlSocket != INVALID_SOCKET)
\r
1209 DoQUIT(TrnCtrlSocket);
\r
1210 DoClose(TrnCtrlSocket);
\r
1212 SaveCurrentSetToHistory();
\r
1214 EraseRemoteDirForWnd();
\r
1215 SetTaskMsg(MSGJPN004);
\r
1218 TrnCtrlSocket = INVALID_SOCKET;
\r
1219 CmdCtrlSocket = INVALID_SOCKET;
\r
1221 DispWindowTitle();
\r
1222 MakeButtonsFocus();
\r
1229 /*----- ソケットが強制切断されたときの処理 ------------------------------------
\r
1236 *----------------------------------------------------------------------------*/
\r
1238 void DisconnectSet(void)
\r
1240 CmdCtrlSocket = INVALID_SOCKET;
\r
1241 TrnCtrlSocket = INVALID_SOCKET;
\r
1243 EraseRemoteDirForWnd();
\r
1244 DispWindowTitle();
\r
1245 MakeButtonsFocus();
\r
1246 SetTaskMsg(MSGJPN005);
\r
1251 /*----- ホストに接続中かどうかを返す ------------------------------------------
\r
1257 * int ステータス (YES/NO)
\r
1258 *----------------------------------------------------------------------------*/
\r
1260 int AskConnecting(void)
\r
1265 if(TrnCtrlSocket != INVALID_SOCKET)
\r
1272 /*----- ホストへ接続する ------------------------------------------------------
\r
1275 * char *Host : ホスト名
\r
1276 * char *User : ユーザ名
\r
1277 * char *Pass : パスワード
\r
1278 * char *Acct : アカウント
\r
1280 * int Fwall : FireWallを使うかどうか (YES/NO)
\r
1281 * int SavePass : パスワードを再入力した時に保存するかどうか (YES/NO)
\r
1282 * int Security : セキュリティ (SECURITY_xxx, MDx)
\r
1288 * ホスト名、ユーザ名、パスワードが指定されていなかったときは、接続に使用
\r
1290 * char *Host : ホスト名
\r
1291 * char *User : ユーザ名
\r
1292 * char *Pass : パスワード
\r
1293 * char *Acct : アカウント
\r
1295 * FireWallは次のように動作する
\r
1296 * TYPE1 Connect fire → USER user(f) → PASS pass(f) → SITE host → USER user(h) → PASS pass(h) → ACCT acct
\r
1297 * TYPE2 Connect fire → USER user(f) → PASS pass(f) → USER user(h)@host → PASS pass(h) → ACCT acct
\r
1298 * TYPE3 Connect fire → USER user(h)@host → PASS pass(h) → ACCT acct
\r
1299 * TYPE4 Connect fire → OPEN host → USER user(h) → PASS pass(h) → ACCT acct
\r
1301 * none Connect host → USER user(h) → PASS pass(h) → ACCT acct
\r
1302 *----------------------------------------------------------------------------*/
\r
1305 static SOCKET DoConnectCrypt(int CryptMode, HOSTDATA* HostData, char *Host, char *User, char *Pass, char *Acct, int Port, int Fwall, int SavePass, int Security, int *CancelCheckWork)
\r
1317 static const char *SiteTbl[4] = { "SITE", "site", "OPEN", "open" };
\r
1318 char TmpBuf[ONELINE_BUF_SIZE];
\r
1319 struct linger LingerOpt;
\r
1322 ContSock = INVALID_SOCKET;
\r
1324 if(CryptMode == CRYPT_NONE || CryptMode == CRYPT_FTPES || CryptMode == CRYPT_FTPIS)
\r
1327 Fwall = FwallType;
\r
1329 Fwall = FWALL_NONE;
\r
1333 // CancelFlg = NO;
\r
1335 // WSASetBlockingHook(BlkHookFnc);
\r
1338 ContSock = INVALID_SOCKET;
\r
1342 if(((Fwall >= FWALL_FU_FP_SITE) && (Fwall <= FWALL_OPEN)) ||
\r
1343 (Fwall == FWALL_SIDEWINDER) ||
\r
1344 (Fwall == FWALL_FU_FP))
\r
1350 if(strlen(Tmp) != 0)
\r
1353 // if((ContSock = connectsock(Tmp, Port, "", &CancelFlg)) != INVALID_SOCKET)
\r
1354 if((ContSock = connectsock(Tmp, Port, "", CancelCheckWork)) != INVALID_SOCKET)
\r
1357 #ifdef DISABLE_CONTROL_NETWORK_BUFFERS
\r
1358 int BufferSize = 0;
\r
1359 setsockopt(ContSock, SOL_SOCKET, SO_SNDBUF, (char*)&BufferSize, sizeof(int));
\r
1360 setsockopt(ContSock, SOL_SOCKET, SO_RCVBUF, (char*)&BufferSize, sizeof(int));
\r
1363 // while((Sts = ReadReplyMessage(ContSock, Buf, 1024, &CancelFlg, TmpBuf) / 100) == FTP_PRELIM)
\r
1365 if(CryptMode == CRYPT_FTPIS)
\r
1367 if(AttachSSL(ContSock, INVALID_SOCKET, CancelCheckWork))
\r
1369 while((Sts = ReadReplyMessage(ContSock, Buf, 1024, CancelCheckWork, TmpBuf) / 100) == FTP_PRELIM)
\r
1377 while((Sts = ReadReplyMessage(ContSock, Buf, 1024, CancelCheckWork, TmpBuf) / 100) == FTP_PRELIM)
\r
1381 if(Sts == FTP_COMPLETE)
\r
1384 if(setsockopt(ContSock, SOL_SOCKET, SO_OOBINLINE, (LPSTR)&Flg, sizeof(Flg)) == SOCKET_ERROR)
\r
1385 ReportWSError("setsockopt", WSAGetLastError());
\r
1386 // データ転送用ソケットのTCP遅延転送が無効されているので念のため
\r
1387 if(setsockopt(ContSock, IPPROTO_TCP, TCP_NODELAY, (LPSTR)&Flg, sizeof(Flg)) == SOCKET_ERROR)
\r
1388 ReportWSError("setsockopt", WSAGetLastError());
\r
1391 if(setsockopt(ContSock, SOL_SOCKET, SO_KEEPALIVE, (LPSTR)&Flg, sizeof(Flg)) == SOCKET_ERROR)
\r
1392 ReportWSError("setsockopt", WSAGetLastError());
\r
1393 LingerOpt.l_onoff = 1;
\r
1394 LingerOpt.l_linger = 90;
\r
1395 if(setsockopt(ContSock, SOL_SOCKET, SO_LINGER, (LPSTR)&LingerOpt, sizeof(LingerOpt)) == SOCKET_ERROR)
\r
1396 ReportWSError("setsockopt", WSAGetLastError());
\r
1400 /*===== 認証を行なう =====*/
\r
1402 Sts = FTP_COMPLETE;
\r
1403 if((Fwall == FWALL_FU_FP_SITE) ||
\r
1404 (Fwall == FWALL_FU_FP_USER) ||
\r
1405 (Fwall == FWALL_FU_FP))
\r
1408 // if((Sts = command(ContSock, Reply, &CancelFlg, "USER %s", FwallUser) / 100) == FTP_CONTINUE)
\r
1409 if((Sts = command(ContSock, Reply, CancelCheckWork, "USER %s", FwallUser) / 100) == FTP_CONTINUE)
\r
1411 CheckOneTimePassword(FwallPass, Reply, FwallSecurity);
\r
1413 // Sts = command(ContSock, NULL, &CancelFlg, "PASS %s", Reply) / 100;
\r
1414 Sts = command(ContSock, NULL, CancelCheckWork, "PASS %s", Reply) / 100;
\r
1417 else if(Fwall == FWALL_SIDEWINDER)
\r
1420 // Sts = command(ContSock, Reply, &CancelFlg, "USER %s:%s%c%s", FwallUser, FwallPass, FwallDelimiter, Host) / 100;
\r
1421 Sts = command(ContSock, Reply, CancelCheckWork, "USER %s:%s%c%s", FwallUser, FwallPass, FwallDelimiter, Host) / 100;
\r
1423 if((Sts != FTP_COMPLETE) && (Sts != FTP_CONTINUE))
\r
1425 SetTaskMsg(MSGJPN006);
\r
1426 DoClose(ContSock);
\r
1427 ContSock = INVALID_SOCKET;
\r
1431 if((Fwall == FWALL_FU_FP_SITE) || (Fwall == FWALL_OPEN))
\r
1434 if(Fwall == FWALL_OPEN)
\r
1436 if(FwallLower == YES)
\r
1439 if(HostPort == PORT_NOR)
\r
1441 // Sts = command(ContSock, NULL, &CancelFlg, "%s %s", SiteTbl[Flg], Host) / 100;
\r
1442 Sts = command(ContSock, NULL, CancelCheckWork, "%s %s", SiteTbl[Flg], Host) / 100;
\r
1445 // Sts = command(ContSock, NULL, &CancelFlg, "%s %s %d", SiteTbl[Flg], Host, HostPort) / 100;
\r
1446 Sts = command(ContSock, NULL, CancelCheckWork, "%s %s %d", SiteTbl[Flg], Host, HostPort) / 100;
\r
1449 if((Sts != FTP_COMPLETE) && (Sts != FTP_CONTINUE))
\r
1451 SetTaskMsg(MSGJPN007, Host);
\r
1452 DoClose(ContSock);
\r
1453 ContSock = INVALID_SOCKET;
\r
1458 if((strlen(User) != 0) ||
\r
1459 (InputDialogBox(username_dlg, GetMainHwnd(), NULL, User, USER_NAME_LEN+1, &Anony, IDH_HELP_TOPIC_0000001) == YES))
\r
1463 strcpy(User, "anonymous");
\r
1464 strcpy(Pass, UserMailAdrs);
\r
1467 if((Fwall == FWALL_FU_FP_USER) || (Fwall == FWALL_USER))
\r
1469 if(HostPort == PORT_NOR)
\r
1470 sprintf(Buf, "%s%c%s", User, FwallDelimiter, Host);
\r
1472 sprintf(Buf, "%s%c%s %d", User, FwallDelimiter, Host, HostPort);
\r
1475 strcpy(Buf, User);
\r
1478 if(CryptMode == CRYPT_FTPES)
\r
1480 if(IsOpenSSLLoaded() && (Sts = command(ContSock, Reply, CancelCheckWork, "AUTH TLS")) == 234)
\r
1482 if(AttachSSL(ContSock, INVALID_SOCKET, CancelCheckWork))
\r
1484 if((Sts = command(ContSock, Reply, CancelCheckWork, "PBSZ 0")) == 200)
\r
1486 if((Sts = command(ContSock, Reply, CancelCheckWork, "PROT P")) == 200)
\r
1506 if(Sts == FTP_ERROR)
\r
1510 // if((Sts = command(ContSock, Reply, &CancelFlg, "USER %s", Buf) / 100) == FTP_CONTINUE)
\r
1511 if((Sts = command(ContSock, Reply, CancelCheckWork, "USER %s", Buf) / 100) == FTP_CONTINUE)
\r
1513 if((strlen(Pass) != 0) ||
\r
1514 (InputDialogBox(passwd_dlg, GetMainHwnd(), NULL, Pass, PASSWORD_LEN+1, &Anony, IDH_HELP_TOPIC_0000001) == YES))
\r
1516 CheckOneTimePassword(Pass, Reply, Security);
\r
1518 /* パスワードがスペース1個の時はパスワードの実体なしとする */
\r
1519 if(strcmp(Reply, " ") == 0)
\r
1520 strcpy(Reply, "");
\r
1523 // Sts = command(ContSock, NULL, &CancelFlg, "PASS %s", Reply) / 100;
\r
1524 Sts = command(ContSock, NULL, CancelCheckWork, "PASS %s", Reply) / 100;
\r
1525 if(Sts == FTP_ERROR)
\r
1528 if(InputDialogBox(re_passwd_dlg, GetMainHwnd(), NULL, Pass, PASSWORD_LEN+1, &Anony, IDH_HELP_TOPIC_0000001) == YES)
\r
1531 DoPrintf("No password specified.");
\r
1534 else if(Sts == FTP_CONTINUE)
\r
1536 if((strlen(Acct) != 0) ||
\r
1537 (InputDialogBox(account_dlg, GetMainHwnd(), NULL, Acct, ACCOUNT_LEN+1, &Anony, IDH_HELP_TOPIC_0000001) == YES))
\r
1540 // Sts = command(ContSock, NULL, &CancelFlg, "ACCT %s", Acct) / 100;
\r
1541 Sts = command(ContSock, NULL, CancelCheckWork, "ACCT %s", Acct) / 100;
\r
1544 DoPrintf("No account specified");
\r
1550 DoPrintf("No password specified.");
\r
1554 while(Continue == YES);
\r
1559 DoPrintf("No user name specified");
\r
1562 if(Sts != FTP_COMPLETE)
\r
1564 SetTaskMsg(MSGJPN008, Host);
\r
1565 DoClose(ContSock);
\r
1566 ContSock = INVALID_SOCKET;
\r
1568 else if((SavePass == YES) && (ReInPass == YES))
\r
1570 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(savepass_dlg), GetMainHwnd(), ExeEscDialogProc) == YES)
\r
1571 SetHostPassword(AskCurrentHost(), Pass);
\r
1579 SetTaskMsg(MSGJPN009/*"接続できません(1) %x", ContSock*/);
\r
1580 DoClose(ContSock);
\r
1581 ContSock = INVALID_SOCKET;
\r
1588 if(((Fwall >= FWALL_FU_FP_SITE) && (Fwall <= FWALL_OPEN)) ||
\r
1589 (Fwall == FWALL_FU_FP))
\r
1590 SetTaskMsg(MSGJPN010);
\r
1592 SetTaskMsg(MSGJPN011);
\r
1596 // WSAUnhookBlockingHook();
\r
1602 if(ContSock != INVALID_SOCKET)
\r
1604 if((Sts = command(ContSock, Reply, CancelCheckWork, "FEAT")) == 211)
\r
1606 // 改行文字はReadReplyMessageで消去されるため区切り文字に空白を使用
\r
1608 if(strstr(Reply, " UTF8 "))
\r
1609 HostData->Feature |= FEATURE_UTF8;
\r
1611 if(strstr(Reply, " MLST ") || strstr(Reply, " MLSD "))
\r
1612 HostData->Feature |= FEATURE_MLSD;
\r
1614 if(strstr(Reply, " EPRT ") || strstr(Reply, " EPSV "))
\r
1615 HostData->Feature |= FEATURE_EPRT | FEATURE_EPSV;
\r
1618 if(TmpNameKanjiCode == KANJI_AUTO && (HostData->Feature & FEATURE_UTF8))
\r
1620 if((Sts = command(ContSock, Reply, CancelCheckWork, "OPTS UTF8 ON")) == 200)
\r
1621 TmpNameKanjiCode = KANJI_UTF8N;
\r
1625 else if(CryptMode == CRYPT_SFTP)
\r
1633 //static SOCKET DoConnect(HOSTDATA* HostData, char *Host, char *User, char *Pass, char *Acct, int Port, int Fwall, int SavePass, int Security)
\r
1634 static SOCKET DoConnect(HOSTDATA* HostData, char *Host, char *User, char *Pass, char *Acct, int Port, int Fwall, int SavePass, int Security, int *CancelCheckWork)
\r
1637 ContSock = INVALID_SOCKET;
\r
1638 *CancelCheckWork = NO;
\r
1639 if(*CancelCheckWork == NO && ContSock == INVALID_SOCKET && HostData->UseSFTP == YES)
\r
1641 SetTaskMsg(MSGJPN317);
\r
1642 if((ContSock = DoConnectCrypt(CRYPT_SFTP, HostData, Host, User, Pass, Acct, Port, Fwall, SavePass, Security, CancelCheckWork)) != INVALID_SOCKET)
\r
1643 HostData->CryptMode = CRYPT_SFTP;
\r
1645 if(*CancelCheckWork == NO && ContSock == INVALID_SOCKET && HostData->UseFTPIS == YES)
\r
1647 SetTaskMsg(MSGJPN316);
\r
1648 if((ContSock = DoConnectCrypt(CRYPT_FTPIS, HostData, Host, User, Pass, Acct, Port, Fwall, SavePass, Security, CancelCheckWork)) != INVALID_SOCKET)
\r
1649 HostData->CryptMode = CRYPT_FTPIS;
\r
1651 if(*CancelCheckWork == NO && ContSock == INVALID_SOCKET && HostData->UseFTPES == YES)
\r
1653 SetTaskMsg(MSGJPN315);
\r
1654 if((ContSock = DoConnectCrypt(CRYPT_FTPES, HostData, Host, User, Pass, Acct, Port, Fwall, SavePass, Security, CancelCheckWork)) != INVALID_SOCKET)
\r
1655 HostData->CryptMode = CRYPT_FTPES;
\r
1657 if(*CancelCheckWork == NO && ContSock == INVALID_SOCKET && HostData->UseNoEncryption == YES)
\r
1659 SetTaskMsg(MSGJPN314);
\r
1660 if((ContSock = DoConnectCrypt(CRYPT_NONE, HostData, Host, User, Pass, Acct, Port, Fwall, SavePass, Security, CancelCheckWork)) != INVALID_SOCKET)
\r
1661 HostData->CryptMode = CRYPT_NONE;
\r
1667 /*----- ワンタイムパスワードのチェック ----------------------------------------
\r
1670 * chat *Pass : パスワード/パスフレーズ
\r
1671 * char *Reply : USERコマンドを送ったあとのリプライ文字列
\r
1672 * /PASSコマンドで送るパスワードを返すバッファ
\r
1673 * int Type : タイプ (SECURITY_xxx, MDx)
\r
1677 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1680 * ワンタイムパスワードでない時はPassをそのままReplyにコピー
\r
1681 *----------------------------------------------------------------------------*/
\r
1683 static int CheckOneTimePassword(char *Pass, char *Reply, int Type)
\r
1688 char Seed[MAX_SEED_LEN+1];
\r
1691 Sts = FFFTP_SUCCESS;
\r
1694 if(Type == SECURITY_AUTO)
\r
1696 if((Pos = stristr(Reply, "otp-md5")) != NULL)
\r
1699 SetTaskMsg(MSGJPN012);
\r
1701 else if((Pos = stristr(Reply, "otp-sha1")) != NULL)
\r
1704 SetTaskMsg(MSGJPN013);
\r
1706 else if(((Pos = stristr(Reply, "otp-md4")) != NULL) || ((Pos = stristr(Reply, "s/key")) != NULL))
\r
1709 SetTaskMsg(MSGJPN014);
\r
1713 Pos = GetNextField(Reply);
\r
1715 if((Type == MD4) || (Type == MD5) || (Type == SHA1))
\r
1717 /* シーケンス番号を見つけるループ */
\r
1718 DoPrintf("Analize OTP");
\r
1719 DoPrintf("%s", Pos);
\r
1721 while((Pos = GetNextField(Pos)) != NULL)
\r
1726 DoPrintf("Sequence=%d", Seq);
\r
1729 if((Pos = GetNextField(Pos)) != NULL)
\r
1731 if(GetOneField(Pos, Seed, MAX_SEED_LEN) == FFFTP_SUCCESS)
\r
1733 /* Seedは英数字のみ有効とする */
\r
1734 for(i = strlen(Seed)-1; i >= 0; i--)
\r
1736 if((IsAlpha(Seed[i]) == 0) && (IsDigit(Seed[i]) == 0))
\r
1739 if(strlen(Seed) > 0)
\r
1741 DoPrintf("Seed=%s", Seed);
\r
1742 Make6WordPass(Seq, Seed, Pass, Type, Reply);
\r
1743 DoPrintf("Response=%s", Reply);
\r
1745 /* シーケンス番号のチェックと警告 */
\r
1747 DialogBox(GetFtpInst(), MAKEINTRESOURCE(otp_notify_dlg), GetMainHwnd(), ExeEscDialogProc);
\r
1749 Sts = FFFTP_SUCCESS;
\r
1757 if(Sts == FFFTP_FAIL)
\r
1758 SetTaskMsg(MSGJPN015);
\r
1762 strcpy(Reply, Pass);
\r
1763 DoPrintf("No OTP used.");
\r
1781 /*----- ソケットを接続する ----------------------------------------------------
\r
1784 * char *host : ホスト名
\r
1785 * int port : ポート番号
\r
1786 * char *PreMsg : メッセージの前半部分
\r
1790 *----------------------------------------------------------------------------*/
\r
1792 SOCKET connectsock(char *host, int port, char *PreMsg, int *CancelCheckWork)
\r
1794 struct sockaddr_in saSockAddr;
\r
1795 char HostEntry[MAXGETHOSTSTRUCT];
\r
1796 struct hostent *pHostEntry;
\r
1800 SOCKS4CMD Socks4Cmd;
\r
1801 SOCKS4REPLY Socks4Reply;
\r
1802 SOCKS5REQUEST Socks5Cmd;
\r
1803 SOCKS5REPLY Socks5Reply;
\r
1805 //////////////////////////////
\r
1807 //////////////////////////////
\r
1809 Fwall = FWALL_NONE;
\r
1810 if(AskHostFireWall() == YES)
\r
1811 Fwall = FwallType;
\r
1813 sSocket = INVALID_SOCKET;
\r
1816 strcpy(DomainName, host);
\r
1817 memset(&CurSockAddr, 0, sizeof(CurSockAddr));
\r
1818 CurSockAddr.sin_port = htons((u_short)port);
\r
1819 CurSockAddr.sin_family = AF_INET;
\r
1820 if((CurSockAddr.sin_addr.s_addr = inet_addr(host)) == INADDR_NONE)
\r
1824 if(((Fwall == FWALL_SOCKS5_NOAUTH) || (Fwall == FWALL_SOCKS5_USER)) &&
\r
1825 (FwallResolv == YES))
\r
1827 // ホスト名解決はSOCKSサーバに任せる
\r
1828 pHostEntry = NULL;
\r
1833 SetTaskMsg(MSGJPN016, DomainName);
\r
1834 pHostEntry = do_gethostbyname(host, HostEntry, MAXGETHOSTSTRUCT, CancelCheckWork);
\r
1837 if(pHostEntry != NULL)
\r
1839 memcpy((char *)&CurSockAddr.sin_addr, pHostEntry->h_addr, pHostEntry->h_length);
\r
1840 SetTaskMsg(MSGJPN017, PreMsg, DomainName, inet_ntoa(CurSockAddr.sin_addr), ntohs(CurSockAddr.sin_port));
\r
1844 if((Fwall == FWALL_SOCKS5_NOAUTH) || (Fwall == FWALL_SOCKS5_USER))
\r
1847 SetTaskMsg(MSGJPN018, PreMsg, DomainName, ntohs(CurSockAddr.sin_port));
\r
1851 SetTaskMsg(MSGJPN019, host);
\r
1852 return(INVALID_SOCKET);
\r
1857 SetTaskMsg(MSGJPN020, PreMsg, inet_ntoa(CurSockAddr.sin_addr), ntohs(CurSockAddr.sin_port));
\r
1859 if((Fwall == FWALL_SOCKS4) || (Fwall == FWALL_SOCKS5_NOAUTH) || (Fwall == FWALL_SOCKS5_USER))
\r
1863 if(Fwall == FWALL_SOCKS4)
\r
1865 Socks4Cmd.Ver = SOCKS4_VER;
\r
1866 Socks4Cmd.Cmd = SOCKS4_CMD_CONNECT;
\r
1867 Socks4Cmd.Port = CurSockAddr.sin_port;
\r
1868 Socks4Cmd.AdrsInt = CurSockAddr.sin_addr.s_addr;
\r
1869 strcpy(Socks4Cmd.UserID, FwallUser);
\r
1870 Len = offsetof(SOCKS4CMD, UserID) + strlen(FwallUser) + 1;
\r
1874 Len = Socks5MakeCmdPacket(&Socks5Cmd, SOCKS5_CMD_CONNECT, UseIPadrs, CurSockAddr.sin_addr.s_addr, DomainName, CurSockAddr.sin_port);
\r
1877 memset(&SocksSockAddr, 0, sizeof(SocksSockAddr));
\r
1878 if((SocksSockAddr.sin_addr.s_addr = inet_addr(FwallHost)) == INADDR_NONE)
\r
1880 if((pHostEntry = do_gethostbyname(FwallHost, HostEntry, MAXGETHOSTSTRUCT, CancelCheckWork)) != NULL)
\r
1881 memcpy((char *)&SocksSockAddr.sin_addr, pHostEntry->h_addr, pHostEntry->h_length);
\r
1884 SetTaskMsg(MSGJPN021, FwallHost);
\r
1885 return INVALID_SOCKET;
\r
1888 SocksSockAddr.sin_port = htons((u_short)FwallPort);
\r
1889 SocksSockAddr.sin_family = AF_INET;
\r
1890 SetTaskMsg(MSGJPN022, inet_ntoa(SocksSockAddr.sin_addr), ntohs(SocksSockAddr.sin_port));
\r
1891 // connectで接続する先はSOCKSサーバ
\r
1892 memcpy(&saSockAddr, &SocksSockAddr, sizeof(SocksSockAddr));
\r
1896 // connectで接続するのは接続先のホスト
\r
1897 memcpy(&saSockAddr, &CurSockAddr, sizeof(CurSockAddr));
\r
1904 if((sSocket = do_socket(AF_INET, SOCK_STREAM, TCP_PORT)) != INVALID_SOCKET)
\r
1906 if(do_connect(sSocket, (struct sockaddr *)&saSockAddr, sizeof(saSockAddr), CancelCheckWork) != SOCKET_ERROR)
\r
1908 if(Fwall == FWALL_SOCKS4)
\r
1910 Socks4Reply.Result = -1;
\r
1912 // if((SocksSendCmd(sSocket, &Socks4Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
1913 // (Socks4GetCmdReply(sSocket, &Socks4Reply) != FFFTP_SUCCESS) ||
\r
1914 // (Socks4Reply.Result != SOCKS4_RES_OK))
\r
1915 if((SocksSendCmd(sSocket, &Socks4Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
1916 (Socks4GetCmdReply(sSocket, &Socks4Reply, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
1917 (Socks4Reply.Result != SOCKS4_RES_OK))
\r
1919 SetTaskMsg(MSGJPN023, Socks4Reply.Result);
\r
1921 sSocket = INVALID_SOCKET;
\r
1924 else if((Fwall == FWALL_SOCKS5_NOAUTH) || (Fwall == FWALL_SOCKS5_USER))
\r
1926 if(Socks5SelMethod(sSocket, CancelCheckWork) == FFFTP_FAIL)
\r
1929 sSocket = INVALID_SOCKET;
\r
1932 Socks5Reply.Result = -1;
\r
1934 // if((SocksSendCmd(sSocket, &Socks5Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
1935 // (Socks5GetCmdReply(sSocket, &Socks5Reply) != FFFTP_SUCCESS) ||
\r
1936 // (Socks5Reply.Result != SOCKS5_RES_OK))
\r
1937 if((SocksSendCmd(sSocket, &Socks5Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
1938 (Socks5GetCmdReply(sSocket, &Socks5Reply, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
1939 (Socks5Reply.Result != SOCKS5_RES_OK))
\r
1941 SetTaskMsg(MSGJPN024, Socks5Reply.Result);
\r
1943 sSocket = INVALID_SOCKET;
\r
1948 if(sSocket != INVALID_SOCKET)
\r
1949 SetTaskMsg(MSGJPN025);
\r
1954 SetTaskMsg(MSGJPN026/*"接続できません(2) %x", sSocket*/);
\r
1956 sSocket = INVALID_SOCKET;
\r
1960 SetTaskMsg(MSGJPN027);
\r
1966 /*----- リッスンソケットを取得 ------------------------------------------------
\r
1969 * SOCKET ctrl_skt : コントロールソケット
\r
1973 *----------------------------------------------------------------------------*/
\r
1975 SOCKET GetFTPListenSocket(SOCKET ctrl_skt, int *CancelCheckWork)
\r
1977 SOCKET listen_skt;
\r
1980 struct sockaddr_in saCtrlAddr;
\r
1981 struct sockaddr_in saTmpAddr;
\r
1982 SOCKS4CMD Socks4Cmd;
\r
1983 SOCKS4REPLY Socks4Reply;
\r
1984 SOCKS5REQUEST Socks5Cmd;
\r
1985 SOCKS5REPLY Socks5Reply;
\r
1990 Fwall = FWALL_NONE;
\r
1991 if(AskHostFireWall() == YES)
\r
1992 Fwall = FwallType;
\r
1994 if((listen_skt = do_socket(AF_INET, SOCK_STREAM, IPPROTO_TCP)) != INVALID_SOCKET)
\r
1996 if(Fwall == FWALL_SOCKS4)
\r
1998 /*===== SOCKS4を使う =====*/
\r
1999 DoPrintf("Use SOCKS4 BIND");
\r
2000 if(do_connect(listen_skt, (struct sockaddr *)&SocksSockAddr, sizeof(SocksSockAddr), CancelCheckWork) != SOCKET_ERROR)
\r
2002 Socks4Cmd.Ver = SOCKS4_VER;
\r
2003 Socks4Cmd.Cmd = SOCKS4_CMD_BIND;
\r
2004 Socks4Cmd.Port = CurSockAddr.sin_port;
\r
2005 Socks4Cmd.AdrsInt = CurSockAddr.sin_addr.s_addr;
\r
2006 strcpy(Socks4Cmd.UserID, FwallUser);
\r
2007 Len = offsetof(SOCKS4CMD, UserID) + strlen(FwallUser) + 1;
\r
2009 Socks4Reply.Result = -1;
\r
2011 // if((SocksSendCmd(listen_skt, &Socks4Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2012 // (Socks4GetCmdReply(listen_skt, &Socks4Reply) != FFFTP_SUCCESS) ||
\r
2013 // (Socks4Reply.Result != SOCKS4_RES_OK))
\r
2014 if((SocksSendCmd(listen_skt, &Socks4Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2015 (Socks4GetCmdReply(listen_skt, &Socks4Reply, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2016 (Socks4Reply.Result != SOCKS4_RES_OK))
\r
2018 SetTaskMsg(MSGJPN028, Socks4Reply.Result);
\r
2019 DoClose(listen_skt);
\r
2020 listen_skt = INVALID_SOCKET;
\r
2023 if(Socks4Reply.AdrsInt == 0)
\r
2024 Socks4Reply.AdrsInt = SocksSockAddr.sin_addr.s_addr;
\r
2026 a = (char *)&Socks4Reply.AdrsInt;
\r
2027 p = (char *)&Socks4Reply.Port;
\r
2030 else if((Fwall == FWALL_SOCKS5_NOAUTH) || (Fwall == FWALL_SOCKS5_USER))
\r
2032 /*===== SOCKS5を使う =====*/
\r
2033 DoPrintf("Use SOCKS5 BIND");
\r
2034 if(do_connect(listen_skt, (struct sockaddr *)&SocksSockAddr, sizeof(SocksSockAddr), CancelCheckWork) != SOCKET_ERROR)
\r
2036 if(Socks5SelMethod(listen_skt, CancelCheckWork) == FFFTP_FAIL)
\r
2038 DoClose(listen_skt);
\r
2039 listen_skt = INVALID_SOCKET;
\r
2040 return(listen_skt);
\r
2043 Len = Socks5MakeCmdPacket(&Socks5Cmd, SOCKS5_CMD_BIND, UseIPadrs, CurSockAddr.sin_addr.s_addr, DomainName, CurSockAddr.sin_port);
\r
2045 Socks5Reply.Result = -1;
\r
2047 // if((SocksSendCmd(listen_skt, &Socks5Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2048 // (Socks5GetCmdReply(listen_skt, &Socks5Reply) != FFFTP_SUCCESS) ||
\r
2049 // (Socks5Reply.Result != SOCKS5_RES_OK))
\r
2050 if((SocksSendCmd(listen_skt, &Socks5Cmd, Len, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2051 (Socks5GetCmdReply(listen_skt, &Socks5Reply, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2052 (Socks5Reply.Result != SOCKS5_RES_OK))
\r
2054 SetTaskMsg(MSGJPN029, Socks5Reply.Result);
\r
2055 DoClose(listen_skt);
\r
2056 listen_skt = INVALID_SOCKET;
\r
2059 if(Socks5Reply.AdrsInt == 0)
\r
2060 Socks5Reply.AdrsInt = SocksSockAddr.sin_addr.s_addr;
\r
2062 a = (char *)&Socks5Reply.AdrsInt;
\r
2063 p = (char *)&Socks5Reply.Port;
\r
2068 /*===== SOCKSを使わない =====*/
\r
2069 DoPrintf("Use normal BIND");
\r
2070 saCtrlAddr.sin_port = htons(0);
\r
2071 saCtrlAddr.sin_family = AF_INET;
\r
2072 saCtrlAddr.sin_addr.s_addr = 0;
\r
2074 if(bind(listen_skt, (struct sockaddr *)&saCtrlAddr, sizeof(struct sockaddr)) != SOCKET_ERROR)
\r
2076 iLength = sizeof(saCtrlAddr);
\r
2077 if(getsockname(listen_skt, (struct sockaddr *)&saCtrlAddr, &iLength) != SOCKET_ERROR)
\r
2079 if(do_listen(listen_skt, 1) == 0)
\r
2081 iLength = sizeof(saTmpAddr);
\r
2082 if(getsockname(ctrl_skt, (struct sockaddr *)&saTmpAddr, &iLength) == SOCKET_ERROR)
\r
2083 ReportWSError("getsockname", WSAGetLastError());
\r
2085 a = (char *)&saTmpAddr.sin_addr;
\r
2086 p = (char *)&saCtrlAddr.sin_port;
\r
2090 ReportWSError("listen", WSAGetLastError());
\r
2091 do_closesocket(listen_skt);
\r
2092 listen_skt = INVALID_SOCKET;
\r
2097 ReportWSError("getsockname", WSAGetLastError());
\r
2098 do_closesocket(listen_skt);
\r
2099 listen_skt = INVALID_SOCKET;
\r
2104 ReportWSError("bind", WSAGetLastError());
\r
2105 do_closesocket(listen_skt);
\r
2106 listen_skt = INVALID_SOCKET;
\r
2109 if(listen_skt == INVALID_SOCKET)
\r
2110 SetTaskMsg(MSGJPN030);
\r
2114 ReportWSError("socket create", WSAGetLastError());
\r
2116 if(listen_skt != INVALID_SOCKET)
\r
2118 #define UC(b) (((int)b)&0xff)
\r
2120 // if((command(ctrl_skt,NULL, &CancelFlg, "PORT %d,%d,%d,%d,%d,%d",
\r
2121 // UC(a[0]), UC(a[1]), UC(a[2]), UC(a[3]),
\r
2122 // UC(p[0]), UC(p[1])) / 100) != FTP_COMPLETE)
\r
2123 if((command(ctrl_skt,NULL, CancelCheckWork, "PORT %d,%d,%d,%d,%d,%d",
\r
2124 UC(a[0]), UC(a[1]), UC(a[2]), UC(a[3]),
\r
2125 UC(p[0]), UC(p[1])) / 100) != FTP_COMPLETE)
\r
2127 SetTaskMsg(MSGJPN031);
\r
2128 do_closesocket(listen_skt);
\r
2129 listen_skt = INVALID_SOCKET;
\r
2132 // DoPrintf("Skt=%u : listener %s port %u",listen_skt,inet_ntoa(saCtrlAddr.sin_addr),ntohs(saCtrlAddr.sin_port));
\r
2135 return(listen_skt);
\r
2139 /*----- ホストへ接続処理中かどうかを返す---------------------------------------
\r
2147 *----------------------------------------------------------------------------*/
\r
2149 int AskTryingConnect(void)
\r
2151 return(TryConnect);
\r
2156 ///*----- ブロッキングコールのフックコールバック --------------------------------
\r
2163 //*----------------------------------------------------------------------------*/
\r
2165 //static BOOL CALLBACK BlkHookFnc(void)
\r
2167 // BackgrndMessageProc();
\r
2169 // if(CancelFlg == YES)
\r
2171 // SetTaskMsg(MSGJPN032);
\r
2172 // WSACancelBlockingCall();
\r
2173 // CancelFlg = NO;
\r
2181 /*----- SOCKS5のコマンドパケットを作成する ------------------------------------
\r
2184 * SOCKS5REQUEST *Packet : パケットを作成するワーク
\r
2186 * int ValidIP : IPアドレスを使うかどうか(YES/NO)
\r
2187 * ulong IP : IPアドレス
\r
2188 * char *Host : ホスト名
\r
2189 * ushort Port : ポート
\r
2193 *----------------------------------------------------------------------------*/
\r
2195 static int Socks5MakeCmdPacket(SOCKS5REQUEST *Packet, char Cmd, int ValidIP, ulong IP, char *Host, ushort Port)
\r
2201 Pos = (uchar *)Packet;
\r
2202 Pos += SOCKS5REQUEST_SIZE;
\r
2203 TotalLen = SOCKS5REQUEST_SIZE + 2; /* +2はポートの分 */
\r
2205 Packet->Ver = SOCKS5_VER;
\r
2206 Packet->Cmd = Cmd;
\r
2208 if(ValidIP == YES)
\r
2211 Packet->Type = SOCKS5_ADRS_IPV4;
\r
2212 *((ulong *)Pos) = IP;
\r
2219 Packet->Type = SOCKS5_ADRS_NAME;
\r
2220 Len = strlen(Host);
\r
2222 strcpy(Pos, Host);
\r
2224 TotalLen += Len + 1;
\r
2226 *((ushort *)Pos) = Port;
\r
2232 /*----- SOCKSのコマンドを送る -------------------------------------------------
\r
2235 * SOCKET Socket : ソケット
\r
2236 * void *Data : 送るデータ
\r
2240 * int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)
\r
2241 *----------------------------------------------------------------------------*/
\r
2243 static int SocksSendCmd(SOCKET Socket, void *Data, int Size, int *CancelCheckWork)
\r
2247 Ret = SendData(Socket, (char *)Data, Size, 0, CancelCheckWork);
\r
2249 if(Ret != FFFTP_SUCCESS)
\r
2250 SetTaskMsg(MSGJPN033, *((short *)Data));
\r
2256 /*----- SOCKS5のコマンドに対するリプライパケットを受信する --------------------
\r
2259 * SOCKET Socket : ソケット
\r
2260 * SOCKS5REPLY *Packet : パケット
\r
2263 * int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)
\r
2264 *----------------------------------------------------------------------------*/
\r
2267 //static int Socks5GetCmdReply(SOCKET Socket, SOCKS5REPLY *Packet)
\r
2268 static int Socks5GetCmdReply(SOCKET Socket, SOCKS5REPLY *Packet, int *CancelCheckWork)
\r
2274 Pos = (uchar *)Packet;
\r
2275 Pos += SOCKS5REPLY_SIZE;
\r
2278 // if((Ret = ReadNchar(Socket, (char *)Packet, SOCKS5REPLY_SIZE, &CancelFlg)) == FFFTP_SUCCESS)
\r
2279 if((Ret = ReadNchar(Socket, (char *)Packet, SOCKS5REPLY_SIZE, CancelCheckWork)) == FFFTP_SUCCESS)
\r
2281 if(Packet->Type == SOCKS5_ADRS_IPV4)
\r
2283 else if(Packet->Type == SOCKS5_ADRS_IPV6)
\r
2288 // if((Ret = ReadNchar(Socket, (char *)Pos, 1, &CancelFlg)) == FFFTP_SUCCESS)
\r
2289 if((Ret = ReadNchar(Socket, (char *)Pos, 1, CancelCheckWork)) == FFFTP_SUCCESS)
\r
2296 if(Ret == FFFTP_SUCCESS)
\r
2298 // Ret = ReadNchar(Socket, (char *)Pos, Len, &CancelFlg);
\r
2299 Ret = ReadNchar(Socket, (char *)Pos, Len, CancelCheckWork);
\r
2302 if(Ret != FFFTP_SUCCESS)
\r
2303 SetTaskMsg(MSGJPN034);
\r
2309 /*----- SOCKS4のコマンドに対するリプライパケットを受信する --------------------
\r
2312 * SOCKET Socket : ソケット
\r
2313 * SOCKS5REPLY *Packet : パケット
\r
2316 * int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)
\r
2317 *----------------------------------------------------------------------------*/
\r
2320 //static int Socks4GetCmdReply(SOCKET Socket, SOCKS4REPLY *Packet)
\r
2321 static int Socks4GetCmdReply(SOCKET Socket, SOCKS4REPLY *Packet, int *CancelCheckWork)
\r
2326 // Ret = ReadNchar(Socket, (char *)Packet, SOCKS4REPLY_SIZE, &CancelFlg);
\r
2327 Ret = ReadNchar(Socket, (char *)Packet, SOCKS4REPLY_SIZE, CancelCheckWork);
\r
2329 if(Ret != FFFTP_SUCCESS)
\r
2330 DoPrintf(MSGJPN035);
\r
2336 /*----- SOCKS5の認証を行う ----------------------------------------------------
\r
2339 * SOCKET Socket : ソケット
\r
2342 * int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)
\r
2343 *----------------------------------------------------------------------------*/
\r
2345 static int Socks5SelMethod(SOCKET Socket, int *CancelCheckWork)
\r
2348 SOCKS5METHODREQUEST Socks5Method;
\r
2349 SOCKS5METHODREPLY Socks5MethodReply;
\r
2350 SOCKS5USERPASSSTATUS Socks5Status;
\r
2351 char Buf[USER_NAME_LEN + PASSWORD_LEN + 4];
\r
2355 Ret = FFFTP_SUCCESS;
\r
2356 Socks5Method.Ver = SOCKS5_VER;
\r
2357 Socks5Method.Num = 1;
\r
2358 if(FwallType == FWALL_SOCKS5_NOAUTH)
\r
2359 Socks5Method.Methods[0] = SOCKS5_AUTH_NONE;
\r
2361 Socks5Method.Methods[0] = SOCKS5_AUTH_USER;
\r
2364 // if((SocksSendCmd(Socket, &Socks5Method, SOCKS5METHODREQUEST_SIZE, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2365 // (ReadNchar(Socket, (char *)&Socks5MethodReply, SOCKS5METHODREPLY_SIZE, &CancelFlg) != FFFTP_SUCCESS) ||
\r
2366 // (Socks5MethodReply.Method == (uchar)0xFF))
\r
2367 if((SocksSendCmd(Socket, &Socks5Method, SOCKS5METHODREQUEST_SIZE, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2368 (ReadNchar(Socket, (char *)&Socks5MethodReply, SOCKS5METHODREPLY_SIZE, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2369 (Socks5MethodReply.Method == (uchar)0xFF))
\r
2371 SetTaskMsg(MSGJPN036);
\r
2374 else if(Socks5MethodReply.Method == SOCKS5_AUTH_USER)
\r
2376 DoPrintf("SOCKS5 User/Pass Authentication");
\r
2377 Buf[0] = SOCKS5_USERAUTH_VER;
\r
2378 Len = strlen(FwallUser);
\r
2379 Len2 = strlen(FwallPass);
\r
2381 strcpy(Buf+2, FwallUser);
\r
2382 Buf[2 + Len] = Len2;
\r
2383 strcpy(Buf+3+Len, FwallPass);
\r
2386 // if((SocksSendCmd(Socket, &Buf, Len+Len2+3, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2387 // (ReadNchar(Socket, (char *)&Socks5Status, SOCKS5USERPASSSTATUS_SIZE, &CancelFlg) != FFFTP_SUCCESS) ||
\r
2388 // (Socks5Status.Status != 0))
\r
2389 if((SocksSendCmd(Socket, &Buf, Len+Len2+3, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2390 (ReadNchar(Socket, (char *)&Socks5Status, SOCKS5USERPASSSTATUS_SIZE, CancelCheckWork) != FFFTP_SUCCESS) ||
\r
2391 (Socks5Status.Status != 0))
\r
2393 SetTaskMsg(MSGJPN037);
\r
2398 DoPrintf("SOCKS5 No Authentication");
\r
2404 /*----- SOCKSのBINDの第2リプライメッセージを受け取る -------------------------
\r
2407 * SOCKET Socket : ソケット
\r
2408 * SOCKET *Data : データソケットを返すワーク
\r
2411 * int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)
\r
2412 *----------------------------------------------------------------------------*/
\r
2415 //int SocksGet2ndBindReply(SOCKET Socket, SOCKET *Data)
\r
2416 int SocksGet2ndBindReply(SOCKET Socket, SOCKET *Data, int *CancelCheckWork)
\r
2422 if((AskHostFireWall() == YES) && (FwallType == FWALL_SOCKS4))
\r
2425 // Socks4GetCmdReply(Socket, (SOCKS4REPLY *)Buf);
\r
2426 Socks4GetCmdReply(Socket, (SOCKS4REPLY *)Buf, CancelCheckWork);
\r
2428 Ret = FFFTP_SUCCESS;
\r
2430 else if((AskHostFireWall() == YES) &&
\r
2431 ((FwallType == FWALL_SOCKS5_NOAUTH) || (FwallType == FWALL_SOCKS5_USER)))
\r
2434 // Socks5GetCmdReply(Socket, (SOCKS5REPLY *)Buf);
\r
2435 Socks5GetCmdReply(Socket, (SOCKS5REPLY *)Buf, CancelCheckWork);
\r
2437 Ret = FFFTP_SUCCESS;
\r
2445 int AskCryptMode(void)
\r
2447 return(CurHost.CryptMode);
\r
2450 int AskUseNoEncryption(void)
\r
2452 return(CurHost.UseNoEncryption);
\r
2455 int AskUseFTPES(void)
\r
2457 return(CurHost.UseFTPES);
\r
2460 int AskUseFTPIS(void)
\r
2462 return(CurHost.UseFTPIS);
\r
2465 int AskUseSFTP(void)
\r
2467 return(CurHost.UseSFTP);
\r
2470 char *AskPrivateKey(void)
\r
2472 return(CurHost.PrivateKey);
\r
2476 int AskMaxThreadCount(void)
\r
2478 return(CurHost.MaxThreadCount);
\r
2481 int AskReuseCmdSkt(void)
\r
2483 return(CurHost.ReuseCmdSkt);
\r
2487 int AskHostFeature(void)
\r
2489 return(CurHost.Feature);
\r
2493 int AskUseMLSD(void)
\r
2495 return(CurHost.UseMLSD);
\r
2499 int AskUseIPv6(void)
\r
2501 return(CurHost.UseIPv6);
\r