1 /*=============================================================================
\r
5 ===============================================================================
\r
6 / Copyright (C) 1997-2007 Sota. All rights reserved.
\r
8 / Redistribution and use in source and binary forms, with or without
\r
9 / modification, are permitted provided that the following conditions
\r
12 / 1. Redistributions of source code must retain the above copyright
\r
13 / notice, this list of conditions and the following disclaimer.
\r
14 / 2. Redistributions in binary form must reproduce the above copyright
\r
15 / notice, this list of conditions and the following disclaimer in the
\r
16 / documentation and/or other materials provided with the distribution.
\r
18 / THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
\r
19 / IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
\r
20 / OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
\r
21 / IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
\r
22 / INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
\r
23 / BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
\r
24 / USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
\r
25 / ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
\r
26 / (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
\r
27 / THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
\r
28 /============================================================================*/
\r
32 #include <winsock2.h>
\r
33 #include <windows.h>
\r
37 #include <mbstring.h>
\r
38 #include <windowsx.h>
\r
39 #include <commctrl.h>
\r
42 #include "resource.h"
\r
44 #include <htmlhelp.h>
\r
48 #undef __MBSWRAPPER_H__
\r
49 #include "mbswrapper.h"
\r
52 /*===== プロトタイプ =====*/
\r
54 static int CheckRemoteFile(TRANSPACKET *Pkt, FILELIST *ListList);
\r
56 //static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
57 static INT_PTR CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
59 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote);
\r
60 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base);
\r
61 static int CheckLocalFile(TRANSPACKET *Pkt);
\r
63 //static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
64 static INT_PTR CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
65 static void RemoveAfterSemicolon(char *Path);
\r
66 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base);
\r
68 //static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
69 //static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
70 static INT_PTR CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
71 static INT_PTR CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
72 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt);
\r
73 static int AskMirrorNoTrn(char *Fname, int Mode);
\r
74 static int AskUpLoadFileAttr(char *Fname);
\r
76 //static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
77 static INT_PTR CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
78 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir);
\r
79 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir);
\r
81 //static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
82 //static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
83 static INT_PTR CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
84 static INT_PTR CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
85 static void SetAttrToDialog(HWND hWnd, int Attr);
\r
86 static int GetAttrFromDialog(HWND hDlg);
\r
87 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
88 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
89 static int RenameUnuseableName(char *Fname);
\r
93 extern HWND hHelpWin;
\r
96 extern int FnameCnv;
\r
97 extern int RecvMode;
\r
98 extern int SendMode;
\r
99 extern int MoveMode;
\r
100 extern char MirrorNoTrn[MIRROR_LEN+1];
\r
101 extern char MirrorNoDel[MIRROR_LEN+1];
\r
102 extern int MirrorFnameCnv;
\r
103 extern char DefAttrList[DEFATTRLIST_LEN+1];
\r
104 extern SIZE MirrorDlgSize;
\r
105 extern int VaxSemicolon;
\r
106 extern int DebugConsole;
\r
107 extern int CancelFlg;
\r
109 /*===== ローカルなワーク =====*/
\r
111 static char TmpString[FMAX_PATH+80]; /* テンポラリ */
\r
112 static int CurWin; /* ウインドウ番号 */
\r
114 int UpExistMode = EXIST_OVW; /* アップロードで同じ名前のファイルがある時の扱い方 EXIST_xxx */
\r
115 int ExistMode = EXIST_OVW; /* 同じ名前のファイルがある時の扱い方 EXIST_xxx */
\r
116 static int ExistNotify; /* 確認ダイアログを出すかどうか YES/NO */
\r
118 static double FileSize; /* ファイル総容量 */
\r
122 /*----- ファイル一覧で指定されたファイルをダウンロードする --------------------
\r
125 * int ChName : 名前を変えるかどうか (YES/NO)
\r
126 * int ForceFile : ディレクトリをファイル見なすかどうか (YES/NO)
\r
127 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
131 *----------------------------------------------------------------------------*/
\r
133 void DownLoadProc(int ChName, int ForceFile, int All)
\r
135 FILELIST *FileListBase;
\r
142 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
147 // KeepTransferDialog(YES);
\r
149 FileListBase = NULL;
\r
150 MakeSelectedFileList(WIN_REMOTE, (ForceFile == YES ? NO : YES), All, &FileListBase, &CancelFlg);
\r
152 if(AskNoFullPathMode() == YES)
\r
154 strcpy(Pkt.Cmd, "SETCUR");
\r
155 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
156 AddTransFileList(&Pkt);
\r
159 Pos = FileListBase;
\r
162 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
163 SetYenTail(Pkt.LocalFile);
\r
164 strcpy(TmpString, Pos->File);
\r
165 if((ChName == NO) || ((ForceFile == NO) && (Pos->Node == NODE_DIR)))
\r
167 if(FnameCnv == FNAME_LOWER)
\r
168 _mbslwr(TmpString);
\r
169 else if(FnameCnv == FNAME_UPPER)
\r
170 _mbsupr(TmpString);
\r
171 RemoveAfterSemicolon(TmpString);
\r
172 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
177 CurWin = WIN_REMOTE;
\r
178 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
180 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
186 strcat(Pkt.LocalFile, TmpString);
\r
187 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
189 if((ForceFile == NO) && (Pos->Node == NODE_DIR))
\r
191 strcpy(Pkt.Cmd, "MKD ");
\r
192 strcpy(Pkt.RemoteFile, "");
\r
193 AddTransFileList(&Pkt);
\r
195 else if((Pos->Node == NODE_FILE) ||
\r
196 ((ForceFile == YES) && (Pos->Node == NODE_DIR)))
\r
198 if(AskHostType() == HTYPE_ACOS)
\r
200 strcpy(Pkt.RemoteFile, "'");
\r
201 strcat(Pkt.RemoteFile, AskHostLsName());
\r
202 strcat(Pkt.RemoteFile, "(");
\r
203 strcat(Pkt.RemoteFile, Pos->File);
\r
204 strcat(Pkt.RemoteFile, ")");
\r
205 strcat(Pkt.RemoteFile, "'");
\r
207 else if(AskHostType() == HTYPE_ACOS_4)
\r
209 strcpy(Pkt.RemoteFile, Pos->File);
\r
213 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
214 SetSlashTail(Pkt.RemoteFile);
\r
215 strcat(Pkt.RemoteFile, Pos->File);
\r
216 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
219 strcpy(Pkt.Cmd, "RETR ");
\r
220 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
221 Pkt.Size = Pos->Size;
\r
222 Pkt.Time = Pos->Time;
\r
223 Pkt.KanjiCode = AskHostKanjiCode();
\r
225 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
226 Pkt.KanaCnv = AskHostKanaCnv();
\r
228 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
229 if(Pkt.Mode == EXIST_ABORT)
\r
231 else if(Pkt.Mode != EXIST_IGNORE)
\r
232 AddTransFileList(&Pkt);
\r
237 if(AskNoFullPathMode() == YES)
\r
239 strcpy(Pkt.Cmd, "BACKCUR");
\r
240 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
241 AddTransFileList(&Pkt);
\r
243 DeleteFileList(&FileListBase);
\r
245 strcpy(Pkt.Cmd, "GOQUIT");
\r
246 AddTransFileList(&Pkt);
\r
248 GoForwardTransWindow();
\r
249 // KeepTransferDialog(NO);
\r
257 /*----- 指定されたファイルを一つダウンロードする ------------------------------
\r
260 * char *Fname : ファイル名
\r
264 *----------------------------------------------------------------------------*/
\r
266 void DirectDownLoadProc(char *Fname)
\r
273 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
278 // KeepTransferDialog(YES);
\r
280 if(AskNoFullPathMode() == YES)
\r
282 strcpy(Pkt.Cmd, "SETCUR");
\r
283 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
284 AddTransFileList(&Pkt);
\r
287 if(strlen(Fname) > 0)
\r
289 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
290 SetYenTail(Pkt.LocalFile);
\r
291 strcpy(TmpString, Fname);
\r
292 if(FnameCnv == FNAME_LOWER)
\r
293 _mbslwr(TmpString);
\r
294 else if(FnameCnv == FNAME_UPPER)
\r
295 _mbsupr(TmpString);
\r
296 RemoveAfterSemicolon(TmpString);
\r
298 if(RenameUnuseableName(TmpString) == FFFTP_SUCCESS)
\r
300 strcat(Pkt.LocalFile, TmpString);
\r
301 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
303 if(AskHostType() == HTYPE_ACOS)
\r
305 strcpy(Pkt.RemoteFile, "'");
\r
306 strcat(Pkt.RemoteFile, AskHostLsName());
\r
307 strcat(Pkt.RemoteFile, "(");
\r
308 strcat(Pkt.RemoteFile, Fname);
\r
309 strcat(Pkt.RemoteFile, ")");
\r
310 strcat(Pkt.RemoteFile, "'");
\r
312 else if(AskHostType() == HTYPE_ACOS_4)
\r
314 strcpy(Pkt.RemoteFile, Fname);
\r
318 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
319 SetSlashTail(Pkt.RemoteFile);
\r
320 strcat(Pkt.RemoteFile, Fname);
\r
321 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
324 strcpy(Pkt.Cmd, "RETR-S ");
\r
325 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
327 /* サイズと日付は転送側スレッドで取得し、セットする */
\r
329 Pkt.KanjiCode = AskHostKanjiCode();
\r
331 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
332 Pkt.KanaCnv = AskHostKanaCnv();
\r
334 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
335 if((Pkt.Mode != EXIST_ABORT) && (Pkt.Mode != EXIST_IGNORE))
\r
336 AddTransFileList(&Pkt);
\r
340 if(AskNoFullPathMode() == YES)
\r
342 strcpy(Pkt.Cmd, "BACKCUR");
\r
343 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
344 AddTransFileList(&Pkt);
\r
347 strcpy(Pkt.Cmd, "GOQUIT");
\r
348 AddTransFileList(&Pkt);
\r
350 GoForwardTransWindow();
\r
351 // KeepTransferDialog(NO);
\r
359 /*----- 入力されたファイル名のファイルを一つダウンロードする ------------------
\r
366 *----------------------------------------------------------------------------*/
\r
368 void InputDownLoadProc(void)
\r
370 char Path[FMAX_PATH+1];
\r
373 // DisableUserOpe();
\r
376 if(InputDialogBox(downname_dlg, GetMainHwnd(), NULL, Path, FMAX_PATH, &Tmp, IDH_HELP_TOPIC_0000001) == YES)
\r
378 DirectDownLoadProc(Path);
\r
381 // EnableUserOpe();
\r
387 /*----- ミラーリングダウンロードを行う ----------------------------------------
\r
390 * int Notify : 確認を行うかどうか (YES/NO)
\r
394 *----------------------------------------------------------------------------*/
\r
396 void MirrorDownloadProc(int Notify)
\r
398 FILELIST *LocalListBase;
\r
399 FILELIST *RemoteListBase;
\r
400 FILELIST *LocalPos;
\r
401 FILELIST *RemotePos;
\r
404 char Name[FMAX_PATH+1];
\r
412 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
419 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_down_dlg), GetMainHwnd(), MirrorNotifyCallBack, 0);
\r
423 if((Notify == YES) || (Notify == YES_LIST))
\r
425 /*===== ファイルリスト取得 =====*/
\r
427 LocalListBase = NULL;
\r
428 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
429 RemoteListBase = NULL;
\r
430 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
432 RemotePos = RemoteListBase;
\r
433 while(RemotePos != NULL)
\r
435 RemotePos->Attr = YES; /* RemotePos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
436 RemotePos = RemotePos->Next;
\r
439 LocalPos = LocalListBase;
\r
440 while(LocalPos != NULL)
\r
442 if(AskMirrorNoTrn(LocalPos->File, 1) == NO)
\r
444 LocalPos->Attr = YES;
\r
445 LocalPos = LocalPos->Next;
\r
449 LocalPos->Attr = NO; /* LocalPos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
451 if(LocalPos->Node == NODE_DIR)
\r
453 Level = AskDirLevel(LocalPos->File);
\r
454 LocalPos = LocalPos->Next;
\r
455 while(LocalPos != NULL)
\r
457 if((LocalPos->Node == NODE_DIR) &&
\r
458 (AskDirLevel(LocalPos->File) <= Level))
\r
462 LocalPos->Attr = NO;
\r
463 LocalPos = LocalPos->Next;
\r
467 LocalPos = LocalPos->Next;
\r
471 /*===== ファイルリスト比較 =====*/
\r
473 RemotePos = RemoteListBase;
\r
474 while(RemotePos != NULL)
\r
476 if(AskMirrorNoTrn(RemotePos->File, 0) == NO)
\r
478 strcpy(Name, RemotePos->File);
\r
479 // ReplaceAll(Name, '/', '\\');
\r
481 if(MirrorFnameCnv == YES)
\r
482 Mode = COMP_LOWERMATCH;
\r
484 Mode = COMP_STRICT;
\r
486 if((LocalPos = SearchFileList(Name, LocalListBase, Mode)) != NULL)
\r
488 if((RemotePos->Node == NODE_DIR) && (LocalPos->Node == NODE_DIR))
\r
490 LocalPos->Attr = NO;
\r
491 RemotePos->Attr = NO;
\r
493 else if((RemotePos->Node == NODE_FILE) && (LocalPos->Node == NODE_FILE))
\r
495 LocalPos->Attr = NO;
\r
496 if(CompareFileTime(&RemotePos->Time, &LocalPos->Time) <= 0)
\r
497 RemotePos->Attr = NO;
\r
500 RemotePos = RemotePos->Next;
\r
504 if(RemotePos->Node == NODE_FILE)
\r
506 RemotePos->Attr = NO;
\r
507 RemotePos = RemotePos->Next;
\r
511 RemotePos->Attr = NO;
\r
512 Level = AskDirLevel(RemotePos->File);
\r
513 RemotePos = RemotePos->Next;
\r
514 while(RemotePos != NULL)
\r
516 if((RemotePos->Node == NODE_DIR) &&
\r
517 (AskDirLevel(RemotePos->File) <= Level))
\r
521 RemotePos->Attr = NO;
\r
522 RemotePos = RemotePos->Next;
\r
528 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
530 /*===== 削除/アップロード =====*/
\r
532 LocalPos = LocalListBase;
\r
533 while(LocalPos != NULL)
\r
535 if((LocalPos->Attr == YES) && (LocalPos->Node == NODE_FILE))
\r
537 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
538 SetYenTail(Pkt.LocalFile);
\r
539 strcat(Pkt.LocalFile, LocalPos->File);
\r
540 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
541 strcpy(Pkt.RemoteFile, "");
\r
542 strcpy(Pkt.Cmd, "L-DELE ");
\r
543 AddTmpTransFileList(&Pkt, &Base);
\r
545 LocalPos = LocalPos->Next;
\r
547 MirrorDeleteAllLocalDir(LocalListBase, &Pkt, &Base);
\r
550 RemotePos = RemoteListBase;
\r
551 while(RemotePos != NULL)
\r
553 if(RemotePos->Attr == YES)
\r
555 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
556 SetYenTail(Pkt.LocalFile);
\r
557 Cat = strchr(Pkt.LocalFile, NUL);
\r
558 strcat(Pkt.LocalFile, RemotePos->File);
\r
560 if(MirrorFnameCnv == YES)
\r
563 RemoveAfterSemicolon(Cat);
\r
564 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
566 if(RemotePos->Node == NODE_DIR)
\r
568 strcpy(Pkt.RemoteFile, "");
\r
569 strcpy(Pkt.Cmd, "L-MKD ");
\r
570 AddTmpTransFileList(&Pkt, &Base);
\r
572 else if(RemotePos->Node == NODE_FILE)
\r
574 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
575 SetSlashTail(Pkt.RemoteFile);
\r
576 strcat(Pkt.RemoteFile, RemotePos->File);
\r
577 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
579 strcpy(Pkt.Cmd, "RETR ");
\r
580 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
581 Pkt.Size = RemotePos->Size;
\r
582 Pkt.Time = RemotePos->Time;
\r
584 Pkt.KanjiCode = AskHostKanjiCode();
\r
586 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
587 Pkt.KanaCnv = AskHostKanaCnv();
\r
588 Pkt.Mode = EXIST_OVW;
\r
589 AddTmpTransFileList(&Pkt, &Base);
\r
592 RemotePos = RemotePos->Next;
\r
595 if((Notify == YES) ||
\r
596 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirrordown_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
598 if(AskNoFullPathMode() == YES)
\r
600 strcpy(Pkt.Cmd, "SETCUR");
\r
601 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
602 AddTransFileList(&Pkt);
\r
604 AppendTransFileList(Base);
\r
606 if(AskNoFullPathMode() == YES)
\r
608 strcpy(Pkt.Cmd, "BACKCUR");
\r
609 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
610 AddTransFileList(&Pkt);
\r
613 strcpy(Pkt.Cmd, "GOQUIT");
\r
614 AddTransFileList(&Pkt);
\r
617 EraseTmpTransFileList(&Base);
\r
619 DeleteFileList(&LocalListBase);
\r
620 DeleteFileList(&RemoteListBase);
\r
622 GoForwardTransWindow();
\r
631 /*----- ミラーリングのファイル一覧を表示 --------------------------------------
\r
634 * FILELIST *Local : ローカル側
\r
635 * FILELIST *Remote : リモート側
\r
639 *----------------------------------------------------------------------------*/
\r
641 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote)
\r
647 if(DebugConsole == YES)
\r
649 DoPrintf("---- MIRROR FILE LIST ----");
\r
650 while(Local != NULL)
\r
652 FileTimeToLocalFileTime(&Local->Time, &fTime);
\r
653 FileTimeToSystemTime(&fTime, &sTime);
\r
654 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
655 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
656 DoPrintf("LOCAL : %s %s [%s] %s", Local->Attr==1?"YES":"NO ", Local->Node==NODE_DIR?"DIR ":"FILE", Date, Local->File);
\r
657 Local = Local->Next;
\r
659 while(Remote != NULL)
\r
661 FileTimeToLocalFileTime(&Remote->Time, &fTime);
\r
662 FileTimeToSystemTime(&fTime, &sTime);
\r
663 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
664 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
665 DoPrintf("REMOTE : %s %s [%s] %s", Remote->Attr==1?"YES":"NO ", Remote->Node==NODE_DIR?"DIR ":"FILE", Date, Remote->File);
\r
666 Remote = Remote->Next;
\r
668 DoPrintf("---- END ----");
\r
674 /*----- ミラーリング時のローカル側のフォルダ削除 ------------------------------
\r
677 * FILELIST *Local : ファイルリスト
\r
678 * TRANSPACKET *Pkt :
\r
679 * TRANSPACKET **Base :
\r
683 *----------------------------------------------------------------------------*/
\r
685 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
687 while(Local != NULL)
\r
689 if(Local->Node == NODE_DIR)
\r
691 MirrorDeleteAllLocalDir(Local->Next, Pkt, Base);
\r
693 if(Local->Attr == YES)
\r
695 AskLocalCurDir(Pkt->LocalFile, FMAX_PATH);
\r
696 SetYenTail(Pkt->LocalFile);
\r
697 strcat(Pkt->LocalFile, Local->File);
\r
698 ReplaceAll(Pkt->LocalFile, '/', '\\');
\r
699 strcpy(Pkt->RemoteFile, "");
\r
700 strcpy(Pkt->Cmd, "L-RMD ");
\r
701 AddTmpTransFileList(Pkt, Base);
\r
705 Local = Local->Next;
\r
711 /*----- ファイル名のセミコロン以降を取り除く ----------------------------------
\r
714 * char *Path : ファイル名
\r
721 * オプション設定によって処理を切替える
\r
722 *----------------------------------------------------------------------------*/
\r
724 static void RemoveAfterSemicolon(char *Path)
\r
728 if(VaxSemicolon == YES)
\r
730 if((Pos = strchr(Path, ';')) != NULL)
\r
737 /*----- ローカルに同じ名前のファイルがないかチェック --------------------------
\r
740 * TRANSPACKET *Pkt : 転送ファイル情報
\r
744 * EXIST_OVW/EXIST_RESUME/EXIST_IGNORE
\r
747 * Pkt.ExistSize, ExistMode、ExistNotify が変更される
\r
748 *----------------------------------------------------------------------------*/
\r
750 static int CheckLocalFile(TRANSPACKET *Pkt)
\r
753 WIN32_FIND_DATA Find;
\r
757 Pkt->ExistSize = 0;
\r
758 if(RecvMode != TRANS_OVW)
\r
760 if((fHnd = FindFirstFile(Pkt->LocalFile, &Find)) != INVALID_HANDLE_VALUE)
\r
764 Pkt->ExistSize = MakeLongLong(Find.nFileSizeHigh, Find.nFileSizeLow);
\r
766 if(ExistNotify == YES)
\r
768 SoundPlay(SND_ERROR);
\r
769 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(down_exist_dlg), GetMainHwnd(), DownExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
777 if(Ret == EXIST_NEW)
\r
780 if(CompareFileTime(&Find.ftLastWriteTime, &Pkt->Time) < 0)
\r
783 Ret = EXIST_IGNORE;
\r
791 /*----- ローカルに同じ名前のファイルがある時の確認ダイアログのコールバック ----
\r
794 * HWND hDlg : ウインドウハンドル
\r
795 * UINT message : メッセージ番号
\r
796 * WPARAM wParam : メッセージの WPARAM 引数
\r
797 * LPARAM lParam : メッセージの LPARAM 引数
\r
801 *----------------------------------------------------------------------------*/
\r
804 //static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
805 static INT_PTR CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
807 static TRANSPACKET *Pkt;
\r
808 static const RADIOBUTTON DownExistButton[] = {
\r
809 { DOWN_EXIST_OVW, EXIST_OVW },
\r
810 { DOWN_EXIST_NEW, EXIST_NEW },
\r
811 { DOWN_EXIST_RESUME, EXIST_RESUME },
\r
812 { DOWN_EXIST_IGNORE, EXIST_IGNORE }
\r
814 #define DOWNEXISTBUTTONS (sizeof(DownExistButton)/sizeof(RADIOBUTTON))
\r
818 case WM_INITDIALOG :
\r
819 Pkt = (TRANSPACKET *)lParam;
\r
820 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
821 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->LocalFile);
\r
823 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
824 EnableWindow(GetDlgItem(hDlg, DOWN_EXIST_RESUME), FALSE);
\r
826 SetRadioButtonByValue(hDlg, ExistMode, DownExistButton, DOWNEXISTBUTTONS);
\r
830 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
834 /* ここに break はない */
\r
837 ExistMode = AskRadioButtonValue(hDlg, DownExistButton, DOWNEXISTBUTTONS);
\r
838 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->LocalFile);
\r
839 EndDialog(hDlg, YES);
\r
843 // ExistMode = EXIST_ABORT;
\r
844 EndDialog(hDlg, NO);
\r
848 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000009);
\r
861 /*----- ファイル一覧で指定されたファイルをアップロードする --------------------
\r
864 * int ChName : 名前を変えるかどうか (YES/NO)
\r
865 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
869 *----------------------------------------------------------------------------*/
\r
871 void UpLoadListProc(int ChName, int All)
\r
873 FILELIST *FileListBase;
\r
878 FILELIST *RemoteList;
\r
879 char Tmp[FMAX_PATH+1];
\r
885 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
889 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
890 FileListBase = NULL;
\r
891 MakeSelectedFileList(WIN_LOCAL, YES, All, &FileListBase, &CancelFlg);
\r
893 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
896 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
901 Pos = FileListBase;
\r
904 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
905 SetSlashTail(Pkt.RemoteFile);
\r
906 Cat = strchr(Pkt.RemoteFile, NUL);
\r
907 if((ChName == NO) || (Pos->Node == NODE_DIR))
\r
909 strcat(Pkt.RemoteFile, Pos->File);
\r
910 if(FnameCnv == FNAME_LOWER)
\r
912 else if(FnameCnv == FNAME_UPPER)
\r
918 strcpy(TmpString, Pos->File);
\r
919 CurWin = WIN_LOCAL;
\r
920 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
921 strcat(Pkt.RemoteFile, TmpString);
\r
925 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
927 if(AskHostType() == HTYPE_ACOS)
\r
929 strcpy(Pkt.RemoteFile, "'");
\r
930 strcat(Pkt.RemoteFile, AskHostLsName());
\r
931 strcat(Pkt.RemoteFile, "(");
\r
932 strcat(Pkt.RemoteFile, Cat);
\r
933 strcat(Pkt.RemoteFile, ")");
\r
934 strcat(Pkt.RemoteFile, "'");
\r
936 else if(AskHostType() == HTYPE_ACOS_4)
\r
937 strcpy(Pkt.RemoteFile, Cat);
\r
939 if(Pos->Node == NODE_DIR)
\r
943 // ホスト側のファイル一覧をRemoteListに登録
\r
945 if(RemoteList != NULL)
\r
946 DeleteFileList(&RemoteList);
\r
949 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
950 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
952 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
953 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
954 DoCWD(Tmp, NO, NO, NO);
\r
959 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
961 strcpy(Pkt1.Cmd, "SETCUR");
\r
962 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
963 AddTransFileList(&Pkt1);
\r
966 strcpy(Pkt.Cmd, "MKD ");
\r
967 strcpy(Pkt.LocalFile, "");
\r
968 AddTransFileList(&Pkt);
\r
971 else if(Pos->Node == NODE_FILE)
\r
974 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
975 SetYenTail(Pkt.LocalFile);
\r
976 strcat(Pkt.LocalFile, Pos->File);
\r
977 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
979 strcpy(Pkt.Cmd, "STOR ");
\r
980 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
982 Pkt.Time = Pos->Time;
\r
983 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
984 Pkt.KanjiCode = AskHostKanjiCode();
\r
986 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
987 Pkt.KanaCnv = AskHostKanaCnv();
\r
988 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
989 if(Pkt.Mode == EXIST_ABORT)
\r
991 else if(Pkt.Mode != EXIST_IGNORE)
\r
993 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
995 strcpy(Pkt1.Cmd, "SETCUR");
\r
996 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
997 AddTransFileList(&Pkt1);
\r
1000 AddTransFileList(&Pkt);
\r
1006 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
1008 strcpy(Pkt.Cmd, "BACKCUR");
\r
1009 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1010 AddTransFileList(&Pkt);
\r
1013 if(RemoteList != NULL)
\r
1014 DeleteFileList(&RemoteList);
\r
1016 DeleteFileList(&FileListBase);
\r
1018 strcpy(Pkt.Cmd, "GOQUIT");
\r
1019 AddTransFileList(&Pkt);
\r
1021 GoForwardTransWindow();
\r
1029 /*----- ドラッグ&ドロップで指定されたファイルをアップロードする --------------
\r
1032 * WPARAM wParam : ドロップされたファイルの情報
\r
1036 *----------------------------------------------------------------------------*/
\r
1038 void UpLoadDragProc(WPARAM wParam)
\r
1040 FILELIST *FileListBase;
\r
1045 FILELIST *RemoteList;
\r
1046 char Tmp[FMAX_PATH+1];
\r
1048 char Cur[FMAX_PATH+1];
\r
1053 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1057 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
1058 FileListBase = NULL;
\r
1059 MakeDroppedFileList(wParam, Cur, &FileListBase);
\r
1061 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
1063 RemoteList = NULL;
\r
1064 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
1067 ExistNotify = YES;
\r
1069 Pos = FileListBase;
\r
1070 while(Pos != NULL)
\r
1072 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1073 SetSlashTail(Pkt.RemoteFile);
\r
1074 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1076 strcat(Pkt.RemoteFile, Pos->File);
\r
1077 if(FnameCnv == FNAME_LOWER)
\r
1079 else if(FnameCnv == FNAME_UPPER)
\r
1081 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1083 if(AskHostType() == HTYPE_ACOS)
\r
1085 strcpy(Pkt.RemoteFile, "'");
\r
1086 strcat(Pkt.RemoteFile, AskHostLsName());
\r
1087 strcat(Pkt.RemoteFile, "(");
\r
1088 strcat(Pkt.RemoteFile, Cat);
\r
1089 strcat(Pkt.RemoteFile, ")");
\r
1090 strcat(Pkt.RemoteFile, "'");
\r
1092 else if(AskHostType() == HTYPE_ACOS_4)
\r
1093 strcpy(Pkt.RemoteFile, Cat);
\r
1095 if(Pos->Node == NODE_DIR)
\r
1099 // ホスト側のファイル一覧をRemoteListに登録
\r
1101 if(RemoteList != NULL)
\r
1102 DeleteFileList(&RemoteList);
\r
1103 RemoteList = NULL;
\r
1105 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
1106 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
1108 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
1109 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
1110 DoCWD(Tmp, NO, NO, NO);
\r
1114 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1116 strcpy(Pkt1.Cmd, "SETCUR");
\r
1117 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1118 AddTransFileList(&Pkt1);
\r
1121 strcpy(Pkt.Cmd, "MKD ");
\r
1122 strcpy(Pkt.LocalFile, "");
\r
1123 AddTransFileList(&Pkt);
\r
1126 else if(Pos->Node == NODE_FILE)
\r
1129 strcpy(Pkt.LocalFile, Cur);
\r
1130 SetYenTail(Pkt.LocalFile);
\r
1131 strcat(Pkt.LocalFile, Pos->File);
\r
1132 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1134 strcpy(Pkt.Cmd, "STOR ");
\r
1135 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1137 Pkt.Time = Pos->Time;
\r
1138 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1139 Pkt.KanjiCode = AskHostKanjiCode();
\r
1141 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1142 Pkt.KanaCnv = AskHostKanaCnv();
\r
1143 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
1144 if(Pkt.Mode == EXIST_ABORT)
\r
1146 else if(Pkt.Mode != EXIST_IGNORE)
\r
1148 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1150 strcpy(Pkt1.Cmd, "SETCUR");
\r
1151 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1152 AddTransFileList(&Pkt1);
\r
1155 AddTransFileList(&Pkt);
\r
1161 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
1163 strcpy(Pkt.Cmd, "BACKCUR");
\r
1164 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1165 AddTransFileList(&Pkt);
\r
1168 if(RemoteList != NULL)
\r
1169 DeleteFileList(&RemoteList);
\r
1171 DeleteFileList(&FileListBase);
\r
1173 strcpy(Pkt.Cmd, "GOQUIT");
\r
1174 AddTransFileList(&Pkt);
\r
1176 GoForwardTransWindow();
\r
1184 /*----- ミラーリングアップロードを行う ----------------------------------------
\r
1187 * int Notify : 確認を行うかどうか (YES/NO)
\r
1191 *----------------------------------------------------------------------------*/
\r
1193 void MirrorUploadProc(int Notify)
\r
1195 FILELIST *LocalListBase;
\r
1196 FILELIST *RemoteListBase;
\r
1197 FILELIST *LocalPos;
\r
1198 FILELIST *RemotePos;
\r
1200 TRANSPACKET *Base;
\r
1201 char Name[FMAX_PATH+1];
\r
1205 SYSTEMTIME TmpStime;
\r
1206 FILETIME TmpFtimeL;
\r
1207 FILETIME TmpFtimeR;
\r
1212 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1219 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_up_dlg), GetMainHwnd(), MirrorNotifyCallBack, 1);
\r
1223 if((Notify == YES) || (Notify == YES_LIST))
\r
1225 /*===== ファイルリスト取得 =====*/
\r
1227 LocalListBase = NULL;
\r
1228 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
1229 RemoteListBase = NULL;
\r
1230 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
1232 LocalPos = LocalListBase;
\r
1233 while(LocalPos != NULL)
\r
1235 LocalPos->Attr = YES; /* LocalPos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
1236 LocalPos = LocalPos->Next;
\r
1239 RemotePos = RemoteListBase;
\r
1240 while(RemotePos != NULL)
\r
1242 if(AskMirrorNoTrn(RemotePos->File, 1) == NO)
\r
1244 RemotePos->Attr = YES;
\r
1245 RemotePos = RemotePos->Next;
\r
1249 RemotePos->Attr = NO; /* RemotePos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
1251 if(RemotePos->Node == NODE_DIR)
\r
1253 Level = AskDirLevel(RemotePos->File);
\r
1254 RemotePos = RemotePos->Next;
\r
1255 while(RemotePos != NULL)
\r
1257 if((RemotePos->Node == NODE_DIR) &&
\r
1258 (AskDirLevel(RemotePos->File) <= Level))
\r
1262 RemotePos->Attr = NO;
\r
1263 RemotePos = RemotePos->Next;
\r
1267 RemotePos = RemotePos->Next;
\r
1271 /*===== ファイルリスト比較 =====*/
\r
1273 LocalPos = LocalListBase;
\r
1274 while(LocalPos != NULL)
\r
1276 if(AskMirrorNoTrn(LocalPos->File, 0) == NO)
\r
1278 strcpy(Name, LocalPos->File);
\r
1279 ReplaceAll(Name, '\\', '/');
\r
1281 if(MirrorFnameCnv == YES)
\r
1282 Mode = COMP_LOWERMATCH;
\r
1284 Mode = COMP_STRICT;
\r
1286 if(LocalPos->Node == NODE_DIR)
\r
1288 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1290 if(RemotePos->Node == NODE_DIR)
\r
1292 RemotePos->Attr = NO;
\r
1293 LocalPos->Attr = NO;
\r
1297 else if(LocalPos->Node == NODE_FILE)
\r
1299 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1301 if(RemotePos->Node == NODE_FILE)
\r
1303 FileTimeToLocalFileTime(&LocalPos->Time, &TmpFtimeL);
\r
1304 FileTimeToLocalFileTime(&RemotePos->Time, &TmpFtimeR);
\r
1305 if((RemotePos->InfoExist & FINFO_TIME) == 0)
\r
1307 FileTimeToSystemTime(&TmpFtimeL, &TmpStime);
\r
1308 TmpStime.wHour = 0;
\r
1309 TmpStime.wMinute = 0;
\r
1310 TmpStime.wSecond = 0;
\r
1311 TmpStime.wMilliseconds = 0;
\r
1312 SystemTimeToFileTime(&TmpStime, &TmpFtimeL);
\r
1314 FileTimeToSystemTime(&TmpFtimeR, &TmpStime);
\r
1315 TmpStime.wHour = 0;
\r
1316 TmpStime.wMinute = 0;
\r
1317 TmpStime.wSecond = 0;
\r
1318 TmpStime.wMilliseconds = 0;
\r
1319 SystemTimeToFileTime(&TmpStime, &TmpFtimeR);
\r
1321 RemotePos->Attr = NO;
\r
1322 if(CompareFileTime(&TmpFtimeL, &TmpFtimeR) <= 0)
\r
1323 LocalPos->Attr = NO;
\r
1328 LocalPos = LocalPos->Next;
\r
1332 if(LocalPos->Node == NODE_FILE)
\r
1334 LocalPos->Attr = NO;
\r
1335 LocalPos = LocalPos->Next;
\r
1339 LocalPos->Attr = NO;
\r
1340 Level = AskDirLevel(LocalPos->File);
\r
1341 LocalPos = LocalPos->Next;
\r
1342 while(LocalPos != NULL)
\r
1344 if((LocalPos->Node == NODE_DIR) &&
\r
1345 (AskDirLevel(LocalPos->File) <= Level))
\r
1349 LocalPos->Attr = NO;
\r
1350 LocalPos = LocalPos->Next;
\r
1356 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
1358 /*===== 削除/アップロード =====*/
\r
1360 RemotePos = RemoteListBase;
\r
1361 while(RemotePos != NULL)
\r
1363 if((RemotePos->Attr == YES) && (RemotePos->Node == NODE_FILE))
\r
1365 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1366 SetSlashTail(Pkt.RemoteFile);
\r
1367 strcat(Pkt.RemoteFile, RemotePos->File);
\r
1368 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1369 strcpy(Pkt.LocalFile, "");
\r
1370 strcpy(Pkt.Cmd, "R-DELE ");
\r
1371 AddTmpTransFileList(&Pkt, &Base);
\r
1373 RemotePos = RemotePos->Next;
\r
1375 MirrorDeleteAllDir(RemoteListBase, &Pkt, &Base);
\r
1377 LocalPos = LocalListBase;
\r
1378 while(LocalPos != NULL)
\r
1380 if(LocalPos->Attr == YES)
\r
1382 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1383 SetSlashTail(Pkt.RemoteFile);
\r
1384 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1385 strcat(Pkt.RemoteFile, LocalPos->File);
\r
1387 if(MirrorFnameCnv == YES)
\r
1390 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1392 if(LocalPos->Node == NODE_DIR)
\r
1394 strcpy(Pkt.LocalFile, "");
\r
1395 strcpy(Pkt.Cmd, "R-MKD ");
\r
1396 AddTmpTransFileList(&Pkt, &Base);
\r
1398 else if(LocalPos->Node == NODE_FILE)
\r
1400 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
1401 SetYenTail(Pkt.LocalFile);
\r
1402 strcat(Pkt.LocalFile, LocalPos->File);
\r
1403 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1405 strcpy(Pkt.Cmd, "STOR ");
\r
1406 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1408 Pkt.Time = LocalPos->Time;
\r
1409 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1410 Pkt.KanjiCode = AskHostKanjiCode();
\r
1412 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1413 Pkt.KanaCnv = AskHostKanaCnv();
\r
1414 Pkt.Mode = EXIST_OVW;
\r
1415 AddTmpTransFileList(&Pkt, &Base);
\r
1418 LocalPos = LocalPos->Next;
\r
1421 if((Notify == YES) ||
\r
1422 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
1424 if(AskNoFullPathMode() == YES)
\r
1426 strcpy(Pkt.Cmd, "SETCUR");
\r
1427 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1428 AddTransFileList(&Pkt);
\r
1430 AppendTransFileList(Base);
\r
1432 if(AskNoFullPathMode() == YES)
\r
1434 strcpy(Pkt.Cmd, "BACKCUR");
\r
1435 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1436 AddTransFileList(&Pkt);
\r
1439 strcpy(Pkt.Cmd, "GOQUIT");
\r
1440 AddTransFileList(&Pkt);
\r
1443 EraseTmpTransFileList(&Base);
\r
1445 DeleteFileList(&LocalListBase);
\r
1446 DeleteFileList(&RemoteListBase);
\r
1448 GoForwardTransWindow();
\r
1457 /*----- ミラーリング時のホスト側のフォルダ削除 --------------------------------
\r
1460 * FILELIST *Base : ファイルリスト
\r
1461 * TRANSPACKET *Pkt :
\r
1462 * TRANSPACKET **Base :
\r
1466 *----------------------------------------------------------------------------*/
\r
1468 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
1470 while(Remote != NULL)
\r
1472 if(Remote->Node == NODE_DIR)
\r
1474 MirrorDeleteAllDir(Remote->Next, Pkt, Base);
\r
1476 if(Remote->Attr == YES)
\r
1478 AskRemoteCurDir(Pkt->RemoteFile, FMAX_PATH);
\r
1479 SetSlashTail(Pkt->RemoteFile);
\r
1480 strcat(Pkt->RemoteFile, Remote->File);
\r
1481 ReplaceAll(Pkt->RemoteFile, '\\', '/');
\r
1482 strcpy(Pkt->LocalFile, "");
\r
1483 strcpy(Pkt->Cmd, "R-RMD ");
\r
1484 AddTmpTransFileList(Pkt, Base);
\r
1488 Remote = Remote->Next;
\r
1494 /*----- ミラーリングアップロード開始確認ウインドウのコールバック --------------
\r
1497 * HWND hDlg : ウインドウハンドル
\r
1498 * UINT message : メッセージ番号
\r
1499 * WPARAM wParam : メッセージの WPARAM 引数
\r
1500 * LPARAM lParam : メッセージの LPARAM 引数
\r
1504 *----------------------------------------------------------------------------*/
\r
1507 //static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1508 static INT_PTR CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1514 case WM_INITDIALOG :
\r
1519 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1522 EndDialog(hDlg, YES);
\r
1526 EndDialog(hDlg, NO);
\r
1529 case MIRRORUP_DISP :
\r
1530 EndDialog(hDlg, YES_LIST);
\r
1535 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000013);
\r
1537 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1545 /*----- ミラーリングアップロード処理内容確認ウインドウのコールバック ----------
\r
1548 * HWND hDlg : ウインドウハンドル
\r
1549 * UINT message : メッセージ番号
\r
1550 * WPARAM wParam : メッセージの WPARAM 引数
\r
1551 * LPARAM lParam : メッセージの LPARAM 引数
\r
1555 *----------------------------------------------------------------------------*/
\r
1558 //static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1559 static INT_PTR CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1561 static DIALOGSIZE DlgSize = {
\r
1562 { MIRROR_DEL, MIRROR_SIZEGRIP, -1 },
\r
1563 { IDOK, IDCANCEL, IDHELP, MIRROR_DEL, MIRROR_COPYNUM, MIRROR_MAKENUM, MIRROR_DELNUM, MIRROR_SIZEGRIP, -1 },
\r
1564 { MIRROR_LIST, -1 },
\r
1569 static TRANSPACKET **Base;
\r
1571 char Tmp[FMAX_PATH+1+6];
\r
1577 case WM_INITDIALOG :
\r
1578 Base = (TRANSPACKET **)lParam;
\r
1580 while(Pos != NULL)
\r
1583 if((strncmp(Pos->Cmd, "R-DELE", 6) == 0) ||
\r
1584 (strncmp(Pos->Cmd, "R-RMD", 5) == 0))
\r
1585 sprintf(Tmp, MSGJPN052, Pos->RemoteFile);
\r
1586 else if(strncmp(Pos->Cmd, "R-MKD", 5) == 0)
\r
1587 sprintf(Tmp, MSGJPN053, Pos->RemoteFile);
\r
1588 else if(strncmp(Pos->Cmd, "STOR", 4) == 0)
\r
1589 sprintf(Tmp, MSGJPN054, Pos->RemoteFile);
\r
1590 else if((strncmp(Pos->Cmd, "L-DELE", 6) == 0) ||
\r
1591 (strncmp(Pos->Cmd, "L-RMD", 5) == 0))
\r
1592 sprintf(Tmp, MSGJPN055, Pos->LocalFile);
\r
1593 else if(strncmp(Pos->Cmd, "L-MKD", 5) == 0)
\r
1594 sprintf(Tmp, MSGJPN056, Pos->LocalFile);
\r
1595 else if(strncmp(Pos->Cmd, "RETR", 4) == 0)
\r
1596 sprintf(Tmp, MSGJPN057, Pos->LocalFile);
\r
1598 if(strlen(Tmp) > 0)
\r
1599 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_ADDSTRING, 0, (LPARAM)Tmp);
\r
1602 CountMirrorFiles(hDlg, *Base);
\r
1603 DlgSizeInit(hDlg, &DlgSize, &MirrorDlgSize);
\r
1604 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1608 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1611 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1612 EndDialog(hDlg, YES);
\r
1616 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1617 EndDialog(hDlg, NO);
\r
1621 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0);
\r
1622 if((List = malloc(Num * sizeof(int))) != NULL)
\r
1624 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELITEMS, Num, (LPARAM)List);
\r
1625 for(Num--; Num >= 0; Num--)
\r
1627 if(RemoveTmpTransFileListItem(Base, List[Num]) == FFFTP_SUCCESS)
\r
1628 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_DELETESTRING, List[Num], 0);
\r
1633 CountMirrorFiles(hDlg, *Base);
\r
1637 case MIRROR_LIST :
\r
1638 switch(GET_WM_COMMAND_CMD(wParam, lParam))
\r
1640 case LBN_SELCHANGE :
\r
1641 if(SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0) > 0)
\r
1642 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), TRUE);
\r
1644 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1650 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1655 DlgSizeChange(hDlg, &DlgSize, (RECT *)lParam, (int)wParam);
\r
1662 /*----- ミラーリングで転送/削除するファイルの数を数えダイアログに表示---------
\r
1666 * TRANSPACKET *Pkt :
\r
1670 *----------------------------------------------------------------------------*/
\r
1672 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt)
\r
1682 while(Pkt != NULL)
\r
1684 if((strncmp(Pkt->Cmd, "R-DELE", 6) == 0) ||
\r
1685 (strncmp(Pkt->Cmd, "R-RMD", 5) == 0) ||
\r
1686 (strncmp(Pkt->Cmd, "L-DELE", 6) == 0) ||
\r
1687 (strncmp(Pkt->Cmd, "L-RMD", 5) == 0))
\r
1691 else if((strncmp(Pkt->Cmd, "R-MKD", 5) == 0) ||
\r
1692 (strncmp(Pkt->Cmd, "L-MKD", 5) == 0))
\r
1696 else if((strncmp(Pkt->Cmd, "STOR", 4) == 0) ||
\r
1697 (strncmp(Pkt->Cmd, "RETR", 4) == 0))
\r
1705 sprintf(Tmp, MSGJPN058, Copy);
\r
1707 sprintf(Tmp, MSGJPN059);
\r
1708 SendDlgItemMessage(hDlg, MIRROR_COPYNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1711 sprintf(Tmp, MSGJPN060, Make);
\r
1713 sprintf(Tmp, MSGJPN061);
\r
1714 SendDlgItemMessage(hDlg, MIRROR_MAKENUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1717 sprintf(Tmp, MSGJPN062, Del);
\r
1719 sprintf(Tmp, MSGJPN063);
\r
1720 SendDlgItemMessage(hDlg, MIRROR_DELNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1728 /*----- ミラーリングで転送/削除しないファイルかどうかを返す ------------------
\r
1731 * char Fname : ファイル名
\r
1733 * 0=転送しないファイル, 1=削除しないファイル
\r
1738 *----------------------------------------------------------------------------*/
\r
1740 static int AskMirrorNoTrn(char *Fname, int Mode)
\r
1745 Tbl = MirrorNoTrn;
\r
1747 Tbl = MirrorNoDel;
\r
1750 if(StrMultiLen(Tbl) > 0)
\r
1752 Fname = GetFileName(Fname);
\r
1753 while(*Tbl != NUL)
\r
1755 if(CheckFname(Fname, Tbl) == FFFTP_SUCCESS)
\r
1760 Tbl += strlen(Tbl) + 1;
\r
1767 /*----- アップロードするファイルの属性を返す ----------------------------------
\r
1770 * char Fname : ファイル名
\r
1773 * int 属性 (-1=設定なし)
\r
1774 *----------------------------------------------------------------------------*/
\r
1776 static int AskUpLoadFileAttr(char *Fname)
\r
1782 Tbl = DefAttrList;
\r
1783 Fname = GetFileName(Fname);
\r
1785 while(*Tbl != NUL)
\r
1787 Sts = CheckFname(Fname, Tbl);
\r
1788 Tbl += strlen(Tbl) + 1;
\r
1790 if((Sts == FFFTP_SUCCESS) && (*Tbl != NUL))
\r
1795 Tbl += strlen(Tbl) + 1;
\r
1801 /*----- ホストに同じ名前のファイルがないかチェック- ---------------------------a
\r
1804 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1805 * FILELIST *ListList :
\r
1809 * EXIST_OVW/EXIST_UNIQUE/EXIST_IGNORE
\r
1812 * Pkt.ExistSize, UpExistMode、ExistNotify が変更される
\r
1813 *----------------------------------------------------------------------------*/
\r
1815 static int CheckRemoteFile(TRANSPACKET *Pkt, FILELIST *ListList)
\r
1821 Pkt->ExistSize = 0;
\r
1822 if(SendMode != TRANS_OVW)
\r
1824 if((Exist = SearchFileList(GetFileName(Pkt->RemoteFile), ListList, COMP_STRICT)) != NULL)
\r
1826 Pkt->ExistSize = Exist->Size;
\r
1828 if(ExistNotify == YES)
\r
1830 SoundPlay(SND_ERROR);
\r
1831 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(up_exist_dlg), GetMainHwnd(), UpExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
1832 Ret = EXIST_ABORT;
\r
1834 Ret = UpExistMode;
\r
1837 Ret = UpExistMode;
\r
1839 if(Ret == EXIST_NEW)
\r
1842 if(CompareFileTime(&Exist->Time, &Pkt->Time) < 0)
\r
1845 Ret = EXIST_IGNORE;
\r
1853 /*----- ホストに同じ名前のファイルがある時の確認ダイアログのコールバック ------
\r
1856 * HWND hDlg : ウインドウハンドル
\r
1857 * UINT message : メッセージ番号
\r
1858 * WPARAM wParam : メッセージの WPARAM 引数
\r
1859 * LPARAM lParam : メッセージの LPARAM 引数
\r
1863 *----------------------------------------------------------------------------*/
\r
1866 //static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1867 static INT_PTR CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1869 static TRANSPACKET *Pkt;
\r
1870 static const RADIOBUTTON UpExistButton[] = {
\r
1871 { UP_EXIST_OVW, EXIST_OVW },
\r
1872 { UP_EXIST_NEW, EXIST_NEW },
\r
1873 { UP_EXIST_RESUME, EXIST_RESUME },
\r
1874 { UP_EXIST_UNIQUE, EXIST_UNIQUE },
\r
1875 { UP_EXIST_IGNORE, EXIST_IGNORE }
\r
1877 #define UPEXISTBUTTONS (sizeof(UpExistButton)/sizeof(RADIOBUTTON))
\r
1881 case WM_INITDIALOG :
\r
1882 Pkt = (TRANSPACKET *)lParam;
\r
1883 SendDlgItemMessage(hDlg, UP_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1884 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->RemoteFile);
\r
1886 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
1887 EnableWindow(GetDlgItem(hDlg, UP_EXIST_RESUME), FALSE);
\r
1889 SetRadioButtonByValue(hDlg, UpExistMode, UpExistButton, UPEXISTBUTTONS);
\r
1893 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1897 /* ここに break はない */
\r
1900 UpExistMode = AskRadioButtonValue(hDlg, UpExistButton, UPEXISTBUTTONS);
\r
1901 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->RemoteFile);
\r
1902 EndDialog(hDlg, YES);
\r
1906 // Pkt->Abort = ABORT_USER;
\r
1907 // UpExistMode = EXIST_IGNORE;
\r
1908 EndDialog(hDlg, NO);
\r
1912 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000011);
\r
1921 /*----- アップロード/ダウンロードファイル名入力ダイアログのコールバック ------
\r
1924 * HWND hDlg : ウインドウハンドル
\r
1925 * UINT message : メッセージ番号
\r
1926 * WPARAM wParam : メッセージの WPARAM 引数
\r
1927 * LPARAM lParam : メッセージの LPARAM 引数
\r
1931 *----------------------------------------------------------------------------*/
\r
1934 //static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1935 static INT_PTR CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1939 case WM_INITDIALOG :
\r
1940 if(CurWin == WIN_LOCAL)
\r
1941 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN064);
\r
1943 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN065);
\r
1945 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1946 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1947 SendDlgItemMessage(hDlg, UPDOWNAS_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1951 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1954 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
1955 EndDialog(hDlg, YES);
\r
1958 case UPDOWNAS_STOP :
\r
1959 EndDialog(hDlg, NO_ALL);
\r
1968 /*----- ファイル一覧で指定されたファイルを削除する ----------------------------
\r
1975 *----------------------------------------------------------------------------*/
\r
1977 void DeleteProc(void)
\r
1980 FILELIST *FileListBase;
\r
1984 char CurDir[FMAX_PATH+1];
\r
1985 char Tmp[FMAX_PATH+1];
\r
1993 AskRemoteCurDir(CurDir, FMAX_PATH);
\r
1994 FileListBase = NULL;
\r
1995 if(GetFocus() == GetLocalHwnd())
\r
1998 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2003 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2004 MakeSelectedFileList(Win, YES, NO, &FileListBase, &CancelFlg);
\r
2012 // DisableUserOpe();
\r
2016 Pos = FileListBase;
\r
2017 while(Pos != NULL)
\r
2019 if(Pos->Node == NODE_FILE)
\r
2021 DelNotifyAndDo(Pos, Win, &Sts, &DelFlg, CurDir);
\r
2029 DeleteAllDir(FileListBase, Win, &Sts, &DelFlg, CurDir);
\r
2031 if(Win == WIN_REMOTE)
\r
2033 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
2034 if(strcmp(Tmp, CurDir) != 0)
\r
2035 DoCWD(Tmp, NO, NO, NO);
\r
2038 DeleteFileList(&FileListBase);
\r
2042 if(Win == WIN_LOCAL)
\r
2043 GetLocalDirForWnd();
\r
2045 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2049 // EnableUserOpe();
\r
2057 /*----- サブディレクトリ以下を全て削除する ------------------------------------
\r
2060 * FILELIST *Dt : 削除するファイルのリスト
\r
2061 * int Win : ウインドウ番号 (WIN_xxx)
\r
2062 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2063 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2064 * char *CurDir : カレントディレクトリ
\r
2068 *----------------------------------------------------------------------------*/
\r
2070 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2074 if(Dt->Node == NODE_DIR)
\r
2076 DeleteAllDir(Dt->Next, Win, Sw, Flg, CurDir);
\r
2080 DelNotifyAndDo(Dt, Win, Sw, Flg, CurDir);
\r
2089 /*----- 削除するかどうかの確認と削除実行 --------------------------------------
\r
2092 * FILELIST *Dt : 削除するファイルのリスト
\r
2093 * int Win : ウインドウ番号 (WIN_xxx)
\r
2094 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2095 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2096 * char *CurDir : カレントディレクトリ
\r
2100 *----------------------------------------------------------------------------*/
\r
2102 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2104 char Path[FMAX_PATH+1];
\r
2106 if(Win == WIN_LOCAL)
\r
2108 AskLocalCurDir(Path, FMAX_PATH);
\r
2110 strcat(Path, Dt->File);
\r
2111 ReplaceAll(Path, '/', '\\');
\r
2115 AskRemoteCurDir(Path, FMAX_PATH);
\r
2116 SetSlashTail(Path);
\r
2117 strcat(Path, Dt->File);
\r
2118 ReplaceAll(Path, '\\', '/');
\r
2121 if(*Sw != YES_ALL)
\r
2123 sprintf(TmpString, "%s", Path);
\r
2125 // ローカルのファイルのパスの最後の'\\'が消えるバグ修正
\r
2126 // if(AskHostType() == HTYPE_VMS)
\r
2127 if(Win == WIN_REMOTE && AskHostType() == HTYPE_VMS)
\r
2128 ReformToVMSstylePathName(TmpString);
\r
2131 *Sw = DialogBox(GetFtpInst(), MAKEINTRESOURCE(delete_dlg), GetMainHwnd(), DeleteDialogCallBack);
\r
2134 if((*Sw == YES) || (*Sw == YES_ALL))
\r
2136 if(Win == WIN_LOCAL)
\r
2138 if(Dt->Node == NODE_FILE)
\r
2139 DoLocalDELE(Path);
\r
2146 /* フルパスを使わない時のための処理 */
\r
2148 // if(ProcForNonFullpath(Path, CurDir, GetMainHwnd(), 0) == FFFTP_FAIL)
\r
2149 if(ProcForNonFullpath(AskCmdCtrlSkt(), Path, CurDir, GetMainHwnd(), &CancelFlg) == FFFTP_FAIL)
\r
2154 if(Dt->Node == NODE_FILE)
\r
2166 /*----- ファイル削除ダイアログのコールバック ----------------------------------
\r
2169 * HWND hDlg : ウインドウハンドル
\r
2170 * UINT message : メッセージ番号
\r
2171 * WPARAM wParam : メッセージの WPARAM 引数
\r
2172 * LPARAM lParam : メッセージの LPARAM 引数
\r
2176 *----------------------------------------------------------------------------*/
\r
2179 //static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2180 static INT_PTR CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2184 case WM_INITDIALOG :
\r
2185 if(CurWin == WIN_LOCAL)
\r
2186 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN066);
\r
2188 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN067);
\r
2189 SendDlgItemMessage(hDlg, DELETE_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2193 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2196 EndDialog(hDlg, YES);
\r
2200 EndDialog(hDlg, NO);
\r
2204 EndDialog(hDlg, YES_ALL);
\r
2208 EndDialog(hDlg, NO_ALL);
\r
2217 /*----- ファイル一覧で指定されたファイルの名前を変更する ----------------------
\r
2224 *----------------------------------------------------------------------------*/
\r
2226 void RenameProc(void)
\r
2229 FILELIST *FileListBase;
\r
2231 char New[FMAX_PATH+1];
\r
2238 Sts = FFFTP_SUCCESS;
\r
2239 if(GetFocus() == GetLocalHwnd())
\r
2244 Sts = CheckClosedAndReconnect();
\r
2247 if(Sts == FFFTP_SUCCESS)
\r
2251 FileListBase = NULL;
\r
2252 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2256 Pos = FileListBase;
\r
2257 while(Pos != NULL)
\r
2259 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2261 strcpy(TmpString, Pos->File);
\r
2263 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2268 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2270 strcpy(New, TmpString);
\r
2271 if(Win == WIN_LOCAL)
\r
2272 DoLocalRENAME(Pos->File, New);
\r
2274 DoRENAME(Pos->File, New);
\r
2280 DeleteFileList(&FileListBase);
\r
2284 if(Win == WIN_LOCAL)
\r
2285 GetLocalDirForWnd();
\r
2287 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2297 // リモート側でのファイルの移動(リネーム)を行う
\r
2299 // RenameProc()をベースに改造。(2007.9.5 yutaka)
\r
2301 void MoveRemoteFileProc(int drop_index)
\r
2304 FILELIST *FileListBase;
\r
2307 char New[FMAX_PATH+1];
\r
2308 char Old[FMAX_PATH+1];
\r
2309 char HostDir[FMAX_PATH+1];
\r
2316 if(MoveMode == MOVE_DISABLE)
\r
2321 AskRemoteCurDir(HostDir, FMAX_PATH);
\r
2324 GetNodeName(WIN_REMOTE, drop_index, Pkt.File, FMAX_PATH);
\r
2326 if(MoveMode == MOVE_DLG)
\r
2328 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(move_notify_dlg), GetRemoteHwnd(), ExeEscTextDialogProc, (LPARAM)Pkt.File) == NO)
\r
2334 Sts = FFFTP_SUCCESS;
\r
2336 if(GetFocus() == GetLocalHwnd())
\r
2341 Sts = CheckClosedAndReconnect();
\r
2345 Sts = CheckClosedAndReconnect();
\r
2348 if(Sts == FFFTP_SUCCESS)
\r
2352 FileListBase = NULL;
\r
2353 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2357 Pos = FileListBase;
\r
2358 while(Pos != NULL)
\r
2360 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2362 strcpy(TmpString, Pos->File);
\r
2365 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2373 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2376 strncpy_s(Old, sizeof(Old), HostDir, _TRUNCATE);
\r
2377 strncat_s(Old, sizeof(Old), "/", _TRUNCATE);
\r
2378 strncat_s(Old, sizeof(Old), Pos->File, _TRUNCATE);
\r
2381 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2382 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2383 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2384 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2385 strncat_s(New, sizeof(New), Pos->File, _TRUNCATE);
\r
2387 if(Win == WIN_LOCAL)
\r
2388 DoLocalRENAME(Old, New);
\r
2390 DoRENAME(Old, New);
\r
2396 DeleteFileList(&FileListBase);
\r
2400 if(Win == WIN_LOCAL) {
\r
2401 GetLocalDirForWnd();
\r
2403 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2405 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2406 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2407 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2408 DoCWD(New, YES, YES, YES);
\r
2409 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2420 /*----- 新ファイル名入力ダイアログのコールバック ------------------------------
\r
2423 * HWND hDlg : ウインドウハンドル
\r
2424 * UINT message : メッセージ番号
\r
2425 * WPARAM wParam : メッセージの WPARAM 引数
\r
2426 * LPARAM lParam : メッセージの LPARAM 引数
\r
2430 *----------------------------------------------------------------------------*/
\r
2433 //static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2434 static INT_PTR CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2438 case WM_INITDIALOG :
\r
2439 if(CurWin == WIN_LOCAL)
\r
2440 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN068);
\r
2442 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN069);
\r
2443 SendDlgItemMessage(hDlg, RENAME_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
2444 SendDlgItemMessage(hDlg, RENAME_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2445 SendDlgItemMessage(hDlg, RENAME_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2449 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2452 SendDlgItemMessage(hDlg, RENAME_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
2453 EndDialog(hDlg, YES);
\r
2457 EndDialog(hDlg, NO);
\r
2460 case RENAME_STOP :
\r
2461 EndDialog(hDlg, NO_ALL);
\r
2470 /*----- 新しいディレクトリを作成する ------------------------------------------
\r
2477 *----------------------------------------------------------------------------*/
\r
2479 void MkdirProc(void)
\r
2483 char Path[FMAX_PATH+1];
\r
2490 if(GetFocus() == GetLocalHwnd())
\r
2493 Title = MSGJPN070;
\r
2498 Title = MSGJPN071;
\r
2502 Sts = InputDialogBox(mkdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2504 if((Sts == YES) && (strlen(Path) != 0))
\r
2506 if(Win == WIN_LOCAL)
\r
2510 GetLocalDirForWnd();
\r
2515 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2519 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2528 /*----- ヒストリリストを使ったディレクトリの移動 ------------------------------
\r
2531 * HWND hWnd : コンボボックスのウインドウハンドル
\r
2535 *----------------------------------------------------------------------------*/
\r
2537 void ChangeDirComboProc(HWND hWnd)
\r
2539 char Tmp[FMAX_PATH+1];
\r
2545 if((i = SendMessage(hWnd, CB_GETCURSEL, 0, 0)) != CB_ERR)
\r
2547 SendMessage(hWnd, CB_GETLBTEXT, i, (LPARAM)Tmp);
\r
2549 if(hWnd == GetLocalHistHwnd())
\r
2553 GetLocalDirForWnd();
\r
2558 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2561 if(DoCWD(Tmp, YES, NO, YES) < FTP_RETRY)
\r
2562 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2571 /*----- ブックマークを使ったディレクトリの移動 --------------------------------
\r
2574 * int MarkID : ブックマークのメニューID
\r
2578 *----------------------------------------------------------------------------*/
\r
2580 void ChangeDirBmarkProc(int MarkID)
\r
2582 char Local[FMAX_PATH+1];
\r
2583 char Remote[FMAX_PATH+1];
\r
2589 Sts = AskBookMarkText(MarkID, Local, Remote, FMAX_PATH+1);
\r
2590 if((Sts == BMARK_TYPE_LOCAL) || (Sts == BMARK_TYPE_BOTH))
\r
2593 if(DoLocalCWD(Local) == FFFTP_SUCCESS)
\r
2594 GetLocalDirForWnd();
\r
2598 if((Sts == BMARK_TYPE_REMOTE) || (Sts == BMARK_TYPE_BOTH))
\r
2600 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2603 if(DoCWD(Remote, YES, NO, YES) < FTP_RETRY)
\r
2604 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2612 /*----- ディレクトリ名を入力してディレクトリの移動 ----------------------------
\r
2615 * int Win : ウインドウ番号 (WIN_xxx)
\r
2619 *----------------------------------------------------------------------------*/
\r
2621 void ChangeDirDirectProc(int Win)
\r
2624 char Path[FMAX_PATH+1];
\r
2631 if(Win == WIN_LOCAL)
\r
2632 Title = MSGJPN072;
\r
2634 Title = MSGJPN073;
\r
2637 if(Win == WIN_LOCAL)
\r
2638 Sts = InputDialogBox(chdir_br_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2640 Sts = InputDialogBox(chdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2642 if((Sts == YES) && (strlen(Path) != 0))
\r
2644 if(Win == WIN_LOCAL)
\r
2648 GetLocalDirForWnd();
\r
2653 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2656 if(DoCWD(Path, YES, NO, YES) < FTP_RETRY)
\r
2657 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2666 /*----- Dropされたファイルによるディレクトリの移動 ----------------------------
\r
2669 * WPARAM wParam : ドロップされたファイルの情報
\r
2673 *----------------------------------------------------------------------------*/
\r
2675 void ChangeDirDropFileProc(WPARAM wParam)
\r
2677 char Path[FMAX_PATH+1];
\r
2680 MakeDroppedDir(wParam, Path);
\r
2682 GetLocalDirForWnd();
\r
2688 /*----- ファイルの属性変更 ----------------------------------------------------
\r
2695 *----------------------------------------------------------------------------*/
\r
2697 void ChmodProc(void)
\r
2700 FILELIST *FileListBase;
\r
2710 if(GetFocus() == GetRemoteHwnd())
\r
2712 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2715 FileListBase = NULL;
\r
2716 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2717 if(FileListBase != NULL)
\r
2719 sprintf(Tmp, "%03X", FileListBase->Attr);
\r
2720 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(chmod_dlg), GetMainHwnd(), ChmodDialogCallBack, (LPARAM)Tmp) == YES)
\r
2723 Pos = FileListBase;
\r
2724 while(Pos != NULL)
\r
2726 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2728 DoCHMOD(Pos->File, Tmp);
\r
2733 if(ChmodFlg == YES)
\r
2734 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2737 DeleteFileList(&FileListBase);
\r
2741 else if(GetFocus() == GetLocalHwnd())
\r
2744 FileListBase = NULL;
\r
2745 MakeSelectedFileList(WIN_LOCAL, NO, NO, &FileListBase, &CancelFlg);
\r
2746 if(FileListBase != NULL)
\r
2748 if((Buf = malloc(1)) != NULL)
\r
2752 Pos = FileListBase;
\r
2753 while(Pos != NULL)
\r
2755 if((BufTmp = realloc(Buf, BufLen + strlen(Pos->File) + 2)) != NULL)
\r
2758 strcpy(Buf+BufLen, Pos->File);
\r
2759 BufLen += strlen(Pos->File) + 1;
\r
2764 memset(Buf+BufLen, NUL, 1);
\r
2765 DispFileProperty(Buf);
\r
2769 DeleteFileList(&FileListBase);
\r
2776 /*----- 属性変更ダイアログのコールバック --------------------------------------
\r
2779 * HWND hDlg : ウインドウハンドル
\r
2780 * UINT message : メッセージ番号
\r
2781 * WPARAM wParam : メッセージの WPARAM 引数
\r
2782 * LPARAM lParam : メッセージの LPARAM 引数
\r
2786 *----------------------------------------------------------------------------*/
\r
2789 //BOOL CALLBACK ChmodDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2790 INT_PTR CALLBACK ChmodDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2798 case WM_INITDIALOG :
\r
2799 Buf = (char *)lParam;
\r
2800 SendDlgItemMessage(hDlg, PERM_NOW, EM_LIMITTEXT, 4, 0);
\r
2801 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Buf);
\r
2802 SetAttrToDialog(hDlg, xtoi(Buf));
\r
2806 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2809 SendDlgItemMessage(hDlg, PERM_NOW, WM_GETTEXT, 5, (LPARAM)Buf);
\r
2810 EndDialog(hDlg, YES);
\r
2814 EndDialog(hDlg, NO);
\r
2817 case PERM_O_READ :
\r
2818 case PERM_O_WRITE :
\r
2819 case PERM_O_EXEC :
\r
2820 case PERM_G_READ :
\r
2821 case PERM_G_WRITE :
\r
2822 case PERM_G_EXEC :
\r
2823 case PERM_A_READ :
\r
2824 case PERM_A_WRITE :
\r
2825 case PERM_A_EXEC :
\r
2826 Tmp = GetAttrFromDialog(hDlg);
\r
2827 sprintf(Str, "%03X", Tmp);
\r
2828 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Str);
\r
2832 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000017);
\r
2841 /*----- 属性をダイアログボックスに設定 ----------------------------------------
\r
2844 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2849 *----------------------------------------------------------------------------*/
\r
2851 static void SetAttrToDialog(HWND hDlg, int Attr)
\r
2854 SendDlgItemMessage(hDlg, PERM_O_READ, BM_SETCHECK, 1, 0);
\r
2856 SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_SETCHECK, 1, 0);
\r
2858 SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_SETCHECK, 1, 0);
\r
2861 SendDlgItemMessage(hDlg, PERM_G_READ, BM_SETCHECK, 1, 0);
\r
2863 SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_SETCHECK, 1, 0);
\r
2865 SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_SETCHECK, 1, 0);
\r
2868 SendDlgItemMessage(hDlg, PERM_A_READ, BM_SETCHECK, 1, 0);
\r
2870 SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_SETCHECK, 1, 0);
\r
2872 SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_SETCHECK, 1, 0);
\r
2878 /*----- ダイアログボックスの内容から属性を取得 --------------------------------
\r
2881 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2885 *----------------------------------------------------------------------------*/
\r
2887 static int GetAttrFromDialog(HWND hDlg)
\r
2893 if(SendDlgItemMessage(hDlg, PERM_O_READ, BM_GETCHECK, 0, 0) == 1)
\r
2895 if(SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2897 if(SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2900 if(SendDlgItemMessage(hDlg, PERM_G_READ, BM_GETCHECK, 0, 0) == 1)
\r
2902 if(SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2904 if(SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2907 if(SendDlgItemMessage(hDlg, PERM_A_READ, BM_GETCHECK, 0, 0) == 1)
\r
2909 if(SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2911 if(SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2920 /*----- 任意のコマンドを送る --------------------------------------------------
\r
2927 *----------------------------------------------------------------------------*/
\r
2929 void SomeCmdProc(void)
\r
2933 FILELIST *FileListBase;
\r
2938 if(GetFocus() == GetRemoteHwnd())
\r
2940 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2943 FileListBase = NULL;
\r
2944 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2945 memset(Cmd, NUL, 81);
\r
2946 if(FileListBase != NULL)
\r
2948 strncpy(Cmd, FileListBase->File, 80);
\r
2950 DeleteFileList(&FileListBase);
\r
2952 if(InputDialogBox(somecmd_dlg, GetMainHwnd(), NULL, Cmd, 81, &Tmp, IDH_HELP_TOPIC_0000023) == YES)
\r
2965 /*----- ファイル総容量の計算を行う --------------------------------------------
\r
2972 *----------------------------------------------------------------------------*/
\r
2974 void CalcFileSizeProc(void)
\r
2976 FILELIST *ListBase;
\r
2985 if((All = DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_notify_dlg), GetMainHwnd(), SizeNotifyDlgWndProc)) != NO_ALL)
\r
2987 Sts = FFFTP_SUCCESS;
\r
2988 if(GetFocus() == GetLocalHwnd())
\r
2993 Sts = CheckClosedAndReconnect();
\r
2996 if(Sts == FFFTP_SUCCESS)
\r
2999 MakeSelectedFileList(Win, YES, All, &ListBase, &CancelFlg);
\r
3003 while(Pos != NULL)
\r
3005 if(Pos->Node != NODE_DIR)
\r
3006 FileSize += Pos->Size;
\r
3009 DeleteFileList(&ListBase);
\r
3010 DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_dlg), GetMainHwnd(), SizeDlgWndProc);
\r
3017 /*----- ファイル容量検索確認ダイアログのコールバック --------------------------
\r
3020 * HWND hDlg : ウインドウハンドル
\r
3021 * UINT message : メッセージ番号
\r
3022 * WPARAM wParam : メッセージの WPARAM 引数
\r
3023 * LPARAM lParam : メッセージの LPARAM 引数
\r
3027 *----------------------------------------------------------------------------*/
\r
3029 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
3033 case WM_INITDIALOG :
\r
3034 if(GetFocus() == GetLocalHwnd())
\r
3035 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN074);
\r
3037 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN075);
\r
3041 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3044 if(SendDlgItemMessage(hDlg, FSNOTIFY_SEL_ONLY, BM_GETCHECK, 0, 0) == 1)
\r
3045 EndDialog(hDlg, NO);
\r
3047 EndDialog(hDlg, YES);
\r
3051 EndDialog(hDlg, NO_ALL);
\r
3060 /*----- ファイル容量検索ダイアログのコールバック ------------------------------
\r
3063 * HWND hDlg : ウインドウハンドル
\r
3064 * UINT message : メッセージ番号
\r
3065 * WPARAM wParam : メッセージの WPARAM 引数
\r
3066 * LPARAM lParam : メッセージの LPARAM 引数
\r
3070 *----------------------------------------------------------------------------*/
\r
3072 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
3074 char Tmp[FMAX_PATH+1];
\r
3078 case WM_INITDIALOG :
\r
3079 if(GetFocus() == GetLocalHwnd())
\r
3080 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN076);
\r
3082 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN077);
\r
3084 MakeSizeString(FileSize, Tmp);
\r
3085 SendDlgItemMessage(hDlg, FSIZE_SIZE, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
3089 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3093 EndDialog(hDlg, YES);
\r
3103 /*----- ディレクトリ移動失敗時のエラーを表示 ----------------------------------
\r
3106 * HWND hDlg : ウインドウハンドル
\r
3110 *----------------------------------------------------------------------------*/
\r
3112 void DispCWDerror(HWND hWnd)
\r
3114 DialogBox(GetFtpInst(), MAKEINTRESOURCE(cwderr_dlg), hWnd, ExeEscDialogProc);
\r
3119 /*----- URLをクリップボードにコピー -------------------------------------------
\r
3126 *----------------------------------------------------------------------------*/
\r
3128 void CopyURLtoClipBoard(void)
\r
3130 FILELIST *FileListBase;
\r
3133 char Path[FMAX_PATH+1];
\r
3134 char Host[HOST_ADRS_LEN+1];
\r
3139 if(GetFocus() == GetRemoteHwnd())
\r
3141 FileListBase = NULL;
\r
3142 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
3143 if(FileListBase != NULL)
\r
3145 strcpy(Host, AskHostAdrs());
\r
3148 Pos = FileListBase;
\r
3149 while(Pos != NULL)
\r
3151 AskRemoteCurDir(Path, FMAX_PATH);
\r
3152 SetSlashTail(Path);
\r
3153 strcat(Path, Pos->File);
\r
3155 if(AskHostType() == HTYPE_VMS)
\r
3156 ReformToVMSstylePathName(Path);
\r
3159 if(AskHostPort() != PORT_NOR)
\r
3160 sprintf(Port, ":%d", AskHostPort());
\r
3163 Total += strlen(Path) + strlen(Host) + strlen(Port) + 8; /* 8は "ftp://\r\n" のぶん */
\r
3164 if(AskHostType() == HTYPE_VMS)
\r
3167 if((Buf = realloc(Buf, Total+1)) == NULL)
\r
3170 if(AskHostType() != HTYPE_VMS)
\r
3171 sprintf(Buf + Set, "ftp://%s%s%s\r\n", Host, Port, Path);
\r
3173 sprintf(Buf + Set, "ftp://%s%s/%s\r\n", Host, Port, Path);
\r
3180 CopyStrToClipBoard(Buf);
\r
3184 DeleteFileList(&FileListBase);
\r
3190 /*----- フルパスを使わないファイルアクセスの準備 ------------------------------
\r
3193 * char *Path : パス名
\r
3194 * char *CurDir : カレントディレクトリ
\r
3195 * HWND hWnd : エラーウインドウを表示する際の親ウインドウ
\r
3196 * int Type : 使用するソケットの種類
\r
3197 * 0=コマンドソケット, 1=転送ソケット
\r
3200 * int ステータス(FFFTP_SUCCESS/FFFTP_FAIL)
\r
3204 * このモジュール内で CWD を行ない、
\r
3205 * Path にファイル名のみ残す。(パス名は消す)
\r
3206 *----------------------------------------------------------------------------*/
\r
3209 //int ProcForNonFullpath(char *Path, char *CurDir, HWND hWnd, int Type)
\r
3210 int ProcForNonFullpath(SOCKET cSkt, char *Path, char *CurDir, HWND hWnd, int *CancelCheckWork)
\r
3214 char Tmp[FMAX_PATH+1];
\r
3216 Sts = FFFTP_SUCCESS;
\r
3217 if(AskNoFullPathMode() == YES)
\r
3219 strcpy(Tmp, Path);
\r
3220 if(AskHostType() == HTYPE_VMS)
\r
3222 GetUpperDirEraseTopSlash(Tmp);
\r
3223 ReformToVMSstyleDirName(Tmp);
\r
3225 else if(AskHostType() == HTYPE_STRATUS)
\r
3226 GetUpperDirEraseTopSlash(Tmp);
\r
3230 if(strcmp(Tmp, CurDir) != 0)
\r
3234 // Cmd = CommandProcCmd(NULL, "CWD %s", Tmp);
\r
3236 // Cmd = CommandProcTrn(NULL, "CWD %s", Tmp);
\r
3237 Cmd = CommandProcTrn(cSkt, NULL, CancelCheckWork, "CWD %s", Tmp);
\r
3239 if(Cmd/100 != FTP_COMPLETE)
\r
3241 DispCWDerror(hWnd);
\r
3245 strcpy(CurDir, Tmp);
\r
3247 strcpy(Path, GetFileName(Path));
\r
3253 /*----- ディレクトリ名をVAX VMSスタイルに変換する -----------------------------
\r
3256 * char *Path : パス名
\r
3262 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr.ppp]
\r
3263 *----------------------------------------------------------------------------*/
\r
3265 void ReformToVMSstyleDirName(char *Path)
\r
3270 if((Btm = strchr(Path, ']')) != NULL)
\r
3273 while((Pos = strchr(Pos, '/')) != NULL)
\r
3276 memmove(Btm, Btm+1, strlen(Btm+1)+1);
\r
3277 Pos = strchr(Path, NUL);
\r
3278 if(*(Pos-1) == '.')
\r
3289 /*----- ファイル名をVAX VMSスタイルに変換する ---------------------------------
\r
3292 * char *Path : パス名
\r
3298 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr]ppp
\r
3299 *----------------------------------------------------------------------------*/
\r
3301 void ReformToVMSstylePathName(char *Path)
\r
3303 char Fname[FMAX_PATH+1];
\r
3305 strcpy(Fname, GetFileName(Path));
\r
3307 GetUpperDirEraseTopSlash(Path);
\r
3308 ReformToVMSstyleDirName(Path);
\r
3310 strcat(Path, Fname);
\r
3316 #if defined(HAVE_OPENVMS)
\r
3317 /*----- VMSの"HOGE.DIR;?"というディレクトリ名から"HOGE"を取り出す ---------------
\r
3320 * char *DirName : "HOGE.DIR;?"形式のディレクトリ名
\r
3321 * int Flg : ";"のチェックをする(TRUE)かしない(FALSE)か
\r
3328 *----------------------------------------------------------------------------*/
\r
3330 void ReformVMSDirName(char *DirName, int Flg)
\r
3334 if (Flg == TRUE) {
\r
3335 /* ';'がない場合はVMS形式じゃなさそうなので何もしない */
\r
3336 if ((p = strrchr(DirName, ';')) == NULL)
\r
3340 /* ".DIR"があったらつぶす */
\r
3341 if ((p = strrchr(DirName, '.'))) {
\r
3342 if (memcmp(p + 1, "DIR", 3) == 0)
\r
3349 /*----- ファイル名に使えない文字がないかチェックし名前を変更する --------------
\r
3352 * char *Fname : ファイル名
\r
3356 * FFFTP_SUCCESS/FFFTP_FAIL=中止する
\r
3360 *----------------------------------------------------------------------------*/
\r
3362 static int RenameUnuseableName(char *Fname)
\r
3367 Ret = FFFTP_SUCCESS;
\r
3370 if((_mbschr(Fname, ':') != NULL) ||
\r
3371 (_mbschr(Fname, '*') != NULL) ||
\r
3372 (_mbschr(Fname, '?') != NULL) ||
\r
3373 (_mbschr(Fname, '<') != NULL) ||
\r
3374 (_mbschr(Fname, '>') != NULL) ||
\r
3375 (_mbschr(Fname, '|') != NULL) ||
\r
3376 (_mbschr(Fname, '\x22') != NULL) ||
\r
3377 (_mbschr(Fname, '\\') != NULL))
\r
3379 if(InputDialogBox(forcerename_dlg, GetMainHwnd(), NULL, Fname, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001) == NO)
\r
3393 // NOOPコマンドでは効果が無いホストが多いためLISTコマンドを使用
\r
3394 void NoopProc(void)
\r
3396 int CancelCheckWork;
\r
3397 CancelCheckWork = NO;
\r
3398 if(AskConnecting() == YES && AskUserOpeDisabled() == NO)
\r
3400 if(AskReuseCmdSkt() == NO || AskShareProh() == YES)
\r
3403 DoDirListCmdSkt("", "", 999, &CancelCheckWork);
\r