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
30 /* このソースは一部、WS_FTP Version 93.12.05 のソースを参考にしました。 */
\r
31 /* スレッドの作成/終了に関して、樋口殿作成のパッチを組み込みました。 */
\r
34 一部、高速化のためのコード追加 by H.Shirouzu at 2002/10/02
\r
42 #include <mbstring.h>
\r
44 #include <winsock.h>
\r
45 #include <windowsx.h>
\r
46 #include <commctrl.h>
\r
47 #include <process.h>
\r
50 #include "resource.h"
\r
52 #define SET_BUFFER_SIZE
\r
54 /* Add by H.Shirouzu at 2002/10/02 */
\r
56 #define BUFSIZE (32 * 1024)
\r
57 #define SOCKBUF_SIZE (256 * 1024)
\r
60 #ifdef DISABLE_TRANSFER_NETWORK_BUFFERS
\r
62 #define BUFSIZE (64 * 1024) // RWIN値以下で充分な大きさが望ましいと思われる。
\r
63 #undef SET_BUFFER_SIZE
\r
66 #define TIMER_DISPLAY 1 /* 表示更新用タイマのID */
\r
67 #define DISPLAY_TIMING 500 /* 表示更新時間 0.5秒 */
\r
69 #define ERR_MSG_LEN 1024
\r
79 /*===== プロトタイプ =====*/
\r
81 static void DispTransPacket(TRANSPACKET *Pkt);
\r
82 static void EraseTransFileList(void);
\r
83 static ULONG WINAPI TransferThread(void *Dummy);
\r
84 static int MakeNonFullPath(TRANSPACKET *Pkt, char *CurDir, char *Tmp);
\r
85 static int DownLoadNonPassive(TRANSPACKET *Pkt, int *CancelCheckWork);
\r
86 static int DownLoadPassive(TRANSPACKET *Pkt, int *CancelCheckWork);
\r
87 static int DownLoadFile(TRANSPACKET *Pkt, SOCKET dSkt, int CreateMode, int *CancelCheckWork);
\r
88 static void DispDownloadFinishMsg(TRANSPACKET *Pkt, int iRetCode);
\r
89 static int DispUpDownErrDialog(int ResID, HWND hWnd, char *Fname);
\r
90 static BOOL CALLBACK UpDownErrorDialogProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
91 static int SetDownloadResume(TRANSPACKET *Pkt, int ProcMode, LONGLONG Size, int *Mode, int *CancelCheckWork);
\r
92 static BOOL CALLBACK NoResumeWndProc(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
93 static int DoUpLoad(SOCKET cSkt, TRANSPACKET *Pkt);
\r
94 static int UpLoadNonPassive(TRANSPACKET *Pkt);
\r
95 static int UpLoadPassive(TRANSPACKET *Pkt);
\r
96 static int UpLoadFile(TRANSPACKET *Pkt, SOCKET dSkt);
\r
97 static int TermCodeConvAndSend(TERMCODECONVINFO *tInfo, SOCKET Skt, char *Data, int Size, int Ascii);
\r
98 static void DispUploadFinishMsg(TRANSPACKET *Pkt, int iRetCode);
\r
99 static int SetUploadResume(TRANSPACKET *Pkt, int ProcMode, LONGLONG Size, int *Mode);
\r
100 static LRESULT CALLBACK TransDlgProc(HWND hDlg, UINT Msg, WPARAM wParam, LPARAM lParam);
\r
101 static void DispTransferStatus(HWND hWnd, int End, TRANSPACKET *Pkt);
\r
102 static void DispTransFileInfo(TRANSPACKET *Pkt, char *Title, int SkipButton, int Info);
\r
103 static int GetAdrsAndPort(char *Str, char *Adrs, int *Port, int Max);
\r
104 static int IsSpecialDevice(char *Fname);
\r
105 static int MirrorDelNotify(int Cur, int Notify, TRANSPACKET *Pkt);
\r
106 static BOOL CALLBACK MirrorDeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
107 static void SetErrorMsg(char *fmt, ...);
\r
109 /*===== ローカルなワーク =====*/
\r
111 static HANDLE hTransferThread;
\r
112 static int fTransferThreadExit = FALSE;
\r
114 static HANDLE hRunMutex; /* 転送スレッド実行ミューテックス */
\r
115 static HANDLE hListAccMutex; /* 転送ファイルアクセス用ミューテックス */
\r
117 static int TransFiles = 0; /* 転送待ちファイル数 */
\r
118 static TRANSPACKET *TransPacketBase = NULL; /* 転送ファイルリスト */
\r
120 static int Canceled; /* 中止フラグ YES/NO */
\r
121 static int ClearAll; /* 全て中止フラグ YES/NO */
\r
123 static int ForceAbort; /* 転送中止フラグ */
\r
124 /* このフラグはスレッドを終了させるときに使う */
\r
126 static LONGLONG AllTransSizeNow; /* 今回の転送で転送したサイズ */
\r
127 static time_t TimeStart; /* 転送開始時間 */
\r
129 static int KeepDlg = NO; /* 転送中ダイアログを消さないかどうか (YES/NO) */
\r
130 static int MoveToForeground = NO; /* ウインドウを前面に移動するかどうか (YES/NO) */
\r
132 static char CurDir[FMAX_PATH+1] = { "" };
\r
133 static char ErrMsg[ERR_MSG_LEN+7];
\r
135 /*===== 外部参照 =====*/
\r
138 extern int SaveTimeStamp;
\r
140 // extern int TimeOut;
\r
141 extern int FwallType;
\r
142 extern int MirUpDelNotify;
\r
143 extern int MirDownDelNotify;
\r
144 extern int FolderAttr;
\r
145 extern int FolderAttrNum;
\r
148 /*----- ファイル転送スレッドを起動する ----------------------------------------
\r
155 *----------------------------------------------------------------------------*/
\r
157 int MakeTransferThread(void)
\r
161 hListAccMutex = CreateMutex( NULL, FALSE, NULL );
\r
162 hRunMutex = CreateMutex( NULL, TRUE, NULL );
\r
167 fTransferThreadExit = FALSE;
\r
168 hTransferThread = (HANDLE)_beginthreadex(NULL, 0, TransferThread, 0, 0, &dwID);
\r
169 if (hTransferThread == NULL)
\r
170 return(FFFTP_FAIL); /* XXX */
\r
172 return(FFFTP_SUCCESS);
\r
176 /*----- ファイル転送スレッドを終了する ----------------------------------------
\r
183 *----------------------------------------------------------------------------*/
\r
185 void CloseTransferThread(void)
\r
191 fTransferThreadExit = TRUE;
\r
192 while(WaitForSingleObject(hTransferThread, 10) == WAIT_TIMEOUT)
\r
194 BackgrndMessageProc();
\r
197 CloseHandle(hTransferThread);
\r
199 ReleaseMutex( hRunMutex );
\r
201 CloseHandle( hListAccMutex );
\r
202 CloseHandle( hRunMutex );
\r
207 /*----- 転送するファイル情報をリストに追加する --------------------------------
\r
210 * TRANSPACKET *Pkt : 転送ファイル情報
\r
211 * TRANSPACKET **Base : リストの先頭
\r
215 * FFFTP_SUCCESS/FFFTP_FAIL
\r
216 *----------------------------------------------------------------------------*/
\r
218 int AddTmpTransFileList(TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
225 if((Pos = malloc(sizeof(TRANSPACKET))) != NULL)
\r
227 memcpy(Pos, Pkt, sizeof(TRANSPACKET));
\r
235 while(Prev->Next != NULL)
\r
239 Sts = FFFTP_SUCCESS;
\r
245 /*----- 転送するファイル情報リストをクリアする --------------------------------
\r
248 * TRANSPACKET **Base : リストの先頭
\r
252 *----------------------------------------------------------------------------*/
\r
254 void EraseTmpTransFileList(TRANSPACKET **Base)
\r
271 /*----- 転送するファイル情報リストから1つの情報を取り除く --------------------
\r
274 * TRANSPACKET *Pkt : 転送ファイル情報
\r
275 * TRANSPACKET **Base : リストの先頭
\r
279 * FFFTP_SUCCESS/FFFTP_FAIL
\r
280 *----------------------------------------------------------------------------*/
\r
282 int RemoveTmpTransFileListItem(TRANSPACKET **Base, int Num)
\r
294 Sts = FFFTP_SUCCESS;
\r
304 Prev->Next = Pos->Next;
\r
306 Sts = FFFTP_SUCCESS;
\r
315 /*----- 転送するファイル情報を転送ファイルリストに登録する --------------------
\r
318 * TRANSPACKET *Pkt : 転送ファイル情報
\r
322 *----------------------------------------------------------------------------*/
\r
324 void AddTransFileList(TRANSPACKET *Pkt)
\r
326 DispTransPacket(Pkt);
\r
328 WaitForSingleObject(hListAccMutex, INFINITE);
\r
330 if(AddTmpTransFileList(Pkt, &TransPacketBase) == FFFTP_SUCCESS)
\r
332 if((strncmp(Pkt->Cmd, "RETR", 4) == 0) ||
\r
333 (strncmp(Pkt->Cmd, "STOR", 4) == 0))
\r
336 PostMessage(GetMainHwnd(), WM_CHANGE_COND, 0, 0);
\r
339 ReleaseMutex(hListAccMutex);
\r
345 /*----- 転送ファイル情報を転送ファイルリストに追加する ------------------------
\r
348 * TRANSPACKET *Pkt : 転送ファイル情報
\r
349 * TRANSPACKET **Base : リストの先頭
\r
356 *----------------------------------------------------------------------------*/
\r
358 void AppendTransFileList(TRANSPACKET *Pkt)
\r
362 WaitForSingleObject(hListAccMutex, INFINITE);
\r
364 if(TransPacketBase == NULL)
\r
365 TransPacketBase = Pkt;
\r
368 Pos = TransPacketBase;
\r
369 while(Pos->Next != NULL)
\r
376 DispTransPacket(Pkt);
\r
378 if((strncmp(Pkt->Cmd, "RETR", 4) == 0) ||
\r
379 (strncmp(Pkt->Cmd, "STOR", 4) == 0))
\r
382 PostMessage(GetMainHwnd(), WM_CHANGE_COND, 0, 0);
\r
387 ReleaseMutex(hListAccMutex);
\r
392 /*----- 転送ファイル情報を表示する --------------------------------------------
\r
395 * TRANSPACKET *Pkt : 転送ファイル情報
\r
399 *----------------------------------------------------------------------------*/
\r
401 static void DispTransPacket(TRANSPACKET *Pkt)
\r
403 if((strncmp(Pkt->Cmd, "RETR", 4) == 0) || (strncmp(Pkt->Cmd, "STOR", 4) == 0))
\r
404 DoPrintf("TransList Cmd=%s : %s : %s", Pkt->Cmd, Pkt->RemoteFile, Pkt->LocalFile);
\r
405 else if(strncmp(Pkt->Cmd, "R-", 2) == 0)
\r
406 DoPrintf("TransList Cmd=%s : %s", Pkt->Cmd, Pkt->RemoteFile);
\r
407 else if(strncmp(Pkt->Cmd, "L-", 2) == 0)
\r
408 DoPrintf("TransList Cmd=%s : %s", Pkt->Cmd, Pkt->LocalFile);
\r
409 else if(strncmp(Pkt->Cmd, "MKD", 3) == 0)
\r
411 if(strlen(Pkt->LocalFile) > 0)
\r
412 DoPrintf("TransList Cmd=%s : %s", Pkt->Cmd, Pkt->LocalFile);
\r
414 DoPrintf("TransList Cmd=%s : %s", Pkt->Cmd, Pkt->RemoteFile);
\r
417 DoPrintf("TransList Cmd=%s", Pkt->Cmd);
\r
422 /*----- 転送ファイルリストをクリアする ----------------------------------------
\r
429 *----------------------------------------------------------------------------*/
\r
431 static void EraseTransFileList(void)
\r
435 TRANSPACKET *NotDel;
\r
440 WaitForSingleObject(hListAccMutex, INFINITE);
\r
441 New = TransPacketBase;
\r
444 /* 最後の"BACKCUR"は必要なので消さない */
\r
445 if(strcmp(New->Cmd, "BACKCUR") == 0)
\r
451 NotDel->Next = NULL;
\r
460 TransPacketBase = NotDel;
\r
462 PostMessage(GetMainHwnd(), WM_CHANGE_COND, 0, 0);
\r
463 ReleaseMutex(hListAccMutex);
\r
465 strcpy(Pkt.Cmd, "GOQUIT");
\r
466 AddTransFileList(&Pkt);
\r
471 /*----- 転送中ダイアログを消さないようにするかどうかを設定 --------------------
\r
474 * int Sw : 転送中ダイアログを消さないかどうか (YES/NO)
\r
478 *----------------------------------------------------------------------------*/
\r
480 void KeepTransferDialog(int Sw)
\r
487 /*----- 現在転送中かどうかを返す ----------------------------------------------
\r
493 * int ステータス (YES/NO=転送中ではない)
\r
494 *----------------------------------------------------------------------------*/
\r
496 int AskTransferNow(void)
\r
498 return(TransPacketBase != NULL ? YES : NO);
\r
502 /*----- 転送するファイルの数を返す --------------------------------------------
\r
509 *----------------------------------------------------------------------------*/
\r
511 int AskTransferFileNum(void)
\r
513 return(TransFiles);
\r
517 /*----- 転送中ウインドウを前面に出す ------------------------------------------
\r
524 *----------------------------------------------------------------------------*/
\r
526 void GoForwardTransWindow(void)
\r
528 MoveToForeground = YES;
\r
533 /*----- 転送ソケットのカレントディレクトリ情報を初期化 ------------------------
\r
540 *----------------------------------------------------------------------------*/
\r
542 void InitTransCurDir(void)
\r
544 strcpy(CurDir, "");
\r
549 /*----- ファイル転送スレッドのメインループ ------------------------------------
\r
552 * void *Dummy : 使わない
\r
556 *----------------------------------------------------------------------------*/
\r
558 static ULONG WINAPI TransferThread(void *Dummy)
\r
562 char Tmp[FMAX_PATH+1];
\r
575 while((TransPacketBase != NULL) ||
\r
576 (WaitForSingleObject(hRunMutex, 200) == WAIT_TIMEOUT))
\r
578 if(fTransferThreadExit == TRUE)
\r
581 WaitForSingleObject(hListAccMutex, INFINITE);
\r
582 memset(ErrMsg, NUL, ERR_MSG_LEN+7);
\r
586 if(TransPacketBase != NULL)
\r
588 ReleaseMutex(hListAccMutex);
\r
589 if(hWndTrans == NULL)
\r
591 if((strncmp(TransPacketBase->Cmd, "RETR", 4) == 0) ||
\r
592 (strncmp(TransPacketBase->Cmd, "STOR", 4) == 0) ||
\r
593 (strncmp(TransPacketBase->Cmd, "MKD", 3) == 0) ||
\r
594 (strncmp(TransPacketBase->Cmd, "L-", 2) == 0) ||
\r
595 (strncmp(TransPacketBase->Cmd, "R-", 2) == 0))
\r
597 hWndTrans = CreateDialog(GetFtpInst(), MAKEINTRESOURCE(transfer_dlg), HWND_DESKTOP, (DLGPROC)TransDlgProc);
\r
598 if(MoveToForeground == YES)
\r
599 SetForegroundWindow(hWndTrans);
\r
600 ShowWindow(hWndTrans, SW_SHOWNOACTIVATE);
\r
603 TransPacketBase->hWndTrans = hWndTrans;
\r
605 if(hWndTrans != NULL)
\r
607 if(MoveToForeground == YES)
\r
609 SetForegroundWindow(hWndTrans);
\r
610 MoveToForeground = NO;
\r
614 if(hWndTrans != NULL)
\r
615 SendMessage(hWndTrans, WM_SET_PACKET, 0, (LPARAM)TransPacketBase);
\r
618 if(strncmp(TransPacketBase->Cmd, "RETR", 4) == 0)
\r
621 if(CheckPathViolation(TransPacketBase) == NO)
\r
623 /* フルパスを使わないための処理 */
\r
624 if(MakeNonFullPath(TransPacketBase, CurDir, Tmp) == FFFTP_SUCCESS)
\r
626 if(strncmp(TransPacketBase->Cmd, "RETR-S", 6) == 0)
\r
629 DoSIZE(TransPacketBase->RemoteFile, &TransPacketBase->Size);
\r
630 DoMDTM(TransPacketBase->RemoteFile, &TransPacketBase->Time);
\r
631 strcpy(TransPacketBase->Cmd, "RETR ");
\r
635 // if(DoDownLoad(AskTrnCtrlSkt(), TransPacketBase, NO) == 429)
\r
637 // if(ReConnectTrnSkt() == FFFTP_SUCCESS)
\r
638 DoDownLoad(AskTrnCtrlSkt(), TransPacketBase, NO, &Canceled);
\r
644 else if(strncmp(TransPacketBase->Cmd, "STOR", 4) == 0)
\r
646 /* フルパスを使わないための処理 */
\r
647 if(MakeNonFullPath(TransPacketBase, CurDir, Tmp) == FFFTP_SUCCESS)
\r
650 // if(DoUpLoad(AskTrnCtrlSkt(), TransPacketBase) == 429)
\r
652 // if(ReConnectTrnSkt() == FFFTP_SUCCESS)
\r
653 DoUpLoad(AskTrnCtrlSkt(), TransPacketBase);
\r
657 /* フォルダ作成(ローカルまたはホスト) */
\r
658 else if(strncmp(TransPacketBase->Cmd, "MKD", 3) == 0)
\r
660 DispTransFileInfo(TransPacketBase, MSGJPN078, FALSE, YES);
\r
662 if(strlen(TransPacketBase->RemoteFile) > 0)
\r
664 /* フルパスを使わないための処理 */
\r
665 CwdSts = FTP_COMPLETE;
\r
667 strcpy(Tmp, TransPacketBase->RemoteFile);
\r
668 if(ProcForNonFullpath(Tmp, CurDir, hWndTrans, 1) == FFFTP_FAIL)
\r
671 CwdSts = FTP_ERROR;
\r
674 if(CwdSts == FTP_COMPLETE)
\r
677 CommandProcTrn(NULL, "MKD %s", Tmp);
\r
678 /* すでにフォルダがある場合もあるので、 */
\r
679 /* ここではエラーチェックはしない */
\r
682 CommandProcTrn(NULL, "%s %03d %s", AskHostChmodCmd(), FolderAttrNum, Tmp);
\r
685 else if(strlen(TransPacketBase->LocalFile) > 0)
\r
688 DoLocalMKD(TransPacketBase->LocalFile);
\r
691 /* ディレクトリ作成(常にホスト側) */
\r
692 else if(strncmp(TransPacketBase->Cmd, "R-MKD", 5) == 0)
\r
694 DispTransFileInfo(TransPacketBase, MSGJPN079, FALSE, YES);
\r
696 /* フルパスを使わないための処理 */
\r
697 if(MakeNonFullPath(TransPacketBase, CurDir, Tmp) == FFFTP_SUCCESS)
\r
700 CommandProcTrn(NULL, "%s%s", TransPacketBase->Cmd+2, TransPacketBase->RemoteFile);
\r
703 CommandProcTrn(NULL, "%s %03d %s", AskHostChmodCmd(), FolderAttrNum, TransPacketBase->RemoteFile);
\r
706 /* ディレクトリ削除(常にホスト側) */
\r
707 else if(strncmp(TransPacketBase->Cmd, "R-RMD", 5) == 0)
\r
709 DispTransFileInfo(TransPacketBase, MSGJPN080, FALSE, YES);
\r
711 DelNotify = MirrorDelNotify(WIN_REMOTE, DelNotify, TransPacketBase);
\r
712 if((DelNotify == YES) || (DelNotify == YES_ALL))
\r
714 /* フルパスを使わないための処理 */
\r
715 if(MakeNonFullPath(TransPacketBase, CurDir, Tmp) == FFFTP_SUCCESS)
\r
718 CommandProcTrn(NULL, "%s%s", TransPacketBase->Cmd+2, TransPacketBase->RemoteFile);
\r
722 /* ファイル削除(常にホスト側) */
\r
723 else if(strncmp(TransPacketBase->Cmd, "R-DELE", 6) == 0)
\r
725 DispTransFileInfo(TransPacketBase, MSGJPN081, FALSE, YES);
\r
727 DelNotify = MirrorDelNotify(WIN_REMOTE, DelNotify, TransPacketBase);
\r
728 if((DelNotify == YES) || (DelNotify == YES_ALL))
\r
730 /* フルパスを使わないための処理 */
\r
731 if(MakeNonFullPath(TransPacketBase, CurDir, Tmp) == FFFTP_SUCCESS)
\r
734 CommandProcTrn(NULL, "%s%s", TransPacketBase->Cmd+2, TransPacketBase->RemoteFile);
\r
738 /* ディレクトリ作成(常にローカル側) */
\r
739 else if(strncmp(TransPacketBase->Cmd, "L-MKD", 5) == 0)
\r
741 DispTransFileInfo(TransPacketBase, MSGJPN082, FALSE, YES);
\r
744 DoLocalMKD(TransPacketBase->LocalFile);
\r
746 /* ディレクトリ削除(常にローカル側) */
\r
747 else if(strncmp(TransPacketBase->Cmd, "L-RMD", 5) == 0)
\r
749 DispTransFileInfo(TransPacketBase, MSGJPN083, FALSE, YES);
\r
751 DelNotify = MirrorDelNotify(WIN_LOCAL, DelNotify, TransPacketBase);
\r
752 if((DelNotify == YES) || (DelNotify == YES_ALL))
\r
755 DoLocalRMD(TransPacketBase->LocalFile);
\r
758 /* ファイル削除(常にローカル側) */
\r
759 else if(strncmp(TransPacketBase->Cmd, "L-DELE", 6) == 0)
\r
761 DispTransFileInfo(TransPacketBase, MSGJPN084, FALSE, YES);
\r
763 DelNotify = MirrorDelNotify(WIN_LOCAL, DelNotify, TransPacketBase);
\r
764 if((DelNotify == YES) || (DelNotify == YES_ALL))
\r
767 DoLocalDELE(TransPacketBase->LocalFile);
\r
770 /* カレントディレクトリを設定 */
\r
771 else if(strcmp(TransPacketBase->Cmd, "SETCUR") == 0)
\r
773 if(AskShareProh() == YES)
\r
775 if(strcmp(CurDir, TransPacketBase->RemoteFile) != 0)
\r
777 if(CommandProcTrn(NULL, "CWD %s", TransPacketBase->RemoteFile)/100 != FTP_COMPLETE)
\r
779 DispCWDerror(hWndTrans);
\r
784 strcpy(CurDir, TransPacketBase->RemoteFile);
\r
786 /* カレントディレクトリを戻す */
\r
787 else if(strcmp(TransPacketBase->Cmd, "BACKCUR") == 0)
\r
789 if(AskShareProh() == NO)
\r
791 if(strcmp(CurDir, TransPacketBase->RemoteFile) != 0)
\r
792 CommandProcTrn(NULL, "CWD %s", TransPacketBase->RemoteFile);
\r
793 strcpy(CurDir, TransPacketBase->RemoteFile);
\r
797 else if(strcmp(TransPacketBase->Cmd, "GOQUIT") == 0)
\r
802 /*===== 1つの処理終わり =====*/
\r
804 if(ForceAbort == NO)
\r
806 WaitForSingleObject(hListAccMutex, INFINITE);
\r
807 if(ClearAll == YES)
\r
808 EraseTransFileList();
\r
811 if((strncmp(TransPacketBase->Cmd, "RETR", 4) == 0) ||
\r
812 (strncmp(TransPacketBase->Cmd, "STOR", 4) == 0))
\r
815 PostMessage(GetMainHwnd(), WM_CHANGE_COND, 0, 0);
\r
817 Pos = TransPacketBase;
\r
818 TransPacketBase = TransPacketBase->Next;
\r
822 ReleaseMutex(hListAccMutex);
\r
824 if(BackgrndMessageProc() == YES)
\r
826 WaitForSingleObject(hListAccMutex, INFINITE);
\r
827 EraseTransFileList();
\r
828 ReleaseMutex(hListAccMutex);
\r
836 ReleaseMutex(hListAccMutex);
\r
839 if(hWndTrans != NULL)
\r
841 DestroyWindow(hWndTrans);
\r
846 SoundPlay(SND_TRANS);
\r
848 if(AskAutoExit() == NO)
\r
851 PostMessage(GetMainHwnd(), WM_REFRESH_LOCAL_FLG, 0, 0);
\r
853 PostMessage(GetMainHwnd(), WM_REFRESH_REMOTE_FLG, 0, 0);
\r
860 BackgrndMessageProc();
\r
864 PostMessage(GetMainHwnd(), WM_COMMAND, MAKEWPARAM(MENU_AUTO_EXIT, 0), 0);
\r
873 /*----- フルパスを使わないファイルアクセスの準備 ------------------------------
\r
876 * TRANSPACKET *Pkt : 転送パケット
\r
877 * char *Cur : カレントディレクトリ
\r
878 * char *Tmp : 作業用エリア
\r
881 * int ステータス(FFFTP_SUCCESS/FFFTP_FAIL)
\r
885 * このモジュール内で CWD を行ない、
\r
886 * Pkt->RemoteFile にファイル名のみ残す。(パス名は消す)
\r
887 *----------------------------------------------------------------------------*/
\r
889 static int MakeNonFullPath(TRANSPACKET *Pkt, char *Cur, char *Tmp)
\r
893 Sts = ProcForNonFullpath(Pkt->RemoteFile, Cur, Pkt->hWndTrans, 1);
\r
894 if(Sts == FFFTP_FAIL)
\r
903 /*----- ダウンロードを行なう --------------------------------------------------
\r
906 * SOCKET cSkt : コントロールソケット
\r
907 * TRANSPACKET *Pkt : 転送ファイル情報
\r
908 * int DirList : ディレクトリリストのダウンロード(YES/NO)
\r
914 * このモジュールは、ファイル一覧の取得などを行なう際にメインのスレッド
\r
915 * からも呼ばれる。メインのスレッドから呼ばれる時は Pkt->hWndTrans == NULL。
\r
916 *----------------------------------------------------------------------------*/
\r
918 int DoDownLoad(SOCKET cSkt, TRANSPACKET *Pkt, int DirList, int *CancelCheckWork)
\r
921 char Reply[ERR_MSG_LEN+7];
\r
923 Pkt->ctrl_skt = cSkt;
\r
924 if(IsSpecialDevice(GetFileName(Pkt->LocalFile)) == YES)
\r
927 SetTaskMsg(MSGJPN085, GetFileName(Pkt->LocalFile));
\r
928 DispDownloadFinishMsg(Pkt, iRetCode);
\r
930 else if(Pkt->Mode != EXIST_IGNORE)
\r
932 if(Pkt->Type == TYPE_I)
\r
933 Pkt->KanjiCode = KANJI_NOCNV;
\r
935 iRetCode = command(Pkt->ctrl_skt, Reply, CancelCheckWork, "TYPE %c", Pkt->Type);
\r
936 if(iRetCode/100 < FTP_RETRY)
\r
938 if(Pkt->hWndTrans != NULL)
\r
940 AllTransSizeNow = 0;
\r
943 DispTransFileInfo(Pkt, MSGJPN086, TRUE, YES);
\r
945 DispTransFileInfo(Pkt, MSGJPN087, FALSE, NO);
\r
948 if(BackgrndMessageProc() == NO)
\r
950 if(AskPasvMode() != YES)
\r
951 iRetCode = DownLoadNonPassive(Pkt, CancelCheckWork);
\r
953 iRetCode = DownLoadPassive(Pkt, CancelCheckWork);
\r
959 SetErrorMsg(Reply);
\r
963 DispTransFileInfo(Pkt, MSGJPN088, TRUE, YES);
\r
964 SetTaskMsg(MSGJPN089, Pkt->RemoteFile);
\r
971 /*----- 通常モードでファイルをダウンロード ------------------------------------
\r
974 * TRANSPACKET *Pkt : 転送ファイル情報
\r
978 *----------------------------------------------------------------------------*/
\r
980 static int DownLoadNonPassive(TRANSPACKET *Pkt, int *CancelCheckWork)
\r
984 SOCKET data_socket = INVALID_SOCKET; // data channel socket
\r
985 SOCKET listen_socket = INVALID_SOCKET; // data listen socket
\r
988 struct sockaddr_in saSockAddr1;
\r
989 char Reply[ERR_MSG_LEN+7];
\r
991 if((listen_socket = GetFTPListenSocket(Pkt->ctrl_skt, CancelCheckWork)) != INVALID_SOCKET)
\r
993 if(SetDownloadResume(Pkt, Pkt->Mode, Pkt->ExistSize, &CreateMode, CancelCheckWork) == YES)
\r
995 sprintf(Buf, "%s%s", Pkt->Cmd, Pkt->RemoteFile);
\r
996 iRetCode = command(Pkt->ctrl_skt, Reply, CancelCheckWork, "%s", Buf);
\r
997 if(iRetCode/100 == FTP_PRELIM)
\r
999 if(SocksGet2ndBindReply(listen_socket, &data_socket) == FFFTP_FAIL)
\r
1001 iLength = sizeof(saSockAddr1);
\r
1002 data_socket = do_accept(listen_socket, (struct sockaddr *)&saSockAddr1, (int *)&iLength);
\r
1004 if(shutdown(listen_socket, 1) != 0)
\r
1005 ReportWSError("shutdown listen", WSAGetLastError());
\r
1006 listen_socket = DoClose(listen_socket);
\r
1008 if(data_socket == INVALID_SOCKET)
\r
1010 SetErrorMsg(MSGJPN280);
\r
1011 ReportWSError("accept", WSAGetLastError());
\r
1015 DoPrintf("Skt=%u : accept from %s port %u", data_socket, inet_ntoa(saSockAddr1.sin_addr), ntohs(saSockAddr1.sin_port));
\r
1018 if(data_socket != INVALID_SOCKET)
\r
1021 // iRetCode = DownLoadFile(Pkt, data_socket, CreateMode, CancelCheckWork);
\r
1022 if(AskCryptMode() == CRYPT_FTPES || AskCryptMode() == CRYPT_FTPIS)
\r
1024 if(AttachSSL(data_socket))
\r
1025 iRetCode = DownLoadFile(Pkt, data_socket, CreateMode, CancelCheckWork);
\r
1027 iRetCode = FTP_ERROR;
\r
1030 iRetCode = DownLoadFile(Pkt, data_socket, CreateMode, CancelCheckWork);
\r
1031 // data_socket = DoClose(data_socket);
\r
1036 SetErrorMsg(Reply);
\r
1037 SetTaskMsg(MSGJPN090);
\r
1038 listen_socket = DoClose(listen_socket);
\r
1048 SetErrorMsg(MSGJPN279);
\r
1050 DispDownloadFinishMsg(Pkt, iRetCode);
\r
1056 /*----- Passiveモードでファイルをダウンロード ---------------------------------
\r
1059 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1063 *----------------------------------------------------------------------------*/
\r
1065 static int DownLoadPassive(TRANSPACKET *Pkt, int *CancelCheckWork)
\r
1068 SOCKET data_socket = INVALID_SOCKET; // data channel socket
\r
1074 char Reply[ERR_MSG_LEN+7];
\r
1076 iRetCode = command(Pkt->ctrl_skt, Buf, CancelCheckWork, "PASV");
\r
1077 if(iRetCode/100 == FTP_COMPLETE)
\r
1079 if(GetAdrsAndPort(Buf, Adrs, &Port, 19) == FFFTP_SUCCESS)
\r
1081 if((data_socket = connectsock(Adrs, Port, MSGJPN091, CancelCheckWork)) != INVALID_SOCKET)
\r
1085 if(setsockopt(data_socket, IPPROTO_TCP, TCP_NODELAY, (LPSTR)&Flg, sizeof(Flg)) == SOCKET_ERROR)
\r
1086 ReportWSError("setsockopt", WSAGetLastError());
\r
1088 if(SetDownloadResume(Pkt, Pkt->Mode, Pkt->ExistSize, &CreateMode, CancelCheckWork) == YES)
\r
1090 sprintf(Buf, "%s%s", Pkt->Cmd, Pkt->RemoteFile);
\r
1091 iRetCode = command(Pkt->ctrl_skt, Reply, CancelCheckWork, "%s", Buf);
\r
1092 if(iRetCode/100 == FTP_PRELIM)
\r
1095 // iRetCode = DownLoadFile(Pkt, data_socket, CreateMode, CancelCheckWork);
\r
1096 if(AskCryptMode() == CRYPT_FTPES || AskCryptMode() == CRYPT_FTPIS)
\r
1098 if(AttachSSL(data_socket))
\r
1099 iRetCode = DownLoadFile(Pkt, data_socket, CreateMode, CancelCheckWork);
\r
1101 iRetCode = FTP_ERROR;
\r
1104 iRetCode = DownLoadFile(Pkt, data_socket, CreateMode, CancelCheckWork);
\r
1105 // data_socket = DoClose(data_socket);
\r
1109 SetErrorMsg(Reply);
\r
1110 SetTaskMsg(MSGJPN092);
\r
1111 data_socket = DoClose(data_socket);
\r
1123 SetErrorMsg(MSGJPN093);
\r
1124 SetTaskMsg(MSGJPN093);
\r
1131 DispDownloadFinishMsg(Pkt, iRetCode);
\r
1137 /*----- ダウンロードの実行 ----------------------------------------------------
\r
1140 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1141 * SOCKET dSkt : データソケット
\r
1142 * int CreateMode : ファイル作成モード (CREATE_ALWAYS/OPEN_ALWAYS)
\r
1149 * ダイアログを出す(Pkt->hWndTrans!=NULL)場合、インターバルタイマで経過を表示する
\r
1150 * ダイアログを出さない場合、このルーチンからDispDownloadSize()を呼ぶ
\r
1151 *----------------------------------------------------------------------------*/
\r
1153 static int DownLoadFile(TRANSPACKET *Pkt, SOCKET dSkt, int CreateMode, int *CancelCheckWork)
\r
1156 char Buf[BUFSIZE];
\r
1157 char Buf2[BUFSIZE+3];
\r
1158 HANDLE iFileHandle;
\r
1159 SECURITY_ATTRIBUTES Sec;
\r
1161 CODECONVINFO cInfo;
\r
1163 // fd_set ReadFds;
\r
1164 // struct timeval Tout;
\r
1165 // struct timeval *ToutPtr;
\r
1168 char TmpBuf[ONELINE_BUF_SIZE];
\r
1169 DWORD dwFileAttributes;
\r
1171 #ifdef SET_BUFFER_SIZE
\r
1172 /* Add by H.Shirouzu at 2002/10/02 */
\r
1173 int buf_size = SOCKBUF_SIZE;
\r
1174 for ( ; buf_size > 0; buf_size /= 2)
\r
1175 if (setsockopt(dSkt, SOL_SOCKET, SO_RCVBUF, (char *)&buf_size, sizeof(buf_size)) == 0)
\r
1180 // 念のため受信バッファを無効にする
\r
1181 #ifdef DISABLE_TRANSFER_NETWORK_BUFFERS
\r
1183 setsockopt(dSkt, SOL_SOCKET, SO_RCVBUF, (char *)&buf_size, sizeof(buf_size));
\r
1186 Pkt->Abort = ABORT_NONE;
\r
1188 Sec.nLength = sizeof(SECURITY_ATTRIBUTES);
\r
1189 Sec.lpSecurityDescriptor = NULL;
\r
1190 Sec.bInheritHandle = FALSE;
\r
1192 dwFileAttributes = GetFileAttributes(Pkt->LocalFile);
\r
1193 if (dwFileAttributes != INVALID_FILE_ATTRIBUTES && (dwFileAttributes & FILE_ATTRIBUTE_READONLY)) {
\r
1195 if (MessageBox(GetMainHwnd(), MSGJPN296, MSGJPN086, MB_YESNO) == IDYES) {
\r
1197 SetFileAttributes(Pkt->LocalFile, dwFileAttributes ^ FILE_ATTRIBUTE_READONLY);
\r
1201 if((iFileHandle = CreateFile(Pkt->LocalFile, GENERIC_READ | GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, &Sec, CreateMode, FILE_ATTRIBUTE_NORMAL, NULL)) != INVALID_HANDLE_VALUE)
\r
1204 char Buf3[(BUFSIZE + 3) * 4];
\r
1205 CODECONVINFO cInfo2;
\r
1206 int ProcessedBOM = NO;
\r
1207 if(CreateMode == OPEN_ALWAYS)
\r
1208 SetFilePointer(iFileHandle, 0, 0, FILE_END);
\r
1210 if(Pkt->hWndTrans != NULL)
\r
1212 TimeStart = time(NULL);
\r
1213 SetTimer(Pkt->hWndTrans, TIMER_DISPLAY, DISPLAY_TIMING, NULL);
\r
1216 InitCodeConvInfo(&cInfo);
\r
1217 cInfo.KanaCnv = Pkt->KanaCnv;
\r
1219 InitCodeConvInfo(&cInfo2);
\r
1220 cInfo2.KanaCnv = Pkt->KanaCnv;
\r
1222 /*===== ファイルを受信するループ =====*/
\r
1223 while((Pkt->Abort == ABORT_NONE) && (ForceAbort == NO))
\r
1225 // FD_ZERO(&ReadFds);
\r
1226 // FD_SET(dSkt, &ReadFds);
\r
1227 // ToutPtr = NULL;
\r
1228 // if(TimeOut != 0)
\r
1230 // Tout.tv_sec = TimeOut;
\r
1231 // Tout.tv_usec = 0;
\r
1232 // ToutPtr = &Tout;
\r
1234 // iNumBytes = select(0, &ReadFds, NULL, NULL, ToutPtr);
\r
1235 // if(iNumBytes == SOCKET_ERROR)
\r
1237 // ReportWSError("select", WSAGetLastError());
\r
1238 // if(Pkt->Abort == ABORT_NONE)
\r
1239 // Pkt->Abort = ABORT_ERROR;
\r
1242 // else if(iNumBytes == 0)
\r
1244 // SetErrorMsg(MSGJPN094);
\r
1245 // SetTaskMsg(MSGJPN094);
\r
1246 // Pkt->Abort = ABORT_ERROR;
\r
1250 if((iNumBytes = do_recv(dSkt, Buf, BUFSIZE, 0, &TimeOutErr, CancelCheckWork)) <= 0)
\r
1252 if(TimeOutErr == YES)
\r
1254 SetErrorMsg(MSGJPN094);
\r
1255 SetTaskMsg(MSGJPN094);
\r
1256 if(Pkt->hWndTrans != NULL)
\r
1258 if(Pkt->Abort == ABORT_NONE)
\r
1259 Pkt->Abort = ABORT_ERROR;
\r
1261 else if(iNumBytes == SOCKET_ERROR)
\r
1263 if(Pkt->Abort == ABORT_NONE)
\r
1264 Pkt->Abort = ABORT_ERROR;
\r
1270 if(Pkt->KanjiCode != KANJI_NOCNV)
\r
1273 cInfo.StrLen = iNumBytes;
\r
1275 cInfo.BufSize = BUFSIZE+3;
\r
1278 // ここで全てUTF-8へ変換する
\r
1279 // TODO: SJIS以外も直接UTF-8へ変換
\r
1280 // if(Pkt->KanjiCode == KANJI_JIS)
\r
1281 // Continue = ConvJIStoSJIS(&cInfo);
\r
1283 // Continue = ConvEUCtoSJIS(&cInfo);
\r
1284 char Buf3[(BUFSIZE + 3) * 4];
\r
1285 CODECONVINFO cInfo2;
\r
1286 switch(Pkt->KanjiCode)
\r
1289 switch(Pkt->KanjiCodeDesired)
\r
1292 // memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
1293 // cInfo2.OutLen = cInfo.StrLen;
\r
1296 Continue = ConvSJIStoJIS(&cInfo);
\r
1297 cInfo2.Str = cInfo.Buf;
\r
1298 cInfo2.StrLen = cInfo.OutLen;
\r
1299 cInfo2.Buf = Buf3;
\r
1300 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1301 ConvJIStoSJIS(&cInfo2);
\r
1304 Continue = ConvSJIStoJIS(&cInfo);
\r
1305 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1306 cInfo2.OutLen = cInfo.OutLen;
\r
1309 Continue = ConvSJIStoEUC(&cInfo);
\r
1310 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1311 cInfo2.OutLen = cInfo.OutLen;
\r
1314 if(ProcessedBOM == NO)
\r
1316 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
1317 cInfo2.OutLen = 3;
\r
1319 ProcessedBOM = YES;
\r
1322 Continue = ConvSJIStoUTF8N(&cInfo);
\r
1323 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1324 cInfo2.OutLen = cInfo.OutLen;
\r
1329 switch(Pkt->KanjiCodeDesired)
\r
1332 Continue = ConvJIStoSJIS(&cInfo);
\r
1333 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1334 cInfo2.OutLen = cInfo.OutLen;
\r
1337 // memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
1338 // cInfo2.OutLen = cInfo.StrLen;
\r
1341 Continue = ConvJIStoSJIS(&cInfo);
\r
1342 cInfo2.Str = cInfo.Buf;
\r
1343 cInfo2.StrLen = cInfo.OutLen;
\r
1344 cInfo2.Buf = Buf3;
\r
1345 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1346 ConvSJIStoJIS(&cInfo2);
\r
1349 Continue = ConvJIStoSJIS(&cInfo);
\r
1350 cInfo2.Str = cInfo.Buf;
\r
1351 cInfo2.StrLen = cInfo.OutLen;
\r
1352 cInfo2.Buf = Buf3;
\r
1353 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1354 ConvSJIStoEUC(&cInfo2);
\r
1357 if(ProcessedBOM == NO)
\r
1359 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
1360 cInfo2.OutLen = 3;
\r
1362 ProcessedBOM = YES;
\r
1365 Continue = ConvJIStoSJIS(&cInfo);
\r
1366 cInfo2.Str = cInfo.Buf;
\r
1367 cInfo2.StrLen = cInfo.OutLen;
\r
1368 cInfo2.Buf = Buf3;
\r
1369 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1370 ConvSJIStoUTF8N(&cInfo2);
\r
1375 switch(Pkt->KanjiCodeDesired)
\r
1378 Continue = ConvEUCtoSJIS(&cInfo);
\r
1379 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1380 cInfo2.OutLen = cInfo.OutLen;
\r
1383 Continue = ConvEUCtoSJIS(&cInfo);
\r
1384 cInfo2.Str = cInfo.Buf;
\r
1385 cInfo2.StrLen = cInfo.OutLen;
\r
1386 cInfo2.Buf = Buf3;
\r
1387 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1388 ConvSJIStoJIS(&cInfo2);
\r
1391 // memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
1392 // cInfo2.OutLen = cInfo.StrLen;
\r
1395 Continue = ConvEUCtoSJIS(&cInfo);
\r
1396 cInfo2.Str = cInfo.Buf;
\r
1397 cInfo2.StrLen = cInfo.OutLen;
\r
1398 cInfo2.Buf = Buf3;
\r
1399 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1400 ConvSJIStoEUC(&cInfo2);
\r
1403 if(ProcessedBOM == NO)
\r
1405 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
1406 cInfo2.OutLen = 3;
\r
1408 ProcessedBOM = YES;
\r
1411 Continue = ConvEUCtoSJIS(&cInfo);
\r
1412 cInfo2.Str = cInfo.Buf;
\r
1413 cInfo2.StrLen = cInfo.OutLen;
\r
1414 cInfo2.Buf = Buf3;
\r
1415 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1416 ConvSJIStoUTF8N(&cInfo2);
\r
1421 if(ProcessedBOM == NO)
\r
1423 if(memcmp(Buf, "\xEF\xBB\xBF", 3) == 0)
\r
1426 cInfo.StrLen -= 3;
\r
1428 cInfo2.OutLen = 0;
\r
1429 switch(Pkt->KanjiCodeDesired)
\r
1432 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
1433 cInfo2.OutLen = 3;
\r
1437 ProcessedBOM = YES;
\r
1440 switch(Pkt->KanjiCodeDesired)
\r
1443 Continue = ConvUTF8NtoSJIS(&cInfo);
\r
1444 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1445 cInfo2.OutLen = cInfo.OutLen;
\r
1448 Continue = ConvUTF8NtoSJIS(&cInfo);
\r
1449 cInfo2.Str = cInfo.Buf;
\r
1450 cInfo2.StrLen = cInfo.OutLen;
\r
1451 cInfo2.Buf = Buf3;
\r
1452 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1453 ConvSJIStoJIS(&cInfo2);
\r
1456 Continue = ConvUTF8NtoSJIS(&cInfo);
\r
1457 cInfo2.Str = cInfo.Buf;
\r
1458 cInfo2.StrLen = cInfo.OutLen;
\r
1459 cInfo2.Buf = Buf3;
\r
1460 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1461 ConvSJIStoEUC(&cInfo2);
\r
1464 memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
1465 cInfo2.OutLen = cInfo.StrLen;
\r
1471 // if(WriteFile(iFileHandle, Buf2, cInfo.OutLen, &Writed, NULL) == FALSE)
\r
1472 if(WriteFile(iFileHandle, Buf3, cInfo2.OutLen, &Writed, NULL) == FALSE)
\r
1473 Pkt->Abort = ABORT_DISKFULL;
\r
1475 while((Continue == YES) && (Pkt->Abort == ABORT_NONE));
\r
1479 if(WriteFile(iFileHandle, Buf, iNumBytes, &Writed, NULL) == FALSE)
\r
1480 Pkt->Abort = ABORT_DISKFULL;
\r
1483 Pkt->ExistSize += iNumBytes;
\r
1484 if(Pkt->hWndTrans != NULL)
\r
1485 AllTransSizeNow += iNumBytes;
\r
1488 /* 転送ダイアログを出さない時の経過表示 */
\r
1489 DispDownloadSize(Pkt->ExistSize);
\r
1492 if(BackgrndMessageProc() == YES)
\r
1496 /* 書き残したデータを書き込む */
\r
1497 if(Pkt->KanjiCode != KANJI_NOCNV)
\r
1500 cInfo.BufSize = BUFSIZE+3;
\r
1501 FlushRestData(&cInfo);
\r
1502 switch(Pkt->KanjiCode)
\r
1505 switch(Pkt->KanjiCodeDesired)
\r
1509 cInfo2.Str = cInfo.Buf;
\r
1510 cInfo2.StrLen = cInfo.OutLen;
\r
1511 cInfo2.Buf = Buf3;
\r
1512 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1513 ConvJIStoSJIS(&cInfo2);
\r
1516 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1517 cInfo2.OutLen = cInfo.OutLen;
\r
1520 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1521 cInfo2.OutLen = cInfo.OutLen;
\r
1524 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1525 cInfo2.OutLen = cInfo.OutLen;
\r
1530 switch(Pkt->KanjiCodeDesired)
\r
1533 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1534 cInfo2.OutLen = cInfo.OutLen;
\r
1538 cInfo2.Str = cInfo.Buf;
\r
1539 cInfo2.StrLen = cInfo.OutLen;
\r
1540 cInfo2.Buf = Buf3;
\r
1541 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1542 ConvSJIStoJIS(&cInfo2);
\r
1545 cInfo2.Str = cInfo.Buf;
\r
1546 cInfo2.StrLen = cInfo.OutLen;
\r
1547 cInfo2.Buf = Buf3;
\r
1548 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1549 ConvSJIStoEUC(&cInfo2);
\r
1552 cInfo2.Str = cInfo.Buf;
\r
1553 cInfo2.StrLen = cInfo.OutLen;
\r
1554 cInfo2.Buf = Buf3;
\r
1555 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1556 ConvSJIStoUTF8N(&cInfo2);
\r
1561 switch(Pkt->KanjiCodeDesired)
\r
1564 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1565 cInfo2.OutLen = cInfo.OutLen;
\r
1568 cInfo2.Str = cInfo.Buf;
\r
1569 cInfo2.StrLen = cInfo.OutLen;
\r
1570 cInfo2.Buf = Buf3;
\r
1571 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1572 ConvSJIStoJIS(&cInfo2);
\r
1576 cInfo2.Str = cInfo.Buf;
\r
1577 cInfo2.StrLen = cInfo.OutLen;
\r
1578 cInfo2.Buf = Buf3;
\r
1579 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1580 ConvSJIStoEUC(&cInfo2);
\r
1583 cInfo2.Str = cInfo.Buf;
\r
1584 cInfo2.StrLen = cInfo.OutLen;
\r
1585 cInfo2.Buf = Buf3;
\r
1586 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1587 ConvSJIStoUTF8N(&cInfo2);
\r
1592 switch(Pkt->KanjiCodeDesired)
\r
1595 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1596 cInfo2.OutLen = cInfo.OutLen;
\r
1599 cInfo2.Str = cInfo.Buf;
\r
1600 cInfo2.StrLen = cInfo.OutLen;
\r
1601 cInfo2.Buf = Buf3;
\r
1602 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1603 ConvSJIStoJIS(&cInfo2);
\r
1606 cInfo2.Str = cInfo.Buf;
\r
1607 cInfo2.StrLen = cInfo.OutLen;
\r
1608 cInfo2.Buf = Buf3;
\r
1609 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1610 ConvSJIStoEUC(&cInfo2);
\r
1613 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
1614 cInfo2.OutLen = cInfo.OutLen;
\r
1619 // if(WriteFile(iFileHandle, Buf2, cInfo.OutLen, &Writed, NULL) == FALSE)
\r
1620 if(WriteFile(iFileHandle, Buf3, cInfo2.OutLen, &Writed, NULL) == FALSE)
\r
1621 Pkt->Abort = ABORT_DISKFULL;
\r
1622 cInfo2.Buf = Buf3;
\r
1623 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
1624 FlushRestData(&cInfo2);
\r
1625 if(WriteFile(iFileHandle, Buf3, cInfo2.OutLen, &Writed, NULL) == FALSE)
\r
1626 Pkt->Abort = ABORT_DISKFULL;
\r
1630 if(Pkt->hWndTrans != NULL)
\r
1632 KillTimer(Pkt->hWndTrans, TIMER_DISPLAY);
\r
1633 DispTransferStatus(Pkt->hWndTrans, YES, Pkt);
\r
1634 TimeStart = time(NULL) - TimeStart + 1;
\r
1638 /* 転送ダイアログを出さない時の経過表示を消す */
\r
1639 DispDownloadSize(-1);
\r
1642 /* ファイルのタイムスタンプを合わせる */
\r
1643 if((SaveTimeStamp == YES) &&
\r
1644 ((Pkt->Time.dwLowDateTime != 0) || (Pkt->Time.dwHighDateTime != 0)))
\r
1646 SetFileTime(iFileHandle, &Pkt->Time, &Pkt->Time, &Pkt->Time);
\r
1649 CloseHandle(iFileHandle);
\r
1651 if(iNumBytes == SOCKET_ERROR)
\r
1652 ReportWSError("recv",WSAGetLastError());
\r
1656 SetErrorMsg(MSGJPN095, Pkt->LocalFile);
\r
1657 SetTaskMsg(MSGJPN095, Pkt->LocalFile);
\r
1658 Pkt->Abort = ABORT_ERROR;
\r
1662 if(shutdown(dSkt, 1) != 0)
\r
1663 ReportWSError("shutdown", WSAGetLastError());
\r
1667 if(ForceAbort == NO)
\r
1669 /* Abortをホストに伝える */
\r
1670 if(Pkt->Abort != ABORT_NONE && iFileHandle != INVALID_HANDLE_VALUE)
\r
1672 SendData(Pkt->ctrl_skt, "\xFF\xF4\xFF", 3, MSG_OOB, CancelCheckWork); /* MSG_OOBに注意 */
\r
1673 SendData(Pkt->ctrl_skt, "\xF2", 1, 0, CancelCheckWork);
\r
1674 command(Pkt->ctrl_skt, NULL, CancelCheckWork, "ABOR");
\r
1678 iRetCode = ReadReplyMessage(Pkt->ctrl_skt, Buf, 1024, CancelCheckWork, TmpBuf);
\r
1681 //DoPrintf("##DOWN REPLY : %s", Buf);
\r
1683 if(Pkt->Abort == ABORT_DISKFULL)
\r
1685 SetErrorMsg(MSGJPN096);
\r
1686 SetTaskMsg(MSGJPN096);
\r
1688 if(iRetCode >= FTP_RETRY)
\r
1690 if(Pkt->Abort != ABORT_NONE)
\r
1697 /*----- ダウンロード終了/中止時のメッセージを表示 ----------------------------
\r
1700 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1701 * int iRetCode : 応答コード
\r
1705 *----------------------------------------------------------------------------*/
\r
1707 static void DispDownloadFinishMsg(TRANSPACKET *Pkt, int iRetCode)
\r
1709 char Fname[FMAX_PATH+1];
\r
1711 if(ForceAbort == NO)
\r
1713 if((iRetCode/100) >= FTP_CONTINUE)
\r
1715 strcpy(Fname, Pkt->RemoteFile);
\r
1717 #if defined(HAVE_OPENVMS)
\r
1718 /* OpenVMSの場合、空ディレクトリへ移動すると550 File not foundになって
\r
1719 * エラーダイアログやエラーメッセージが出るので何もしない */
\r
1720 if (AskHostType() == HTYPE_VMS)
\r
1724 if((strncmp(Pkt->Cmd, "NLST", 4) == 0) || (strncmp(Pkt->Cmd, "LIST", 4) == 0))
\r
1726 SetTaskMsg(MSGJPN097);
\r
1727 strcpy(Fname, MSGJPN098);
\r
1729 else if((Pkt->hWndTrans != NULL) && (TimeStart != 0))
\r
1730 SetTaskMsg(MSGJPN099, TimeStart, Pkt->ExistSize/TimeStart);
\r
1732 SetTaskMsg(MSGJPN100);
\r
1734 if(Pkt->Abort != ABORT_USER)
\r
1736 if(DispUpDownErrDialog(downerr_dlg, Pkt->hWndTrans, Fname) == NO)
\r
1742 if((strncmp(Pkt->Cmd, "NLST", 4) == 0) || (strncmp(Pkt->Cmd, "LIST", 4) == 0))
\r
1743 SetTaskMsg(MSGJPN101, Pkt->ExistSize);
\r
1744 else if((Pkt->hWndTrans != NULL) && (TimeStart != 0))
\r
1745 SetTaskMsg(MSGJPN102, TimeStart, Pkt->ExistSize/TimeStart);
\r
1747 SetTaskMsg(MSGJPN103, Pkt->ExistSize);
\r
1754 /*----- ダウンロード/アップロードエラーのダイアログを表示 --------------------
\r
1757 * int RedID : ダイアログボックスのリソースID
\r
1758 * HWND hWnd : 書き込み中ダイアログのウインドウ
\r
1759 * char *Fname : ファイル名
\r
1762 * int ステータス (YES=中止/NO=全て中止)
\r
1763 *----------------------------------------------------------------------------*/
\r
1765 static int DispUpDownErrDialog(int ResID, HWND hWnd, char *Fname)
\r
1768 hWnd = GetMainHwnd();
\r
1770 SoundPlay(SND_ERROR);
\r
1771 return(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(ResID), hWnd, UpDownErrorDialogProc, (LPARAM)Fname));
\r
1775 /*----- ダウンロードエラー/アップロードエラーダイアログのコールバック --------
\r
1778 * HWND hDlg : ウインドウハンドル
\r
1779 * UINT message : メッセージ番号
\r
1780 * WPARAM wParam : メッセージの WPARAM 引数
\r
1781 * LPARAM lParam : メッセージの LPARAM 引数
\r
1785 *----------------------------------------------------------------------------*/
\r
1787 static BOOL CALLBACK UpDownErrorDialogProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
1791 case WM_INITDIALOG :
\r
1792 SendDlgItemMessage(hDlg, UPDOWN_ERR_FNAME, WM_SETTEXT, 0, (LPARAM)lParam);
\r
1793 SendDlgItemMessage(hDlg, UPDOWN_ERR_MSG, WM_SETTEXT, 0, (LPARAM)ErrMsg);
\r
1797 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1800 EndDialog(hDlg, YES);
\r
1804 EndDialog(hDlg, NO);
\r
1813 /*----- ダウンロードのリジュームの準備を行う ----------------------------------
\r
1816 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1817 * iont ProcMode : 処理モード(EXIST_xxx)
\r
1818 * LONGLONG Size : ロード済みのファイルのサイズ
\r
1819 * int *Mode : ファイル作成モード (CREATE_xxxx)
\r
1822 * int 転送を行うかどうか(YES/NO=このファイルを中止/NO_ALL=全て中止)
\r
1825 * Pkt->ExistSizeのセットを行なう
\r
1826 *----------------------------------------------------------------------------*/
\r
1828 static int SetDownloadResume(TRANSPACKET *Pkt, int ProcMode, LONGLONG Size, int *Mode, int *CancelCheckWork)
\r
1832 char Reply[ERR_MSG_LEN+7];
\r
1837 Pkt->ExistSize = 0;
\r
1838 *Mode = CREATE_ALWAYS;
\r
1840 if(ProcMode == EXIST_RESUME)
\r
1842 iRetCode = command(Pkt->ctrl_skt, Reply, CancelCheckWork, "REST %s", MakeNumString(Size, Tmp, FALSE));
\r
1843 if(iRetCode/100 < FTP_RETRY)
\r
1846 if(Pkt->hWndTrans != NULL)
\r
1847 Pkt->ExistSize = Size;
\r
1848 *Mode = OPEN_ALWAYS;
\r
1852 Com = DialogBox(GetFtpInst(), MAKEINTRESOURCE(noresume_dlg), Pkt->hWndTrans, NoResumeWndProc);
\r
1855 if(Com == NO_ALL) /* 全て中止 */
\r
1857 Pkt->Abort = ABORT_USER;
\r
1865 /*----- resumeエラーダイアログのコールバック ----------------------------------
\r
1868 * HWND hDlg : ウインドウハンドル
\r
1869 * UINT message : メッセージ番号
\r
1870 * WPARAM wParam : メッセージの WPARAM 引数
\r
1871 * LPARAM lParam : メッセージの LPARAM 引数
\r
1875 *----------------------------------------------------------------------------*/
\r
1877 static BOOL CALLBACK NoResumeWndProc(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1881 case WM_INITDIALOG :
\r
1885 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1888 EndDialog(hDlg, YES);
\r
1892 EndDialog(hDlg, NO);
\r
1895 case RESUME_CANCEL_ALL :
\r
1896 EndDialog(hDlg, NO_ALL);
\r
1906 /*----- アップロードを行なう --------------------------------------------------
\r
1909 * SOCKET cSkt : コントロールソケット
\r
1910 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1914 *----------------------------------------------------------------------------*/
\r
1916 static int DoUpLoad(SOCKET cSkt, TRANSPACKET *Pkt)
\r
1919 char Reply[ERR_MSG_LEN+7];
\r
1921 Pkt->ctrl_skt = cSkt;
\r
1923 if(Pkt->Mode != EXIST_IGNORE)
\r
1925 if(CheckFileReadable(Pkt->LocalFile) == FFFTP_SUCCESS)
\r
1927 if(Pkt->Type == TYPE_I)
\r
1928 Pkt->KanjiCode = KANJI_NOCNV;
\r
1930 iRetCode = command(Pkt->ctrl_skt, Reply, &Canceled, "TYPE %c", Pkt->Type);
\r
1931 if(iRetCode/100 < FTP_RETRY)
\r
1933 if(Pkt->Mode == EXIST_UNIQUE)
\r
1934 strcpy(Pkt->Cmd, "STOU ");
\r
1936 if(Pkt->hWndTrans != NULL)
\r
1937 DispTransFileInfo(Pkt, MSGJPN104, TRUE, YES);
\r
1939 if(BackgrndMessageProc() == NO)
\r
1941 if(AskPasvMode() != YES)
\r
1942 iRetCode = UpLoadNonPassive(Pkt);
\r
1944 iRetCode = UpLoadPassive(Pkt);
\r
1950 SetErrorMsg(Reply);
\r
1953 if((Pkt->Attr != -1) && ((iRetCode/100) == FTP_COMPLETE))
\r
1954 command(Pkt->ctrl_skt, Reply, &Canceled, "%s %03X %s", AskHostChmodCmd(), Pkt->Attr, Pkt->RemoteFile);
\r
1958 SetErrorMsg(MSGJPN105, Pkt->LocalFile);
\r
1959 SetTaskMsg(MSGJPN105, Pkt->LocalFile);
\r
1961 Pkt->Abort = ABORT_ERROR;
\r
1962 DispUploadFinishMsg(Pkt, iRetCode);
\r
1967 DispTransFileInfo(Pkt, MSGJPN106, TRUE, YES);
\r
1968 SetTaskMsg(MSGJPN107, Pkt->LocalFile);
\r
1975 /*----- 通常モードでファイルをアップロード ------------------------------------
\r
1978 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1982 *----------------------------------------------------------------------------*/
\r
1984 static int UpLoadNonPassive(TRANSPACKET *Pkt)
\r
1988 SOCKET data_socket = INVALID_SOCKET; // data channel socket
\r
1989 SOCKET listen_socket = INVALID_SOCKET; // data listen socket
\r
1991 struct sockaddr_in saSockAddr1;
\r
1993 char Reply[ERR_MSG_LEN+7];
\r
1995 if((listen_socket = GetFTPListenSocket(Pkt->ctrl_skt, &Canceled)) != INVALID_SOCKET)
\r
1997 SetUploadResume(Pkt, Pkt->Mode, Pkt->ExistSize, &Resume);
\r
1999 sprintf(Buf, "%s%s", Pkt->Cmd, Pkt->RemoteFile);
\r
2001 sprintf(Buf, "%s%s", "APPE ", Pkt->RemoteFile);
\r
2003 iRetCode = command(Pkt->ctrl_skt, Reply, &Canceled, "%s", Buf);
\r
2004 if((iRetCode/100) == FTP_PRELIM)
\r
2006 if(SocksGet2ndBindReply(listen_socket, &data_socket) == FFFTP_FAIL)
\r
2008 iLength=sizeof(saSockAddr1);
\r
2009 data_socket = do_accept(listen_socket,(struct sockaddr *)&saSockAddr1, (int *)&iLength);
\r
2011 if(shutdown(listen_socket, 1) != 0)
\r
2012 ReportWSError("shutdown listen", WSAGetLastError());
\r
2013 listen_socket = DoClose(listen_socket);
\r
2015 if(data_socket == INVALID_SOCKET)
\r
2017 SetErrorMsg(MSGJPN280);
\r
2018 ReportWSError("accept", WSAGetLastError());
\r
2022 DoPrintf("Skt=%u : accept from %s port %u", data_socket, inet_ntoa(saSockAddr1.sin_addr), ntohs(saSockAddr1.sin_port));
\r
2025 if(data_socket != INVALID_SOCKET)
\r
2028 // iRetCode = UpLoadFile(Pkt, data_socket);
\r
2029 if(AskCryptMode() == CRYPT_FTPES || AskCryptMode() == CRYPT_FTPIS)
\r
2031 if(AttachSSL(data_socket))
\r
2032 iRetCode = UpLoadFile(Pkt, data_socket);
\r
2034 iRetCode = FTP_ERROR;
\r
2037 iRetCode = UpLoadFile(Pkt, data_socket);
\r
2038 data_socket = DoClose(data_socket);
\r
2043 SetErrorMsg(Reply);
\r
2044 SetTaskMsg(MSGJPN108);
\r
2045 listen_socket = DoClose(listen_socket);
\r
2051 SetErrorMsg(MSGJPN279);
\r
2054 DispUploadFinishMsg(Pkt, iRetCode);
\r
2060 /*----- Passiveモードでファイルをアップロード ---------------------------------
\r
2063 * TRANSPACKET *Pkt : 転送ファイル情報
\r
2067 *----------------------------------------------------------------------------*/
\r
2069 static int UpLoadPassive(TRANSPACKET *Pkt)
\r
2072 SOCKET data_socket = INVALID_SOCKET; // data channel socket
\r
2078 char Reply[ERR_MSG_LEN+7];
\r
2080 iRetCode = command(Pkt->ctrl_skt, Buf, &Canceled, "PASV");
\r
2081 if(iRetCode/100 == FTP_COMPLETE)
\r
2083 if(GetAdrsAndPort(Buf, Adrs, &Port, 19) == FFFTP_SUCCESS)
\r
2085 if((data_socket = connectsock(Adrs, Port, MSGJPN109, &Canceled)) != INVALID_SOCKET)
\r
2089 if(setsockopt(data_socket, IPPROTO_TCP, TCP_NODELAY, (LPSTR)&Flg, sizeof(Flg)) == SOCKET_ERROR)
\r
2090 ReportWSError("setsockopt", WSAGetLastError());
\r
2092 SetUploadResume(Pkt, Pkt->Mode, Pkt->ExistSize, &Resume);
\r
2094 sprintf(Buf, "%s%s", Pkt->Cmd, Pkt->RemoteFile);
\r
2096 sprintf(Buf, "%s%s", "APPE ", Pkt->RemoteFile);
\r
2098 iRetCode = command(Pkt->ctrl_skt, Reply, &Canceled, "%s", Buf);
\r
2099 if(iRetCode/100 == FTP_PRELIM)
\r
2102 // iRetCode = UpLoadFile(Pkt, data_socket);
\r
2103 if(AskCryptMode() == CRYPT_FTPES || AskCryptMode() == CRYPT_FTPIS)
\r
2105 if(AttachSSL(data_socket))
\r
2106 iRetCode = UpLoadFile(Pkt, data_socket);
\r
2108 iRetCode = FTP_ERROR;
\r
2111 iRetCode = UpLoadFile(Pkt, data_socket);
\r
2113 data_socket = DoClose(data_socket);
\r
2117 SetErrorMsg(Reply);
\r
2118 SetTaskMsg(MSGJPN110);
\r
2119 data_socket = DoClose(data_socket);
\r
2125 SetErrorMsg(MSGJPN281);
\r
2132 SetTaskMsg(MSGJPN111);
\r
2139 DispUploadFinishMsg(Pkt, iRetCode);
\r
2145 /*----- アップロードの実行 ----------------------------------------------------
\r
2148 * TRANSPACKET *Pkt : 転送ファイル情報
\r
2149 * SOCKET dSkt : データソケット
\r
2155 * 転送の経過表示は、インターバルタイマで経過を表示する
\r
2156 * 転送ダイアログを出さないでアップロードすることはない
\r
2157 *----------------------------------------------------------------------------*/
\r
2159 static int UpLoadFile(TRANSPACKET *Pkt, SOCKET dSkt)
\r
2162 HANDLE iFileHandle;
\r
2163 SECURITY_ATTRIBUTES Sec;
\r
2164 char Buf[BUFSIZE];
\r
2165 char Buf2[BUFSIZE+3];
\r
2166 CODECONVINFO cInfo;
\r
2167 TERMCODECONVINFO tInfo;
\r
2174 char TmpBuf[ONELINE_BUF_SIZE];
\r
2178 #ifdef SET_BUFFER_SIZE
\r
2179 /* Add by H.Shirouzu at 2002/10/02 */
\r
2180 int buf_size = SOCKBUF_SIZE;
\r
2181 for ( ; buf_size > 0; buf_size /= 2)
\r
2182 if (setsockopt(dSkt, SOL_SOCKET, SO_SNDBUF, (char *)&buf_size, sizeof(buf_size)) == 0)
\r
2187 // 念のため送信バッファを無効にする
\r
2188 #ifdef DISABLE_TRANSFER_NETWORK_BUFFERS
\r
2190 setsockopt(dSkt, SOL_SOCKET, SO_SNDBUF, (char *)&buf_size, sizeof(buf_size));
\r
2193 Pkt->Abort = ABORT_NONE;
\r
2195 Sec.nLength = sizeof(SECURITY_ATTRIBUTES);
\r
2196 Sec.lpSecurityDescriptor = NULL;
\r
2197 Sec.bInheritHandle = FALSE;
\r
2199 if((iFileHandle = CreateFile(Pkt->LocalFile, GENERIC_READ,
\r
2200 FILE_SHARE_READ|FILE_SHARE_WRITE, &Sec, OPEN_EXISTING, 0, NULL)) != INVALID_HANDLE_VALUE)
\r
2203 char Buf3[(BUFSIZE + 3) * 4];
\r
2204 CODECONVINFO cInfo2;
\r
2205 int ProcessedBOM = NO;
\r
2206 if(Pkt->hWndTrans != NULL)
\r
2208 Low = GetFileSize(iFileHandle, &High);
\r
2209 Pkt->Size = MakeLongLong(High, Low);
\r
2211 High = (DWORD)HIGH32(Pkt->ExistSize);
\r
2212 Low = (DWORD)LOW32(Pkt->ExistSize);
\r
2213 SetFilePointer(iFileHandle, Low, &High, FILE_BEGIN);
\r
2215 AllTransSizeNow = 0;
\r
2216 TimeStart = time(NULL);
\r
2217 SetTimer(Pkt->hWndTrans, TIMER_DISPLAY, DISPLAY_TIMING, NULL);
\r
2220 InitCodeConvInfo(&cInfo);
\r
2221 cInfo.KanaCnv = Pkt->KanaCnv;
\r
2222 InitTermCodeConvInfo(&tInfo);
\r
2224 InitCodeConvInfo(&cInfo2);
\r
2225 cInfo2.KanaCnv = Pkt->KanaCnv;
\r
2227 /*===== ファイルを送信するループ =====*/
\r
2228 while((Pkt->Abort == ABORT_NONE) &&
\r
2229 (ForceAbort == NO) &&
\r
2230 (ReadFile(iFileHandle, Buf, BUFSIZE, &iNumBytes, NULL) == TRUE))
\r
2232 if(iNumBytes == 0)
\r
2237 if((RmEOF == YES) && (Pkt->Type == TYPE_A))
\r
2239 if((EofPos = memchr(Buf, 0x1A, iNumBytes)) != NULL)
\r
2240 iNumBytes = EofPos - Buf;
\r
2244 if(Pkt->KanjiCode != KANJI_NOCNV)
\r
2247 cInfo.StrLen = iNumBytes;
\r
2249 cInfo.BufSize = BUFSIZE+3;
\r
2252 // ここで全てUTF-8へ変換する
\r
2253 // TODO: SJIS以外も直接UTF-8へ変換
\r
2254 // if(Pkt->KanjiCode == KANJI_JIS)
\r
2255 // Continue = ConvSJIStoJIS(&cInfo);
\r
2257 // Continue = ConvSJIStoEUC(&cInfo);
\r
2258 switch(Pkt->KanjiCodeDesired)
\r
2261 switch(Pkt->KanjiCode)
\r
2264 // memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
2265 // cInfo2.OutLen = cInfo.StrLen;
\r
2268 Continue = ConvSJIStoJIS(&cInfo);
\r
2269 cInfo2.Str = cInfo.Buf;
\r
2270 cInfo2.StrLen = cInfo.OutLen;
\r
2271 cInfo2.Buf = Buf3;
\r
2272 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2273 ConvJIStoSJIS(&cInfo2);
\r
2276 Continue = ConvSJIStoJIS(&cInfo);
\r
2277 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2278 cInfo2.OutLen = cInfo.OutLen;
\r
2281 Continue = ConvSJIStoEUC(&cInfo);
\r
2282 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2283 cInfo2.OutLen = cInfo.OutLen;
\r
2286 if(ProcessedBOM == NO)
\r
2288 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
2289 cInfo2.OutLen = 3;
\r
2291 ProcessedBOM = YES;
\r
2294 Continue = ConvSJIStoUTF8N(&cInfo);
\r
2295 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2296 cInfo2.OutLen = cInfo.OutLen;
\r
2301 switch(Pkt->KanjiCode)
\r
2304 Continue = ConvJIStoSJIS(&cInfo);
\r
2305 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2306 cInfo2.OutLen = cInfo.OutLen;
\r
2309 // memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
2310 // cInfo2.OutLen = cInfo.StrLen;
\r
2313 Continue = ConvJIStoSJIS(&cInfo);
\r
2314 cInfo2.Str = cInfo.Buf;
\r
2315 cInfo2.StrLen = cInfo.OutLen;
\r
2316 cInfo2.Buf = Buf3;
\r
2317 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2318 ConvSJIStoJIS(&cInfo2);
\r
2321 Continue = ConvJIStoSJIS(&cInfo);
\r
2322 cInfo2.Str = cInfo.Buf;
\r
2323 cInfo2.StrLen = cInfo.OutLen;
\r
2324 cInfo2.Buf = Buf3;
\r
2325 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2326 ConvSJIStoEUC(&cInfo2);
\r
2329 if(ProcessedBOM == NO)
\r
2331 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
2332 cInfo2.OutLen = 3;
\r
2334 ProcessedBOM = YES;
\r
2337 Continue = ConvJIStoSJIS(&cInfo);
\r
2338 cInfo2.Str = cInfo.Buf;
\r
2339 cInfo2.StrLen = cInfo.OutLen;
\r
2340 cInfo2.Buf = Buf3;
\r
2341 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2342 ConvSJIStoUTF8N(&cInfo2);
\r
2347 switch(Pkt->KanjiCode)
\r
2350 Continue = ConvEUCtoSJIS(&cInfo);
\r
2351 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2352 cInfo2.OutLen = cInfo.OutLen;
\r
2355 Continue = ConvEUCtoSJIS(&cInfo);
\r
2356 cInfo2.Str = cInfo.Buf;
\r
2357 cInfo2.StrLen = cInfo.OutLen;
\r
2358 cInfo2.Buf = Buf3;
\r
2359 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2360 ConvSJIStoJIS(&cInfo2);
\r
2363 // memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
2364 // cInfo2.OutLen = cInfo.StrLen;
\r
2367 Continue = ConvEUCtoSJIS(&cInfo);
\r
2368 cInfo2.Str = cInfo.Buf;
\r
2369 cInfo2.StrLen = cInfo.OutLen;
\r
2370 cInfo2.Buf = Buf3;
\r
2371 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2372 ConvSJIStoEUC(&cInfo2);
\r
2375 if(ProcessedBOM == NO)
\r
2377 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
2378 cInfo2.OutLen = 3;
\r
2380 ProcessedBOM = YES;
\r
2383 Continue = ConvEUCtoSJIS(&cInfo);
\r
2384 cInfo2.Str = cInfo.Buf;
\r
2385 cInfo2.StrLen = cInfo.OutLen;
\r
2386 cInfo2.Buf = Buf3;
\r
2387 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2388 ConvSJIStoUTF8N(&cInfo2);
\r
2393 if(ProcessedBOM == NO)
\r
2395 if(memcmp(Buf, "\xEF\xBB\xBF", 3) == 0)
\r
2398 cInfo.StrLen -= 3;
\r
2400 cInfo2.OutLen = 0;
\r
2401 switch(Pkt->KanjiCode)
\r
2404 memcpy(Buf3, "\xEF\xBB\xBF", 3);
\r
2405 cInfo2.OutLen = 3;
\r
2409 ProcessedBOM = YES;
\r
2412 switch(Pkt->KanjiCode)
\r
2415 Continue = ConvUTF8NtoSJIS(&cInfo);
\r
2416 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2417 cInfo2.OutLen = cInfo.OutLen;
\r
2420 Continue = ConvUTF8NtoSJIS(&cInfo);
\r
2421 cInfo2.Str = cInfo.Buf;
\r
2422 cInfo2.StrLen = cInfo.OutLen;
\r
2423 cInfo2.Buf = Buf3;
\r
2424 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2425 ConvSJIStoJIS(&cInfo2);
\r
2428 Continue = ConvUTF8NtoSJIS(&cInfo);
\r
2429 cInfo2.Str = cInfo.Buf;
\r
2430 cInfo2.StrLen = cInfo.OutLen;
\r
2431 cInfo2.Buf = Buf3;
\r
2432 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2433 ConvSJIStoEUC(&cInfo2);
\r
2436 memcpy(Buf3, cInfo.Str, cInfo.StrLen);
\r
2437 cInfo2.OutLen = cInfo.StrLen;
\r
2444 // if(TermCodeConvAndSend(&tInfo, dSkt, Buf2, cInfo.OutLen, Pkt->Type) == FFFTP_FAIL)
\r
2445 if(TermCodeConvAndSend(&tInfo, dSkt, Buf3, cInfo2.OutLen, Pkt->Type) == FFFTP_FAIL)
\r
2447 Pkt->Abort = ABORT_ERROR;
\r
2451 while(Continue == YES);
\r
2455 if(TermCodeConvAndSend(&tInfo, dSkt, Buf, iNumBytes, Pkt->Type) == FFFTP_FAIL)
\r
2456 Pkt->Abort = ABORT_ERROR;
\r
2459 Pkt->ExistSize += iNumBytes;
\r
2460 if(Pkt->hWndTrans != NULL)
\r
2461 AllTransSizeNow += iNumBytes;
\r
2463 if(BackgrndMessageProc() == YES)
\r
2466 if(EofPos != NULL)
\r
2470 if((ForceAbort == NO) && (Pkt->Abort == ABORT_NONE))
\r
2473 if(Pkt->KanjiCode != KANJI_NOCNV)
\r
2476 cInfo.BufSize = BUFSIZE+3;
\r
2477 FlushRestData(&cInfo);
\r
2478 switch(Pkt->KanjiCodeDesired)
\r
2481 switch(Pkt->KanjiCode)
\r
2485 cInfo2.Str = cInfo.Buf;
\r
2486 cInfo2.StrLen = cInfo.OutLen;
\r
2487 cInfo2.Buf = Buf3;
\r
2488 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2489 ConvJIStoSJIS(&cInfo2);
\r
2492 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2493 cInfo2.OutLen = cInfo.OutLen;
\r
2496 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2497 cInfo2.OutLen = cInfo.OutLen;
\r
2500 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2501 cInfo2.OutLen = cInfo.OutLen;
\r
2506 switch(Pkt->KanjiCode)
\r
2509 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2510 cInfo2.OutLen = cInfo.OutLen;
\r
2514 cInfo2.Str = cInfo.Buf;
\r
2515 cInfo2.StrLen = cInfo.OutLen;
\r
2516 cInfo2.Buf = Buf3;
\r
2517 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2518 ConvSJIStoJIS(&cInfo2);
\r
2521 cInfo2.Str = cInfo.Buf;
\r
2522 cInfo2.StrLen = cInfo.OutLen;
\r
2523 cInfo2.Buf = Buf3;
\r
2524 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2525 ConvSJIStoEUC(&cInfo2);
\r
2528 cInfo2.Str = cInfo.Buf;
\r
2529 cInfo2.StrLen = cInfo.OutLen;
\r
2530 cInfo2.Buf = Buf3;
\r
2531 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2532 ConvSJIStoUTF8N(&cInfo2);
\r
2537 switch(Pkt->KanjiCode)
\r
2540 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2541 cInfo2.OutLen = cInfo.OutLen;
\r
2544 cInfo2.Str = cInfo.Buf;
\r
2545 cInfo2.StrLen = cInfo.OutLen;
\r
2546 cInfo2.Buf = Buf3;
\r
2547 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2548 ConvSJIStoJIS(&cInfo2);
\r
2552 cInfo2.Str = cInfo.Buf;
\r
2553 cInfo2.StrLen = cInfo.OutLen;
\r
2554 cInfo2.Buf = Buf3;
\r
2555 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2556 ConvSJIStoEUC(&cInfo2);
\r
2559 cInfo2.Str = cInfo.Buf;
\r
2560 cInfo2.StrLen = cInfo.OutLen;
\r
2561 cInfo2.Buf = Buf3;
\r
2562 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2563 ConvSJIStoUTF8N(&cInfo2);
\r
2568 switch(Pkt->KanjiCode)
\r
2571 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2572 cInfo2.OutLen = cInfo.OutLen;
\r
2575 cInfo2.Str = cInfo.Buf;
\r
2576 cInfo2.StrLen = cInfo.OutLen;
\r
2577 cInfo2.Buf = Buf3;
\r
2578 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2579 ConvSJIStoJIS(&cInfo2);
\r
2582 cInfo2.Str = cInfo.Buf;
\r
2583 cInfo2.StrLen = cInfo.OutLen;
\r
2584 cInfo2.Buf = Buf3;
\r
2585 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2586 ConvSJIStoEUC(&cInfo2);
\r
2589 memcpy(Buf3, cInfo.Buf, cInfo.OutLen);
\r
2590 cInfo2.OutLen = cInfo.OutLen;
\r
2596 // if(TermCodeConvAndSend(&tInfo, dSkt, Buf2, cInfo.OutLen, Pkt->Type) == FFFTP_FAIL)
\r
2597 if(TermCodeConvAndSend(&tInfo, dSkt, Buf3, cInfo2.OutLen, Pkt->Type) == FFFTP_FAIL)
\r
2598 Pkt->Abort = ABORT_ERROR;
\r
2599 cInfo2.Buf = Buf3;
\r
2600 cInfo2.BufSize = (BUFSIZE + 3) * 4;
\r
2601 FlushRestData(&cInfo2);
\r
2602 if(TermCodeConvAndSend(&tInfo, dSkt, Buf3, cInfo2.OutLen, Pkt->Type) == FFFTP_FAIL)
\r
2603 Pkt->Abort = ABORT_ERROR;
\r
2607 tInfo.BufSize = BUFSIZE+3;
\r
2608 FlushRestTermCodeConvData(&tInfo);
\r
2609 if(SendData(dSkt, Buf2, tInfo.OutLen, 0, &Canceled) == FFFTP_FAIL)
\r
2610 Pkt->Abort = ABORT_ERROR;
\r
2614 if(Pkt->hWndTrans != NULL)
\r
2616 KillTimer(Pkt->hWndTrans, TIMER_DISPLAY);
\r
2617 DispTransferStatus(Pkt->hWndTrans, YES, Pkt);
\r
2618 TimeStart = time(NULL) - TimeStart + 1;
\r
2620 CloseHandle(iFileHandle);
\r
2624 SetErrorMsg(MSGJPN112, Pkt->LocalFile);
\r
2625 SetTaskMsg(MSGJPN112, Pkt->LocalFile);
\r
2626 Pkt->Abort = ABORT_ERROR;
\r
2629 if(shutdown(dSkt, 1) != 0)
\r
2630 ReportWSError("shutdown", WSAGetLastError());
\r
2634 while(do_recv(dSkt, Buf, BUFSIZE, 0, &TimeOutErr, &Canceled) > 0)
\r
2638 iRetCode = ReadReplyMessage(Pkt->ctrl_skt, Buf, 1024, &Canceled, TmpBuf);
\r
2641 //DoPrintf("##UP REPLY : %s", Buf);
\r
2643 if(iRetCode >= FTP_RETRY)
\r
2646 if(Pkt->Abort != ABORT_NONE)
\r
2653 /*----- バッファの内容を改行コード変換して送信 --------------------------------
\r
2656 * TERMCODECONVINFO *tInfo : 改行コード変換パケット
\r
2657 * SOCKET Skt : ソケット
\r
2658 * char *Data : データ
\r
2659 * int Size : データのサイズ
\r
2660 * int Ascii : モード (TYPE_xx)
\r
2664 *----------------------------------------------------------------------------*/
\r
2666 static int TermCodeConvAndSend(TERMCODECONVINFO *tInfo, SOCKET Skt, char *Data, int Size, int Ascii)
\r
2668 char Buf3[BUFSIZE*2];
\r
2672 Ret = FFFTP_SUCCESS;
\r
2674 // CR-LF以外の改行コードを変換しないモードはここへ追加
\r
2675 if(Ascii == TYPE_A)
\r
2677 tInfo->Str = Data;
\r
2678 tInfo->StrLen = Size;
\r
2679 tInfo->Buf = Buf3;
\r
2680 tInfo->BufSize = BUFSIZE*2;
\r
2683 Continue = ConvTermCodeToCRLF(tInfo);
\r
2684 if((Ret = SendData(Skt, Buf3, tInfo->OutLen, 0, &Canceled)) == FFFTP_FAIL)
\r
2687 while(Continue == YES);
\r
2690 Ret = SendData(Skt, Data, Size, 0, &Canceled);
\r
2696 /*----- アップロード終了/中止時のメッセージを表示 ----------------------------
\r
2699 * TRANSPACKET *Pkt : 転送ファイル情報
\r
2700 * int iRetCode : 応答コード
\r
2704 *----------------------------------------------------------------------------*/
\r
2706 static void DispUploadFinishMsg(TRANSPACKET *Pkt, int iRetCode)
\r
2708 if(ForceAbort == NO)
\r
2710 if((iRetCode/100) >= FTP_CONTINUE)
\r
2712 if((Pkt->hWndTrans != NULL) && (TimeStart != 0))
\r
2713 SetTaskMsg(MSGJPN113, TimeStart, Pkt->ExistSize/TimeStart);
\r
2715 SetTaskMsg(MSGJPN114);
\r
2717 if(Pkt->Abort != ABORT_USER)
\r
2719 if(DispUpDownErrDialog(uperr_dlg, Pkt->hWndTrans, Pkt->LocalFile) == NO)
\r
2725 if((Pkt->hWndTrans != NULL) && (TimeStart != 0))
\r
2726 SetTaskMsg(MSGJPN115, TimeStart, Pkt->ExistSize/TimeStart);
\r
2728 SetTaskMsg(MSGJPN116);
\r
2735 /*----- アップロードのリジュームの準備を行う ----------------------------------
\r
2738 * TRANSPACKET *Pkt : 転送ファイル情報
\r
2739 * iont ProcMode : 処理モード(EXIST_xxx)
\r
2740 * LONGLONG Size : ホストにあるファイルのサイズ
\r
2741 * int *Mode : リジュームを行うかどうか (YES/NO)
\r
2747 * Pkt->ExistSizeのセットを行なう
\r
2748 *----------------------------------------------------------------------------*/
\r
2750 static int SetUploadResume(TRANSPACKET *Pkt, int ProcMode, LONGLONG Size, int *Mode)
\r
2752 Pkt->ExistSize = 0;
\r
2754 if(ProcMode == EXIST_RESUME)
\r
2756 if(Pkt->hWndTrans != NULL)
\r
2758 Pkt->ExistSize = Size;
\r
2766 /*----- 転送中ダイアログボックスのコールバック --------------------------------
\r
2769 * HWND hDlg : ウインドウハンドル
\r
2770 * UINT message : メッセージ番号
\r
2771 * WPARAM wParam : メッセージの WPARAM 引数
\r
2772 * LPARAM lParam : メッセージの LPARAM 引数
\r
2776 *----------------------------------------------------------------------------*/
\r
2778 static LRESULT CALLBACK TransDlgProc(HWND hDlg, UINT Msg, WPARAM wParam, LPARAM lParam)
\r
2783 static TRANSPACKET *Pkt;
\r
2787 case WM_INITDIALOG :
\r
2788 GetWindowRect(hDlg, &RectDlg);
\r
2789 RectDlg.right -= RectDlg.left;
\r
2790 RectDlg.bottom -= RectDlg.top;
\r
2791 GetWindowRect(GetMainHwnd(), &RectPar);
\r
2793 ((RectPar.right + RectPar.left) / 2) - (RectDlg.right / 2),
\r
2794 ((RectPar.bottom + RectPar.top) / 2) - (RectDlg.bottom / 2),
\r
2799 hMenu = GetSystemMenu(hDlg, FALSE);
\r
2800 EnableMenuItem(hMenu, SC_CLOSE, MF_GRAYED);
\r
2804 switch(LOWORD(wParam))
\r
2806 case TRANS_STOP_NEXT :
\r
2810 case TRANS_STOP_ALL :
\r
2812 /* ここに break はない */
\r
2815 Pkt->Abort = ABORT_USER;
\r
2822 if(wParam == TIMER_DISPLAY)
\r
2824 if(MoveToForeground == YES)
\r
2825 SetForegroundWindow(hDlg);
\r
2826 MoveToForeground = NO;
\r
2827 KillTimer(hDlg, TIMER_DISPLAY);
\r
2828 DispTransferStatus(hDlg, NO, Pkt);
\r
2829 SetTimer(hDlg, TIMER_DISPLAY, DISPLAY_TIMING, NULL);
\r
2833 case WM_SET_PACKET :
\r
2834 Pkt = (TRANSPACKET *)lParam;
\r
2841 /*----- 転送ステータスを表示 --------------------------------------------------
\r
2844 * HWND hWnd : ウインドウハンドル
\r
2845 * int End : 転送が完了したかどうか (YES/NO)
\r
2849 *----------------------------------------------------------------------------*/
\r
2851 static void DispTransferStatus(HWND hWnd, int End, TRANSPACKET *Pkt)
\r
2865 SendMessage(hWnd, WM_GETTEXT, 79, (LPARAM)Str);
\r
2866 if((Pos = strchr(Str, ')')) != NULL)
\r
2870 sprintf(Tmp, "(%d)%s", AskTransferFileNum(), Pos);
\r
2871 SendMessage(hWnd, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
2873 if(Pkt->Abort == ABORT_NONE)
\r
2877 TotalLap = time(NULL) - TimeStart + 1;
\r
2881 Bps = AllTransSizeNow / TotalLap;
\r
2882 Transed = Pkt->Size - Pkt->ExistSize;
\r
2884 if(Pkt->Size <= 0)
\r
2885 sprintf(Tmp, "%d ", Pkt->ExistSize);
\r
2886 else if(Pkt->Size < 1024)
\r
2887 sprintf(Tmp, "%s / %s ", MakeNumString(Pkt->ExistSize, Num1, TRUE), MakeNumString(Pkt->Size, Num2, TRUE));
\r
2889 sprintf(Tmp, "%sk / %sk ", MakeNumString(Pkt->ExistSize/1024, Num1, TRUE), MakeNumString(Pkt->Size/1024, Num2, TRUE));
\r
2893 sprintf(Tmp, "( 0 B/S )");
\r
2894 else if(Bps < 1000)
\r
2895 sprintf(Tmp, "( %s B/S )", MakeNumString(Bps, Num1, TRUE));
\r
2897 sprintf(Tmp, "( %s.%02d KB/S )", MakeNumString(Bps/1000, Num1, TRUE), (int)((Bps%1000)/10));
\r
2900 if((Bps > 0) && (Pkt->Size > 0) && (Transed >= 0))
\r
2902 sprintf(Tmp, " %d:%02d", (int)((Transed/Bps)/60), (int)((Transed/Bps)%60));
\r
2906 strcat(Str, " ??:??");
\r
2909 strcpy(Str, MSGJPN117);
\r
2912 strcpy(Str, MSGJPN118);
\r
2914 SendDlgItemMessage(hWnd, TRANS_STATUS, WM_SETTEXT, 0, (LPARAM)Str);
\r
2916 if(Pkt->Size <= 0)
\r
2918 else if(Pkt->Size < 1024*1024)
\r
2919 Per = (int)(Pkt->ExistSize * 100 / Pkt->Size);
\r
2921 Per = (int)((Pkt->ExistSize/1024) * 100 / (Pkt->Size/1024));
\r
2922 SendDlgItemMessage(hWnd, TRANS_TIME_BAR, PBM_SETPOS, Per, 0);
\r
2928 /*----- 転送するファイルの情報を表示 ------------------------------------------
\r
2931 * TRANSPACKET *Pkt : 転送ファイル情報
\r
2932 * char *Title : ウインドウのタイトル
\r
2933 * int SkipButton : 「このファイルを中止」ボタンの有無 (TRUE/FALSE)
\r
2934 * int Info : ファイル情報を表示するかどうか (YES/NO)
\r
2938 *----------------------------------------------------------------------------*/
\r
2940 static void DispTransFileInfo(TRANSPACKET *Pkt, char *Title, int SkipButton, int Info)
\r
2944 if(Pkt->hWndTrans != NULL)
\r
2946 EnableWindow(GetDlgItem(Pkt->hWndTrans, IDCANCEL), SkipButton);
\r
2948 sprintf(Tmp, "(%d)%s", AskTransferFileNum(), Title);
\r
2949 SendMessage(Pkt->hWndTrans, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
2950 SendDlgItemMessage(Pkt->hWndTrans, TRANS_STATUS, WM_SETTEXT, 0, (LPARAM)"");
\r
2952 SendDlgItemMessage(Pkt->hWndTrans, TRANS_TIME_BAR, PBM_SETRANGE, 0, MAKELPARAM(0, 100));
\r
2953 SendDlgItemMessage(Pkt->hWndTrans, TRANS_TIME_BAR, PBM_SETSTEP, 1, 0);
\r
2954 SendDlgItemMessage(Pkt->hWndTrans, TRANS_TIME_BAR, PBM_SETPOS, 0, 0);
\r
2958 DispStaticText(GetDlgItem(Pkt->hWndTrans, TRANS_REMOTE), Pkt->RemoteFile);
\r
2959 DispStaticText(GetDlgItem(Pkt->hWndTrans, TRANS_LOCAL), Pkt->LocalFile);
\r
2961 if(Pkt->Type == TYPE_I)
\r
2962 SendDlgItemMessage(Pkt->hWndTrans, TRANS_MODE, WM_SETTEXT, 0, (LPARAM)MSGJPN119);
\r
2963 else if(Pkt->Type == TYPE_A)
\r
2964 SendDlgItemMessage(Pkt->hWndTrans, TRANS_MODE, WM_SETTEXT, 0, (LPARAM)MSGJPN120);
\r
2967 if(Pkt->KanjiCode == KANJI_NOCNV)
\r
2968 SendDlgItemMessage(Pkt->hWndTrans, TRANS_KANJI, WM_SETTEXT, 0, (LPARAM)MSGJPN121);
\r
2969 else if(Pkt->KanjiCode == KANJI_SJIS)
\r
2970 SendDlgItemMessage(Pkt->hWndTrans, TRANS_KANJI, WM_SETTEXT, 0, (LPARAM)MSGJPN305);
\r
2971 else if(Pkt->KanjiCode == KANJI_JIS)
\r
2972 SendDlgItemMessage(Pkt->hWndTrans, TRANS_KANJI, WM_SETTEXT, 0, (LPARAM)MSGJPN122);
\r
2973 else if(Pkt->KanjiCode == KANJI_EUC)
\r
2974 SendDlgItemMessage(Pkt->hWndTrans, TRANS_KANJI, WM_SETTEXT, 0, (LPARAM)MSGJPN123);
\r
2975 else if(Pkt->KanjiCode == KANJI_UTF8N)
\r
2976 SendDlgItemMessage(Pkt->hWndTrans, TRANS_KANJI, WM_SETTEXT, 0, (LPARAM)MSGJPN306);
\r
2980 SendDlgItemMessage(Pkt->hWndTrans, TRANS_REMOTE, WM_SETTEXT, 0, (LPARAM)"");
\r
2981 SendDlgItemMessage(Pkt->hWndTrans, TRANS_LOCAL, WM_SETTEXT, 0, (LPARAM)"");
\r
2982 SendDlgItemMessage(Pkt->hWndTrans, TRANS_MODE, WM_SETTEXT, 0, (LPARAM)"");
\r
2983 SendDlgItemMessage(Pkt->hWndTrans, TRANS_KANJI, WM_SETTEXT, 0, (LPARAM)"");
\r
2990 /*----- PASVコマンドの戻り値からアドレスとポート番号を抽出 --------------------
\r
2993 * char *Str : PASVコマンドのリプライ
\r
2994 * char *Adrs : アドレスのコピー先 ("www.xxx.yyy.zzz")
\r
2995 * int *Port : ポート番号をセットするワーク
\r
2996 * int Max : アドレス文字列の最大長
\r
3000 * FFFTP_SUCCESS/FFFTP_FAIL
\r
3001 *----------------------------------------------------------------------------*/
\r
3003 static int GetAdrsAndPort(char *Str, char *Adrs, int *Port, int Max)
\r
3011 Pos = strchr(Str, '(');
\r
3015 Btm = strchr(Pos, ',');
\r
3019 Btm = strchr(Btm, ',');
\r
3023 Btm = strchr(Btm, ',');
\r
3027 Btm = strchr(Btm, ',');
\r
3030 if((Btm - Pos) <= Max)
\r
3032 strncpy(Adrs, Pos, Btm - Pos);
\r
3033 *(Adrs + (Btm - Pos)) = NUL;
\r
3034 ReplaceAll(Adrs, ',', '.');
\r
3037 Btm = strchr(Pos, ',');
\r
3041 *Port = (atoi(Pos) * 0x100) + atoi(Btm);
\r
3042 Sts = FFFTP_SUCCESS;
\r
3054 /*----- Windowsのスペシャルデバイスかどうかを返す -----------------------------
\r
3057 * char *Fname : ファイル名
\r
3060 * int ステータス (YES/NO)
\r
3061 *----------------------------------------------------------------------------*/
\r
3063 static int IsSpecialDevice(char *Fname)
\r
3069 // if((_stricmp(Fname, "CON") == 0) ||
\r
3070 // (_stricmp(Fname, "PRN") == 0) ||
\r
3071 // (_stricmp(Fname, "AUX") == 0) ||
\r
3072 // (_strnicmp(Fname, "CON.", 4) == 0) ||
\r
3073 // (_strnicmp(Fname, "PRN.", 4) == 0) ||
\r
3074 // (_strnicmp(Fname, "AUX.", 4) == 0))
\r
3078 if(_strnicmp(Fname, "AUX", 3) == 0|| _strnicmp(Fname, "CON", 3) == 0 || _strnicmp(Fname, "NUL", 3) == 0 || _strnicmp(Fname, "PRN", 3) == 0)
\r
3080 if(*(Fname + 3) == '\0' || *(Fname + 3) == '.')
\r
3083 else if(_strnicmp(Fname, "COM", 3) == 0 || _strnicmp(Fname, "LPT", 3) == 0)
\r
3085 if(isdigit(*(Fname + 3)) != 0)
\r
3087 if(*(Fname + 4) == '\0' || *(Fname + 4) == '.')
\r
3095 /*----- ミラーリングでのファイル削除確認 --------------------------------------
\r
3100 * TRANSPACKET *Pkt
\r
3104 *----------------------------------------------------------------------------*/
\r
3106 static int MirrorDelNotify(int Cur, int Notify, TRANSPACKET *Pkt)
\r
3108 MIRRORDELETEINFO DelInfo;
\r
3111 if(((Cur == WIN_LOCAL) && (MirDownDelNotify == NO)) ||
\r
3112 ((Cur == WIN_REMOTE) && (MirUpDelNotify == NO)))
\r
3117 if(Notify != YES_ALL)
\r
3119 DelInfo.Cur = Cur;
\r
3120 DelInfo.Pkt = Pkt;
\r
3121 hWnd = Pkt->hWndTrans;
\r
3123 hWnd = GetMainHwnd();
\r
3124 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(delete_dlg), hWnd, MirrorDeleteDialogCallBack, (LPARAM)&DelInfo);
\r
3130 /*----- ミラーリングでのファイル削除ダイアログのコールバック ------------------
\r
3133 * HWND hDlg : ウインドウハンドル
\r
3134 * UINT message : メッセージ番号
\r
3135 * WPARAM wParam : メッセージの WPARAM 引数
\r
3136 * LPARAM lParam : メッセージの LPARAM 引数
\r
3140 *----------------------------------------------------------------------------*/
\r
3142 static BOOL CALLBACK MirrorDeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
3144 static MIRRORDELETEINFO *DelInfo;
\r
3147 case WM_INITDIALOG :
\r
3148 DelInfo = (MIRRORDELETEINFO *)lParam;
\r
3150 if(DelInfo->Cur == WIN_LOCAL)
\r
3152 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN124);
\r
3153 SendDlgItemMessage(hDlg, DELETE_TEXT, WM_SETTEXT, 0, (LPARAM)DelInfo->Pkt->LocalFile);
\r
3157 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN125);
\r
3158 SendDlgItemMessage(hDlg, DELETE_TEXT, WM_SETTEXT, 0, (LPARAM)DelInfo->Pkt->RemoteFile);
\r
3163 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3166 EndDialog(hDlg, YES);
\r
3170 EndDialog(hDlg, NO);
\r
3174 EndDialog(hDlg, YES_ALL);
\r
3179 EndDialog(hDlg, NO_ALL);
\r
3191 static void SetErrorMsg(char *fmt, ...)
\r
3195 if(strlen(ErrMsg) == 0)
\r
3197 va_start(Args, fmt);
\r
3198 wvsprintf(ErrMsg, fmt, Args);
\r
3209 /*----- ダウンロード時の不正なパスをチェック ----------------------------------
\r
3212 * TRANSPACKET *packet : ダウンロード情報
\r
3215 * int YES=不正なパス/NO=問題ないパス
\r
3216 *----------------------------------------------------------------------------*/
\r
3217 int CheckPathViolation(TRANSPACKET *packet)
\r
3222 if((strncmp(packet->RemoteFile, "..\\", 3) == 0) ||
\r
3223 (strncmp(packet->RemoteFile, "../", 3) == 0) ||
\r
3224 (strstr(packet->RemoteFile, "\\..\\") != NULL) ||
\r
3225 (strstr(packet->RemoteFile, "/../") != NULL))
\r
3227 msg = malloc(strlen(MSGJPN297) + strlen(packet->RemoteFile) + 1);
\r
3230 sprintf(msg, MSGJPN297, packet->RemoteFile);
\r
3231 MessageBox(GetMainHwnd(), msg, MSGJPN086, MB_OK);
\r