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
55 static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
57 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote);
\r
58 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base);
\r
59 static int CheckLocalFile(TRANSPACKET *Pkt);
\r
60 static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
61 static void RemoveAfterSemicolon(char *Path);
\r
62 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base);
\r
63 static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
64 static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
65 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt);
\r
66 static int AskMirrorNoTrn(char *Fname, int Mode);
\r
67 static int AskUpLoadFileAttr(char *Fname);
\r
68 static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
69 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir);
\r
70 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir);
\r
71 static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
72 static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
73 static void SetAttrToDialog(HWND hWnd, int Attr);
\r
74 static int GetAttrFromDialog(HWND hDlg);
\r
75 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
76 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
77 static int RenameUnuseableName(char *Fname);
\r
81 extern HWND hHelpWin;
\r
84 extern int FnameCnv;
\r
85 extern int RecvMode;
\r
86 extern int SendMode;
\r
87 extern int MoveMode;
\r
88 extern char MirrorNoTrn[MIRROR_LEN+1];
\r
89 extern char MirrorNoDel[MIRROR_LEN+1];
\r
90 extern int MirrorFnameCnv;
\r
91 extern char DefAttrList[DEFATTRLIST_LEN+1];
\r
92 extern SIZE MirrorDlgSize;
\r
93 extern int VaxSemicolon;
\r
94 extern int DebugConsole;
\r
95 extern int CancelFlg;
\r
97 /*===== ローカルなワーク =====*/
\r
99 static char TmpString[FMAX_PATH+80]; /* テンポラリ */
\r
100 static int CurWin; /* ウインドウ番号 */
\r
102 int UpExistMode = EXIST_OVW; /* アップロードで同じ名前のファイルがある時の扱い方 EXIST_xxx */
\r
103 int ExistMode = EXIST_OVW; /* 同じ名前のファイルがある時の扱い方 EXIST_xxx */
\r
104 static int ExistNotify; /* 確認ダイアログを出すかどうか YES/NO */
\r
106 static double FileSize; /* ファイル総容量 */
\r
110 /*----- ファイル一覧で指定されたファイルをダウンロードする --------------------
\r
113 * int ChName : 名前を変えるかどうか (YES/NO)
\r
114 * int ForceFile : ディレクトリをファイル見なすかどうか (YES/NO)
\r
115 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
119 *----------------------------------------------------------------------------*/
\r
121 void DownLoadProc(int ChName, int ForceFile, int All)
\r
123 FILELIST *FileListBase;
\r
130 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
135 // KeepTransferDialog(YES);
\r
137 FileListBase = NULL;
\r
138 MakeSelectedFileList(WIN_REMOTE, (ForceFile == YES ? NO : YES), All, &FileListBase, &CancelFlg);
\r
140 if(AskNoFullPathMode() == YES)
\r
142 strcpy(Pkt.Cmd, "SETCUR");
\r
143 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
144 AddTransFileList(&Pkt);
\r
147 Pos = FileListBase;
\r
150 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
151 SetYenTail(Pkt.LocalFile);
\r
152 strcpy(TmpString, Pos->File);
\r
153 if((ChName == NO) || ((ForceFile == NO) && (Pos->Node == NODE_DIR)))
\r
155 if(FnameCnv == FNAME_LOWER)
\r
156 _mbslwr(TmpString);
\r
157 else if(FnameCnv == FNAME_UPPER)
\r
158 _mbsupr(TmpString);
\r
159 RemoveAfterSemicolon(TmpString);
\r
160 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
165 CurWin = WIN_REMOTE;
\r
166 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
168 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
174 strcat(Pkt.LocalFile, TmpString);
\r
175 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
177 if((ForceFile == NO) && (Pos->Node == NODE_DIR))
\r
179 strcpy(Pkt.Cmd, "MKD ");
\r
180 strcpy(Pkt.RemoteFile, "");
\r
181 AddTransFileList(&Pkt);
\r
183 else if((Pos->Node == NODE_FILE) ||
\r
184 ((ForceFile == YES) && (Pos->Node == NODE_DIR)))
\r
186 if(AskHostType() == HTYPE_ACOS)
\r
188 strcpy(Pkt.RemoteFile, "'");
\r
189 strcat(Pkt.RemoteFile, AskHostLsName());
\r
190 strcat(Pkt.RemoteFile, "(");
\r
191 strcat(Pkt.RemoteFile, Pos->File);
\r
192 strcat(Pkt.RemoteFile, ")");
\r
193 strcat(Pkt.RemoteFile, "'");
\r
195 else if(AskHostType() == HTYPE_ACOS_4)
\r
197 strcpy(Pkt.RemoteFile, Pos->File);
\r
201 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
202 SetSlashTail(Pkt.RemoteFile);
\r
203 strcat(Pkt.RemoteFile, Pos->File);
\r
204 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
207 strcpy(Pkt.Cmd, "RETR ");
\r
208 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
209 Pkt.Size = Pos->Size;
\r
210 Pkt.Time = Pos->Time;
\r
211 Pkt.KanjiCode = AskHostKanjiCode();
\r
213 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
214 Pkt.KanaCnv = AskHostKanaCnv();
\r
216 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
217 if(Pkt.Mode == EXIST_ABORT)
\r
219 else if(Pkt.Mode != EXIST_IGNORE)
\r
220 AddTransFileList(&Pkt);
\r
225 if(AskNoFullPathMode() == YES)
\r
227 strcpy(Pkt.Cmd, "BACKCUR");
\r
228 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
229 AddTransFileList(&Pkt);
\r
231 DeleteFileList(&FileListBase);
\r
233 strcpy(Pkt.Cmd, "GOQUIT");
\r
234 AddTransFileList(&Pkt);
\r
236 GoForwardTransWindow();
\r
237 // KeepTransferDialog(NO);
\r
245 /*----- 指定されたファイルを一つダウンロードする ------------------------------
\r
248 * char *Fname : ファイル名
\r
252 *----------------------------------------------------------------------------*/
\r
254 void DirectDownLoadProc(char *Fname)
\r
261 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
266 // KeepTransferDialog(YES);
\r
268 if(AskNoFullPathMode() == YES)
\r
270 strcpy(Pkt.Cmd, "SETCUR");
\r
271 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
272 AddTransFileList(&Pkt);
\r
275 if(strlen(Fname) > 0)
\r
277 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
278 SetYenTail(Pkt.LocalFile);
\r
279 strcpy(TmpString, Fname);
\r
280 if(FnameCnv == FNAME_LOWER)
\r
281 _mbslwr(TmpString);
\r
282 else if(FnameCnv == FNAME_UPPER)
\r
283 _mbsupr(TmpString);
\r
284 RemoveAfterSemicolon(TmpString);
\r
286 if(RenameUnuseableName(TmpString) == FFFTP_SUCCESS)
\r
288 strcat(Pkt.LocalFile, TmpString);
\r
289 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
291 if(AskHostType() == HTYPE_ACOS)
\r
293 strcpy(Pkt.RemoteFile, "'");
\r
294 strcat(Pkt.RemoteFile, AskHostLsName());
\r
295 strcat(Pkt.RemoteFile, "(");
\r
296 strcat(Pkt.RemoteFile, Fname);
\r
297 strcat(Pkt.RemoteFile, ")");
\r
298 strcat(Pkt.RemoteFile, "'");
\r
300 else if(AskHostType() == HTYPE_ACOS_4)
\r
302 strcpy(Pkt.RemoteFile, Fname);
\r
306 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
307 SetSlashTail(Pkt.RemoteFile);
\r
308 strcat(Pkt.RemoteFile, Fname);
\r
309 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
312 strcpy(Pkt.Cmd, "RETR-S ");
\r
313 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
315 /* サイズと日付は転送側スレッドで取得し、セットする */
\r
317 Pkt.KanjiCode = AskHostKanjiCode();
\r
319 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
320 Pkt.KanaCnv = AskHostKanaCnv();
\r
322 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
323 if((Pkt.Mode != EXIST_ABORT) && (Pkt.Mode != EXIST_IGNORE))
\r
324 AddTransFileList(&Pkt);
\r
328 if(AskNoFullPathMode() == YES)
\r
330 strcpy(Pkt.Cmd, "BACKCUR");
\r
331 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
332 AddTransFileList(&Pkt);
\r
335 strcpy(Pkt.Cmd, "GOQUIT");
\r
336 AddTransFileList(&Pkt);
\r
338 GoForwardTransWindow();
\r
339 // KeepTransferDialog(NO);
\r
347 /*----- 入力されたファイル名のファイルを一つダウンロードする ------------------
\r
354 *----------------------------------------------------------------------------*/
\r
356 void InputDownLoadProc(void)
\r
358 char Path[FMAX_PATH+1];
\r
361 // DisableUserOpe();
\r
364 if(InputDialogBox(downname_dlg, GetMainHwnd(), NULL, Path, FMAX_PATH, &Tmp, IDH_HELP_TOPIC_0000001) == YES)
\r
366 DirectDownLoadProc(Path);
\r
369 // EnableUserOpe();
\r
375 /*----- ミラーリングダウンロードを行う ----------------------------------------
\r
378 * int Notify : 確認を行うかどうか (YES/NO)
\r
382 *----------------------------------------------------------------------------*/
\r
384 void MirrorDownloadProc(int Notify)
\r
386 FILELIST *LocalListBase;
\r
387 FILELIST *RemoteListBase;
\r
388 FILELIST *LocalPos;
\r
389 FILELIST *RemotePos;
\r
392 char Name[FMAX_PATH+1];
\r
400 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
407 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_down_dlg), GetMainHwnd(), MirrorNotifyCallBack, 0);
\r
411 if((Notify == YES) || (Notify == YES_LIST))
\r
413 /*===== ファイルリスト取得 =====*/
\r
415 LocalListBase = NULL;
\r
416 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
417 RemoteListBase = NULL;
\r
418 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
420 RemotePos = RemoteListBase;
\r
421 while(RemotePos != NULL)
\r
423 RemotePos->Attr = YES; /* RemotePos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
424 RemotePos = RemotePos->Next;
\r
427 LocalPos = LocalListBase;
\r
428 while(LocalPos != NULL)
\r
430 if(AskMirrorNoTrn(LocalPos->File, 1) == NO)
\r
432 LocalPos->Attr = YES;
\r
433 LocalPos = LocalPos->Next;
\r
437 LocalPos->Attr = NO; /* LocalPos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
439 if(LocalPos->Node == NODE_DIR)
\r
441 Level = AskDirLevel(LocalPos->File);
\r
442 LocalPos = LocalPos->Next;
\r
443 while(LocalPos != NULL)
\r
445 if((LocalPos->Node == NODE_DIR) &&
\r
446 (AskDirLevel(LocalPos->File) <= Level))
\r
450 LocalPos->Attr = NO;
\r
451 LocalPos = LocalPos->Next;
\r
455 LocalPos = LocalPos->Next;
\r
459 /*===== ファイルリスト比較 =====*/
\r
461 RemotePos = RemoteListBase;
\r
462 while(RemotePos != NULL)
\r
464 if(AskMirrorNoTrn(RemotePos->File, 0) == NO)
\r
466 strcpy(Name, RemotePos->File);
\r
467 // ReplaceAll(Name, '/', '\\');
\r
469 if(MirrorFnameCnv == YES)
\r
470 Mode = COMP_LOWERMATCH;
\r
472 Mode = COMP_STRICT;
\r
474 if((LocalPos = SearchFileList(Name, LocalListBase, Mode)) != NULL)
\r
476 if((RemotePos->Node == NODE_DIR) && (LocalPos->Node == NODE_DIR))
\r
478 LocalPos->Attr = NO;
\r
479 RemotePos->Attr = NO;
\r
481 else if((RemotePos->Node == NODE_FILE) && (LocalPos->Node == NODE_FILE))
\r
483 LocalPos->Attr = NO;
\r
484 if(CompareFileTime(&RemotePos->Time, &LocalPos->Time) <= 0)
\r
485 RemotePos->Attr = NO;
\r
488 RemotePos = RemotePos->Next;
\r
492 if(RemotePos->Node == NODE_FILE)
\r
494 RemotePos->Attr = NO;
\r
495 RemotePos = RemotePos->Next;
\r
499 RemotePos->Attr = NO;
\r
500 Level = AskDirLevel(RemotePos->File);
\r
501 RemotePos = RemotePos->Next;
\r
502 while(RemotePos != NULL)
\r
504 if((RemotePos->Node == NODE_DIR) &&
\r
505 (AskDirLevel(RemotePos->File) <= Level))
\r
509 RemotePos->Attr = NO;
\r
510 RemotePos = RemotePos->Next;
\r
516 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
518 /*===== 削除/アップロード =====*/
\r
520 LocalPos = LocalListBase;
\r
521 while(LocalPos != NULL)
\r
523 if((LocalPos->Attr == YES) && (LocalPos->Node == NODE_FILE))
\r
525 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
526 SetYenTail(Pkt.LocalFile);
\r
527 strcat(Pkt.LocalFile, LocalPos->File);
\r
528 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
529 strcpy(Pkt.RemoteFile, "");
\r
530 strcpy(Pkt.Cmd, "L-DELE ");
\r
531 AddTmpTransFileList(&Pkt, &Base);
\r
533 LocalPos = LocalPos->Next;
\r
535 MirrorDeleteAllLocalDir(LocalListBase, &Pkt, &Base);
\r
538 RemotePos = RemoteListBase;
\r
539 while(RemotePos != NULL)
\r
541 if(RemotePos->Attr == YES)
\r
543 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
544 SetYenTail(Pkt.LocalFile);
\r
545 Cat = strchr(Pkt.LocalFile, NUL);
\r
546 strcat(Pkt.LocalFile, RemotePos->File);
\r
548 if(MirrorFnameCnv == YES)
\r
551 RemoveAfterSemicolon(Cat);
\r
552 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
554 if(RemotePos->Node == NODE_DIR)
\r
556 strcpy(Pkt.RemoteFile, "");
\r
557 strcpy(Pkt.Cmd, "L-MKD ");
\r
558 AddTmpTransFileList(&Pkt, &Base);
\r
560 else if(RemotePos->Node == NODE_FILE)
\r
562 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
563 SetSlashTail(Pkt.RemoteFile);
\r
564 strcat(Pkt.RemoteFile, RemotePos->File);
\r
565 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
567 strcpy(Pkt.Cmd, "RETR ");
\r
568 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
569 Pkt.Size = RemotePos->Size;
\r
570 Pkt.Time = RemotePos->Time;
\r
572 Pkt.KanjiCode = AskHostKanjiCode();
\r
574 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
575 Pkt.KanaCnv = AskHostKanaCnv();
\r
576 Pkt.Mode = EXIST_OVW;
\r
577 AddTmpTransFileList(&Pkt, &Base);
\r
580 RemotePos = RemotePos->Next;
\r
583 if((Notify == YES) ||
\r
584 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirrordown_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
586 if(AskNoFullPathMode() == YES)
\r
588 strcpy(Pkt.Cmd, "SETCUR");
\r
589 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
590 AddTransFileList(&Pkt);
\r
592 AppendTransFileList(Base);
\r
594 if(AskNoFullPathMode() == YES)
\r
596 strcpy(Pkt.Cmd, "BACKCUR");
\r
597 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
598 AddTransFileList(&Pkt);
\r
601 strcpy(Pkt.Cmd, "GOQUIT");
\r
602 AddTransFileList(&Pkt);
\r
605 EraseTmpTransFileList(&Base);
\r
607 DeleteFileList(&LocalListBase);
\r
608 DeleteFileList(&RemoteListBase);
\r
610 GoForwardTransWindow();
\r
619 /*----- ミラーリングのファイル一覧を表示 --------------------------------------
\r
622 * FILELIST *Local : ローカル側
\r
623 * FILELIST *Remote : リモート側
\r
627 *----------------------------------------------------------------------------*/
\r
629 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote)
\r
635 if(DebugConsole == YES)
\r
637 DoPrintf("---- MIRROR FILE LIST ----");
\r
638 while(Local != NULL)
\r
640 FileTimeToLocalFileTime(&Local->Time, &fTime);
\r
641 FileTimeToSystemTime(&fTime, &sTime);
\r
642 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
643 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
644 DoPrintf("LOCAL : %s %s [%s] %s", Local->Attr==1?"YES":"NO ", Local->Node==NODE_DIR?"DIR ":"FILE", Date, Local->File);
\r
645 Local = Local->Next;
\r
647 while(Remote != NULL)
\r
649 FileTimeToLocalFileTime(&Remote->Time, &fTime);
\r
650 FileTimeToSystemTime(&fTime, &sTime);
\r
651 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
652 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
653 DoPrintf("REMOTE : %s %s [%s] %s", Remote->Attr==1?"YES":"NO ", Remote->Node==NODE_DIR?"DIR ":"FILE", Date, Remote->File);
\r
654 Remote = Remote->Next;
\r
656 DoPrintf("---- END ----");
\r
662 /*----- ミラーリング時のローカル側のフォルダ削除 ------------------------------
\r
665 * FILELIST *Local : ファイルリスト
\r
666 * TRANSPACKET *Pkt :
\r
667 * TRANSPACKET **Base :
\r
671 *----------------------------------------------------------------------------*/
\r
673 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
675 while(Local != NULL)
\r
677 if(Local->Node == NODE_DIR)
\r
679 MirrorDeleteAllLocalDir(Local->Next, Pkt, Base);
\r
681 if(Local->Attr == YES)
\r
683 AskLocalCurDir(Pkt->LocalFile, FMAX_PATH);
\r
684 SetYenTail(Pkt->LocalFile);
\r
685 strcat(Pkt->LocalFile, Local->File);
\r
686 ReplaceAll(Pkt->LocalFile, '/', '\\');
\r
687 strcpy(Pkt->RemoteFile, "");
\r
688 strcpy(Pkt->Cmd, "L-RMD ");
\r
689 AddTmpTransFileList(Pkt, Base);
\r
693 Local = Local->Next;
\r
699 /*----- ファイル名のセミコロン以降を取り除く ----------------------------------
\r
702 * char *Path : ファイル名
\r
709 * オプション設定によって処理を切替える
\r
710 *----------------------------------------------------------------------------*/
\r
712 static void RemoveAfterSemicolon(char *Path)
\r
716 if(VaxSemicolon == YES)
\r
718 if((Pos = strchr(Path, ';')) != NULL)
\r
725 /*----- ローカルに同じ名前のファイルがないかチェック --------------------------
\r
728 * TRANSPACKET *Pkt : 転送ファイル情報
\r
732 * EXIST_OVW/EXIST_RESUME/EXIST_IGNORE
\r
735 * Pkt.ExistSize, ExistMode、ExistNotify が変更される
\r
736 *----------------------------------------------------------------------------*/
\r
738 static int CheckLocalFile(TRANSPACKET *Pkt)
\r
741 WIN32_FIND_DATA Find;
\r
745 Pkt->ExistSize = 0;
\r
746 if(RecvMode != TRANS_OVW)
\r
748 if((fHnd = FindFirstFile(Pkt->LocalFile, &Find)) != INVALID_HANDLE_VALUE)
\r
752 Pkt->ExistSize = MakeLongLong(Find.nFileSizeHigh, Find.nFileSizeLow);
\r
754 if(ExistNotify == YES)
\r
756 SoundPlay(SND_ERROR);
\r
757 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(down_exist_dlg), GetMainHwnd(), DownExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
765 if(Ret == EXIST_NEW)
\r
768 if(CompareFileTime(&Find.ftLastWriteTime, &Pkt->Time) < 0)
\r
771 Ret = EXIST_IGNORE;
\r
779 /*----- ローカルに同じ名前のファイルがある時の確認ダイアログのコールバック ----
\r
782 * HWND hDlg : ウインドウハンドル
\r
783 * UINT message : メッセージ番号
\r
784 * WPARAM wParam : メッセージの WPARAM 引数
\r
785 * LPARAM lParam : メッセージの LPARAM 引数
\r
789 *----------------------------------------------------------------------------*/
\r
791 static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
793 static TRANSPACKET *Pkt;
\r
794 static const RADIOBUTTON DownExistButton[] = {
\r
795 { DOWN_EXIST_OVW, EXIST_OVW },
\r
796 { DOWN_EXIST_NEW, EXIST_NEW },
\r
797 { DOWN_EXIST_RESUME, EXIST_RESUME },
\r
798 { DOWN_EXIST_IGNORE, EXIST_IGNORE }
\r
800 #define DOWNEXISTBUTTONS (sizeof(DownExistButton)/sizeof(RADIOBUTTON))
\r
804 case WM_INITDIALOG :
\r
805 Pkt = (TRANSPACKET *)lParam;
\r
806 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
807 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->LocalFile);
\r
809 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
810 EnableWindow(GetDlgItem(hDlg, DOWN_EXIST_RESUME), FALSE);
\r
812 SetRadioButtonByValue(hDlg, ExistMode, DownExistButton, DOWNEXISTBUTTONS);
\r
816 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
820 /* ここに break はない */
\r
823 ExistMode = AskRadioButtonValue(hDlg, DownExistButton, DOWNEXISTBUTTONS);
\r
824 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->LocalFile);
\r
825 EndDialog(hDlg, YES);
\r
829 // ExistMode = EXIST_ABORT;
\r
830 EndDialog(hDlg, NO);
\r
834 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000009);
\r
847 /*----- ファイル一覧で指定されたファイルをアップロードする --------------------
\r
850 * int ChName : 名前を変えるかどうか (YES/NO)
\r
851 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
855 *----------------------------------------------------------------------------*/
\r
857 void UpLoadListProc(int ChName, int All)
\r
859 FILELIST *FileListBase;
\r
864 FILELIST *RemoteList;
\r
865 char Tmp[FMAX_PATH+1];
\r
871 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
875 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
876 FileListBase = NULL;
\r
877 MakeSelectedFileList(WIN_LOCAL, YES, All, &FileListBase, &CancelFlg);
\r
879 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
882 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
887 Pos = FileListBase;
\r
890 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
891 SetSlashTail(Pkt.RemoteFile);
\r
892 Cat = strchr(Pkt.RemoteFile, NUL);
\r
893 if((ChName == NO) || (Pos->Node == NODE_DIR))
\r
895 strcat(Pkt.RemoteFile, Pos->File);
\r
896 if(FnameCnv == FNAME_LOWER)
\r
898 else if(FnameCnv == FNAME_UPPER)
\r
904 strcpy(TmpString, Pos->File);
\r
905 CurWin = WIN_LOCAL;
\r
906 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
907 strcat(Pkt.RemoteFile, TmpString);
\r
911 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
913 if(AskHostType() == HTYPE_ACOS)
\r
915 strcpy(Pkt.RemoteFile, "'");
\r
916 strcat(Pkt.RemoteFile, AskHostLsName());
\r
917 strcat(Pkt.RemoteFile, "(");
\r
918 strcat(Pkt.RemoteFile, Cat);
\r
919 strcat(Pkt.RemoteFile, ")");
\r
920 strcat(Pkt.RemoteFile, "'");
\r
922 else if(AskHostType() == HTYPE_ACOS_4)
\r
923 strcpy(Pkt.RemoteFile, Cat);
\r
925 if(Pos->Node == NODE_DIR)
\r
929 // ホスト側のファイル一覧をRemoteListに登録
\r
931 if(RemoteList != NULL)
\r
932 DeleteFileList(&RemoteList);
\r
935 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
936 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
938 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
939 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
940 DoCWD(Tmp, NO, NO, NO);
\r
945 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
947 strcpy(Pkt1.Cmd, "SETCUR");
\r
948 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
949 AddTransFileList(&Pkt1);
\r
952 strcpy(Pkt.Cmd, "MKD ");
\r
953 strcpy(Pkt.LocalFile, "");
\r
954 AddTransFileList(&Pkt);
\r
957 else if(Pos->Node == NODE_FILE)
\r
960 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
961 SetYenTail(Pkt.LocalFile);
\r
962 strcat(Pkt.LocalFile, Pos->File);
\r
963 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
965 strcpy(Pkt.Cmd, "STOR ");
\r
966 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
968 Pkt.Time = Pos->Time;
\r
969 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
970 Pkt.KanjiCode = AskHostKanjiCode();
\r
972 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
973 Pkt.KanaCnv = AskHostKanaCnv();
\r
974 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
975 if(Pkt.Mode == EXIST_ABORT)
\r
977 else if(Pkt.Mode != EXIST_IGNORE)
\r
979 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
981 strcpy(Pkt1.Cmd, "SETCUR");
\r
982 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
983 AddTransFileList(&Pkt1);
\r
986 AddTransFileList(&Pkt);
\r
992 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
994 strcpy(Pkt.Cmd, "BACKCUR");
\r
995 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
996 AddTransFileList(&Pkt);
\r
999 if(RemoteList != NULL)
\r
1000 DeleteFileList(&RemoteList);
\r
1002 DeleteFileList(&FileListBase);
\r
1004 strcpy(Pkt.Cmd, "GOQUIT");
\r
1005 AddTransFileList(&Pkt);
\r
1007 GoForwardTransWindow();
\r
1015 /*----- ドラッグ&ドロップで指定されたファイルをアップロードする --------------
\r
1018 * WPARAM wParam : ドロップされたファイルの情報
\r
1022 *----------------------------------------------------------------------------*/
\r
1024 void UpLoadDragProc(WPARAM wParam)
\r
1026 FILELIST *FileListBase;
\r
1031 FILELIST *RemoteList;
\r
1032 char Tmp[FMAX_PATH+1];
\r
1034 char Cur[FMAX_PATH+1];
\r
1039 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1043 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
1044 FileListBase = NULL;
\r
1045 MakeDroppedFileList(wParam, Cur, &FileListBase);
\r
1047 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
1049 RemoteList = NULL;
\r
1050 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
1053 ExistNotify = YES;
\r
1055 Pos = FileListBase;
\r
1056 while(Pos != NULL)
\r
1058 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1059 SetSlashTail(Pkt.RemoteFile);
\r
1060 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1062 strcat(Pkt.RemoteFile, Pos->File);
\r
1063 if(FnameCnv == FNAME_LOWER)
\r
1065 else if(FnameCnv == FNAME_UPPER)
\r
1067 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1069 if(AskHostType() == HTYPE_ACOS)
\r
1071 strcpy(Pkt.RemoteFile, "'");
\r
1072 strcat(Pkt.RemoteFile, AskHostLsName());
\r
1073 strcat(Pkt.RemoteFile, "(");
\r
1074 strcat(Pkt.RemoteFile, Cat);
\r
1075 strcat(Pkt.RemoteFile, ")");
\r
1076 strcat(Pkt.RemoteFile, "'");
\r
1078 else if(AskHostType() == HTYPE_ACOS_4)
\r
1079 strcpy(Pkt.RemoteFile, Cat);
\r
1081 if(Pos->Node == NODE_DIR)
\r
1085 // ホスト側のファイル一覧をRemoteListに登録
\r
1087 if(RemoteList != NULL)
\r
1088 DeleteFileList(&RemoteList);
\r
1089 RemoteList = NULL;
\r
1091 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
1092 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
1094 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
1095 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
1096 DoCWD(Tmp, NO, NO, NO);
\r
1100 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1102 strcpy(Pkt1.Cmd, "SETCUR");
\r
1103 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1104 AddTransFileList(&Pkt1);
\r
1107 strcpy(Pkt.Cmd, "MKD ");
\r
1108 strcpy(Pkt.LocalFile, "");
\r
1109 AddTransFileList(&Pkt);
\r
1112 else if(Pos->Node == NODE_FILE)
\r
1115 strcpy(Pkt.LocalFile, Cur);
\r
1116 SetYenTail(Pkt.LocalFile);
\r
1117 strcat(Pkt.LocalFile, Pos->File);
\r
1118 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1120 strcpy(Pkt.Cmd, "STOR ");
\r
1121 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1123 Pkt.Time = Pos->Time;
\r
1124 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1125 Pkt.KanjiCode = AskHostKanjiCode();
\r
1127 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1128 Pkt.KanaCnv = AskHostKanaCnv();
\r
1129 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
1130 if(Pkt.Mode == EXIST_ABORT)
\r
1132 else if(Pkt.Mode != EXIST_IGNORE)
\r
1134 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1136 strcpy(Pkt1.Cmd, "SETCUR");
\r
1137 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1138 AddTransFileList(&Pkt1);
\r
1141 AddTransFileList(&Pkt);
\r
1147 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
1149 strcpy(Pkt.Cmd, "BACKCUR");
\r
1150 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1151 AddTransFileList(&Pkt);
\r
1154 if(RemoteList != NULL)
\r
1155 DeleteFileList(&RemoteList);
\r
1157 DeleteFileList(&FileListBase);
\r
1159 strcpy(Pkt.Cmd, "GOQUIT");
\r
1160 AddTransFileList(&Pkt);
\r
1162 GoForwardTransWindow();
\r
1170 /*----- ミラーリングアップロードを行う ----------------------------------------
\r
1173 * int Notify : 確認を行うかどうか (YES/NO)
\r
1177 *----------------------------------------------------------------------------*/
\r
1179 void MirrorUploadProc(int Notify)
\r
1181 FILELIST *LocalListBase;
\r
1182 FILELIST *RemoteListBase;
\r
1183 FILELIST *LocalPos;
\r
1184 FILELIST *RemotePos;
\r
1186 TRANSPACKET *Base;
\r
1187 char Name[FMAX_PATH+1];
\r
1191 SYSTEMTIME TmpStime;
\r
1192 FILETIME TmpFtimeL;
\r
1193 FILETIME TmpFtimeR;
\r
1198 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1205 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_up_dlg), GetMainHwnd(), MirrorNotifyCallBack, 1);
\r
1209 if((Notify == YES) || (Notify == YES_LIST))
\r
1211 /*===== ファイルリスト取得 =====*/
\r
1213 LocalListBase = NULL;
\r
1214 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
1215 RemoteListBase = NULL;
\r
1216 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
1218 LocalPos = LocalListBase;
\r
1219 while(LocalPos != NULL)
\r
1221 LocalPos->Attr = YES; /* LocalPos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
1222 LocalPos = LocalPos->Next;
\r
1225 RemotePos = RemoteListBase;
\r
1226 while(RemotePos != NULL)
\r
1228 if(AskMirrorNoTrn(RemotePos->File, 1) == NO)
\r
1230 RemotePos->Attr = YES;
\r
1231 RemotePos = RemotePos->Next;
\r
1235 RemotePos->Attr = NO; /* RemotePos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
1237 if(RemotePos->Node == NODE_DIR)
\r
1239 Level = AskDirLevel(RemotePos->File);
\r
1240 RemotePos = RemotePos->Next;
\r
1241 while(RemotePos != NULL)
\r
1243 if((RemotePos->Node == NODE_DIR) &&
\r
1244 (AskDirLevel(RemotePos->File) <= Level))
\r
1248 RemotePos->Attr = NO;
\r
1249 RemotePos = RemotePos->Next;
\r
1253 RemotePos = RemotePos->Next;
\r
1257 /*===== ファイルリスト比較 =====*/
\r
1259 LocalPos = LocalListBase;
\r
1260 while(LocalPos != NULL)
\r
1262 if(AskMirrorNoTrn(LocalPos->File, 0) == NO)
\r
1264 strcpy(Name, LocalPos->File);
\r
1265 ReplaceAll(Name, '\\', '/');
\r
1267 if(MirrorFnameCnv == YES)
\r
1268 Mode = COMP_LOWERMATCH;
\r
1270 Mode = COMP_STRICT;
\r
1272 if(LocalPos->Node == NODE_DIR)
\r
1274 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1276 if(RemotePos->Node == NODE_DIR)
\r
1278 RemotePos->Attr = NO;
\r
1279 LocalPos->Attr = NO;
\r
1283 else if(LocalPos->Node == NODE_FILE)
\r
1285 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1287 if(RemotePos->Node == NODE_FILE)
\r
1289 FileTimeToLocalFileTime(&LocalPos->Time, &TmpFtimeL);
\r
1290 FileTimeToLocalFileTime(&RemotePos->Time, &TmpFtimeR);
\r
1291 if((RemotePos->InfoExist & FINFO_TIME) == 0)
\r
1293 FileTimeToSystemTime(&TmpFtimeL, &TmpStime);
\r
1294 TmpStime.wHour = 0;
\r
1295 TmpStime.wMinute = 0;
\r
1296 TmpStime.wSecond = 0;
\r
1297 TmpStime.wMilliseconds = 0;
\r
1298 SystemTimeToFileTime(&TmpStime, &TmpFtimeL);
\r
1300 FileTimeToSystemTime(&TmpFtimeR, &TmpStime);
\r
1301 TmpStime.wHour = 0;
\r
1302 TmpStime.wMinute = 0;
\r
1303 TmpStime.wSecond = 0;
\r
1304 TmpStime.wMilliseconds = 0;
\r
1305 SystemTimeToFileTime(&TmpStime, &TmpFtimeR);
\r
1307 RemotePos->Attr = NO;
\r
1308 if(CompareFileTime(&TmpFtimeL, &TmpFtimeR) <= 0)
\r
1309 LocalPos->Attr = NO;
\r
1314 LocalPos = LocalPos->Next;
\r
1318 if(LocalPos->Node == NODE_FILE)
\r
1320 LocalPos->Attr = NO;
\r
1321 LocalPos = LocalPos->Next;
\r
1325 LocalPos->Attr = NO;
\r
1326 Level = AskDirLevel(LocalPos->File);
\r
1327 LocalPos = LocalPos->Next;
\r
1328 while(LocalPos != NULL)
\r
1330 if((LocalPos->Node == NODE_DIR) &&
\r
1331 (AskDirLevel(LocalPos->File) <= Level))
\r
1335 LocalPos->Attr = NO;
\r
1336 LocalPos = LocalPos->Next;
\r
1342 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
1344 /*===== 削除/アップロード =====*/
\r
1346 RemotePos = RemoteListBase;
\r
1347 while(RemotePos != NULL)
\r
1349 if((RemotePos->Attr == YES) && (RemotePos->Node == NODE_FILE))
\r
1351 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1352 SetSlashTail(Pkt.RemoteFile);
\r
1353 strcat(Pkt.RemoteFile, RemotePos->File);
\r
1354 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1355 strcpy(Pkt.LocalFile, "");
\r
1356 strcpy(Pkt.Cmd, "R-DELE ");
\r
1357 AddTmpTransFileList(&Pkt, &Base);
\r
1359 RemotePos = RemotePos->Next;
\r
1361 MirrorDeleteAllDir(RemoteListBase, &Pkt, &Base);
\r
1363 LocalPos = LocalListBase;
\r
1364 while(LocalPos != NULL)
\r
1366 if(LocalPos->Attr == YES)
\r
1368 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1369 SetSlashTail(Pkt.RemoteFile);
\r
1370 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1371 strcat(Pkt.RemoteFile, LocalPos->File);
\r
1373 if(MirrorFnameCnv == YES)
\r
1376 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1378 if(LocalPos->Node == NODE_DIR)
\r
1380 strcpy(Pkt.LocalFile, "");
\r
1381 strcpy(Pkt.Cmd, "R-MKD ");
\r
1382 AddTmpTransFileList(&Pkt, &Base);
\r
1384 else if(LocalPos->Node == NODE_FILE)
\r
1386 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
1387 SetYenTail(Pkt.LocalFile);
\r
1388 strcat(Pkt.LocalFile, LocalPos->File);
\r
1389 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1391 strcpy(Pkt.Cmd, "STOR ");
\r
1392 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1394 Pkt.Time = LocalPos->Time;
\r
1395 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1396 Pkt.KanjiCode = AskHostKanjiCode();
\r
1398 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1399 Pkt.KanaCnv = AskHostKanaCnv();
\r
1400 Pkt.Mode = EXIST_OVW;
\r
1401 AddTmpTransFileList(&Pkt, &Base);
\r
1404 LocalPos = LocalPos->Next;
\r
1407 if((Notify == YES) ||
\r
1408 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
1410 if(AskNoFullPathMode() == YES)
\r
1412 strcpy(Pkt.Cmd, "SETCUR");
\r
1413 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1414 AddTransFileList(&Pkt);
\r
1416 AppendTransFileList(Base);
\r
1418 if(AskNoFullPathMode() == YES)
\r
1420 strcpy(Pkt.Cmd, "BACKCUR");
\r
1421 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1422 AddTransFileList(&Pkt);
\r
1425 strcpy(Pkt.Cmd, "GOQUIT");
\r
1426 AddTransFileList(&Pkt);
\r
1429 EraseTmpTransFileList(&Base);
\r
1431 DeleteFileList(&LocalListBase);
\r
1432 DeleteFileList(&RemoteListBase);
\r
1434 GoForwardTransWindow();
\r
1443 /*----- ミラーリング時のホスト側のフォルダ削除 --------------------------------
\r
1446 * FILELIST *Base : ファイルリスト
\r
1447 * TRANSPACKET *Pkt :
\r
1448 * TRANSPACKET **Base :
\r
1452 *----------------------------------------------------------------------------*/
\r
1454 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
1456 while(Remote != NULL)
\r
1458 if(Remote->Node == NODE_DIR)
\r
1460 MirrorDeleteAllDir(Remote->Next, Pkt, Base);
\r
1462 if(Remote->Attr == YES)
\r
1464 AskRemoteCurDir(Pkt->RemoteFile, FMAX_PATH);
\r
1465 SetSlashTail(Pkt->RemoteFile);
\r
1466 strcat(Pkt->RemoteFile, Remote->File);
\r
1467 ReplaceAll(Pkt->RemoteFile, '\\', '/');
\r
1468 strcpy(Pkt->LocalFile, "");
\r
1469 strcpy(Pkt->Cmd, "R-RMD ");
\r
1470 AddTmpTransFileList(Pkt, Base);
\r
1474 Remote = Remote->Next;
\r
1480 /*----- ミラーリングアップロード開始確認ウインドウのコールバック --------------
\r
1483 * HWND hDlg : ウインドウハンドル
\r
1484 * UINT message : メッセージ番号
\r
1485 * WPARAM wParam : メッセージの WPARAM 引数
\r
1486 * LPARAM lParam : メッセージの LPARAM 引数
\r
1490 *----------------------------------------------------------------------------*/
\r
1492 static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1498 case WM_INITDIALOG :
\r
1503 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1506 EndDialog(hDlg, YES);
\r
1510 EndDialog(hDlg, NO);
\r
1513 case MIRRORUP_DISP :
\r
1514 EndDialog(hDlg, YES_LIST);
\r
1519 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000013);
\r
1521 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1529 /*----- ミラーリングアップロード処理内容確認ウインドウのコールバック ----------
\r
1532 * HWND hDlg : ウインドウハンドル
\r
1533 * UINT message : メッセージ番号
\r
1534 * WPARAM wParam : メッセージの WPARAM 引数
\r
1535 * LPARAM lParam : メッセージの LPARAM 引数
\r
1539 *----------------------------------------------------------------------------*/
\r
1541 static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1543 static DIALOGSIZE DlgSize = {
\r
1544 { MIRROR_DEL, MIRROR_SIZEGRIP, -1 },
\r
1545 { IDOK, IDCANCEL, IDHELP, MIRROR_DEL, MIRROR_COPYNUM, MIRROR_MAKENUM, MIRROR_DELNUM, MIRROR_SIZEGRIP, -1 },
\r
1546 { MIRROR_LIST, -1 },
\r
1551 static TRANSPACKET **Base;
\r
1553 char Tmp[FMAX_PATH+1+6];
\r
1559 case WM_INITDIALOG :
\r
1560 Base = (TRANSPACKET **)lParam;
\r
1562 while(Pos != NULL)
\r
1565 if((strncmp(Pos->Cmd, "R-DELE", 6) == 0) ||
\r
1566 (strncmp(Pos->Cmd, "R-RMD", 5) == 0))
\r
1567 sprintf(Tmp, MSGJPN052, Pos->RemoteFile);
\r
1568 else if(strncmp(Pos->Cmd, "R-MKD", 5) == 0)
\r
1569 sprintf(Tmp, MSGJPN053, Pos->RemoteFile);
\r
1570 else if(strncmp(Pos->Cmd, "STOR", 4) == 0)
\r
1571 sprintf(Tmp, MSGJPN054, Pos->RemoteFile);
\r
1572 else if((strncmp(Pos->Cmd, "L-DELE", 6) == 0) ||
\r
1573 (strncmp(Pos->Cmd, "L-RMD", 5) == 0))
\r
1574 sprintf(Tmp, MSGJPN055, Pos->LocalFile);
\r
1575 else if(strncmp(Pos->Cmd, "L-MKD", 5) == 0)
\r
1576 sprintf(Tmp, MSGJPN056, Pos->LocalFile);
\r
1577 else if(strncmp(Pos->Cmd, "RETR", 4) == 0)
\r
1578 sprintf(Tmp, MSGJPN057, Pos->LocalFile);
\r
1580 if(strlen(Tmp) > 0)
\r
1581 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_ADDSTRING, 0, (LPARAM)Tmp);
\r
1584 CountMirrorFiles(hDlg, *Base);
\r
1585 DlgSizeInit(hDlg, &DlgSize, &MirrorDlgSize);
\r
1586 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1590 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1593 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1594 EndDialog(hDlg, YES);
\r
1598 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1599 EndDialog(hDlg, NO);
\r
1603 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0);
\r
1604 if((List = malloc(Num * sizeof(int))) != NULL)
\r
1606 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELITEMS, Num, (LPARAM)List);
\r
1607 for(Num--; Num >= 0; Num--)
\r
1609 if(RemoveTmpTransFileListItem(Base, List[Num]) == FFFTP_SUCCESS)
\r
1610 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_DELETESTRING, List[Num], 0);
\r
1615 CountMirrorFiles(hDlg, *Base);
\r
1619 case MIRROR_LIST :
\r
1620 switch(GET_WM_COMMAND_CMD(wParam, lParam))
\r
1622 case LBN_SELCHANGE :
\r
1623 if(SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0) > 0)
\r
1624 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), TRUE);
\r
1626 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1632 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1637 DlgSizeChange(hDlg, &DlgSize, (RECT *)lParam, (int)wParam);
\r
1644 /*----- ミラーリングで転送/削除するファイルの数を数えダイアログに表示---------
\r
1648 * TRANSPACKET *Pkt :
\r
1652 *----------------------------------------------------------------------------*/
\r
1654 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt)
\r
1664 while(Pkt != NULL)
\r
1666 if((strncmp(Pkt->Cmd, "R-DELE", 6) == 0) ||
\r
1667 (strncmp(Pkt->Cmd, "R-RMD", 5) == 0) ||
\r
1668 (strncmp(Pkt->Cmd, "L-DELE", 6) == 0) ||
\r
1669 (strncmp(Pkt->Cmd, "L-RMD", 5) == 0))
\r
1673 else if((strncmp(Pkt->Cmd, "R-MKD", 5) == 0) ||
\r
1674 (strncmp(Pkt->Cmd, "L-MKD", 5) == 0))
\r
1678 else if((strncmp(Pkt->Cmd, "STOR", 4) == 0) ||
\r
1679 (strncmp(Pkt->Cmd, "RETR", 4) == 0))
\r
1687 sprintf(Tmp, MSGJPN058, Copy);
\r
1689 sprintf(Tmp, MSGJPN059);
\r
1690 SendDlgItemMessage(hDlg, MIRROR_COPYNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1693 sprintf(Tmp, MSGJPN060, Make);
\r
1695 sprintf(Tmp, MSGJPN061);
\r
1696 SendDlgItemMessage(hDlg, MIRROR_MAKENUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1699 sprintf(Tmp, MSGJPN062, Del);
\r
1701 sprintf(Tmp, MSGJPN063);
\r
1702 SendDlgItemMessage(hDlg, MIRROR_DELNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1710 /*----- ミラーリングで転送/削除しないファイルかどうかを返す ------------------
\r
1713 * char Fname : ファイル名
\r
1715 * 0=転送しないファイル, 1=削除しないファイル
\r
1720 *----------------------------------------------------------------------------*/
\r
1722 static int AskMirrorNoTrn(char *Fname, int Mode)
\r
1727 Tbl = MirrorNoTrn;
\r
1729 Tbl = MirrorNoDel;
\r
1732 if(StrMultiLen(Tbl) > 0)
\r
1734 Fname = GetFileName(Fname);
\r
1735 while(*Tbl != NUL)
\r
1737 if(CheckFname(Fname, Tbl) == FFFTP_SUCCESS)
\r
1742 Tbl += strlen(Tbl) + 1;
\r
1749 /*----- アップロードするファイルの属性を返す ----------------------------------
\r
1752 * char Fname : ファイル名
\r
1755 * int 属性 (-1=設定なし)
\r
1756 *----------------------------------------------------------------------------*/
\r
1758 static int AskUpLoadFileAttr(char *Fname)
\r
1764 Tbl = DefAttrList;
\r
1765 Fname = GetFileName(Fname);
\r
1767 while(*Tbl != NUL)
\r
1769 Sts = CheckFname(Fname, Tbl);
\r
1770 Tbl += strlen(Tbl) + 1;
\r
1772 if((Sts == FFFTP_SUCCESS) && (*Tbl != NUL))
\r
1777 Tbl += strlen(Tbl) + 1;
\r
1783 /*----- ホストに同じ名前のファイルがないかチェック- ---------------------------a
\r
1786 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1787 * FILELIST *ListList :
\r
1791 * EXIST_OVW/EXIST_UNIQUE/EXIST_IGNORE
\r
1794 * Pkt.ExistSize, UpExistMode、ExistNotify が変更される
\r
1795 *----------------------------------------------------------------------------*/
\r
1797 static int CheckRemoteFile(TRANSPACKET *Pkt, FILELIST *ListList)
\r
1803 Pkt->ExistSize = 0;
\r
1804 if(SendMode != TRANS_OVW)
\r
1806 if((Exist = SearchFileList(GetFileName(Pkt->RemoteFile), ListList, COMP_STRICT)) != NULL)
\r
1808 Pkt->ExistSize = Exist->Size;
\r
1810 if(ExistNotify == YES)
\r
1812 SoundPlay(SND_ERROR);
\r
1813 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(up_exist_dlg), GetMainHwnd(), UpExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
1814 Ret = EXIST_ABORT;
\r
1816 Ret = UpExistMode;
\r
1819 Ret = UpExistMode;
\r
1821 if(Ret == EXIST_NEW)
\r
1824 if(CompareFileTime(&Exist->Time, &Pkt->Time) < 0)
\r
1827 Ret = EXIST_IGNORE;
\r
1835 /*----- ホストに同じ名前のファイルがある時の確認ダイアログのコールバック ------
\r
1838 * HWND hDlg : ウインドウハンドル
\r
1839 * UINT message : メッセージ番号
\r
1840 * WPARAM wParam : メッセージの WPARAM 引数
\r
1841 * LPARAM lParam : メッセージの LPARAM 引数
\r
1845 *----------------------------------------------------------------------------*/
\r
1847 static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1849 static TRANSPACKET *Pkt;
\r
1850 static const RADIOBUTTON UpExistButton[] = {
\r
1851 { UP_EXIST_OVW, EXIST_OVW },
\r
1852 { UP_EXIST_NEW, EXIST_NEW },
\r
1853 { UP_EXIST_RESUME, EXIST_RESUME },
\r
1854 { UP_EXIST_UNIQUE, EXIST_UNIQUE },
\r
1855 { UP_EXIST_IGNORE, EXIST_IGNORE }
\r
1857 #define UPEXISTBUTTONS (sizeof(UpExistButton)/sizeof(RADIOBUTTON))
\r
1861 case WM_INITDIALOG :
\r
1862 Pkt = (TRANSPACKET *)lParam;
\r
1863 SendDlgItemMessage(hDlg, UP_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1864 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->RemoteFile);
\r
1866 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
1867 EnableWindow(GetDlgItem(hDlg, UP_EXIST_RESUME), FALSE);
\r
1869 SetRadioButtonByValue(hDlg, UpExistMode, UpExistButton, UPEXISTBUTTONS);
\r
1873 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1877 /* ここに break はない */
\r
1880 UpExistMode = AskRadioButtonValue(hDlg, UpExistButton, UPEXISTBUTTONS);
\r
1881 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->RemoteFile);
\r
1882 EndDialog(hDlg, YES);
\r
1886 // Pkt->Abort = ABORT_USER;
\r
1887 // UpExistMode = EXIST_IGNORE;
\r
1888 EndDialog(hDlg, NO);
\r
1892 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000011);
\r
1901 /*----- アップロード/ダウンロードファイル名入力ダイアログのコールバック ------
\r
1904 * HWND hDlg : ウインドウハンドル
\r
1905 * UINT message : メッセージ番号
\r
1906 * WPARAM wParam : メッセージの WPARAM 引数
\r
1907 * LPARAM lParam : メッセージの LPARAM 引数
\r
1911 *----------------------------------------------------------------------------*/
\r
1913 static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1917 case WM_INITDIALOG :
\r
1918 if(CurWin == WIN_LOCAL)
\r
1919 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN064);
\r
1921 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN065);
\r
1923 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1924 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1925 SendDlgItemMessage(hDlg, UPDOWNAS_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1929 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1932 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
1933 EndDialog(hDlg, YES);
\r
1936 case UPDOWNAS_STOP :
\r
1937 EndDialog(hDlg, NO_ALL);
\r
1946 /*----- ファイル一覧で指定されたファイルを削除する ----------------------------
\r
1953 *----------------------------------------------------------------------------*/
\r
1955 void DeleteProc(void)
\r
1958 FILELIST *FileListBase;
\r
1962 char CurDir[FMAX_PATH+1];
\r
1963 char Tmp[FMAX_PATH+1];
\r
1971 AskRemoteCurDir(CurDir, FMAX_PATH);
\r
1972 FileListBase = NULL;
\r
1973 if(GetFocus() == GetLocalHwnd())
\r
1976 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
1981 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1982 MakeSelectedFileList(Win, YES, NO, &FileListBase, &CancelFlg);
\r
1990 // DisableUserOpe();
\r
1994 Pos = FileListBase;
\r
1995 while(Pos != NULL)
\r
1997 if(Pos->Node == NODE_FILE)
\r
1999 DelNotifyAndDo(Pos, Win, &Sts, &DelFlg, CurDir);
\r
2007 DeleteAllDir(FileListBase, Win, &Sts, &DelFlg, CurDir);
\r
2009 if(Win == WIN_REMOTE)
\r
2011 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
2012 if(strcmp(Tmp, CurDir) != 0)
\r
2013 DoCWD(Tmp, NO, NO, NO);
\r
2016 DeleteFileList(&FileListBase);
\r
2020 if(Win == WIN_LOCAL)
\r
2021 GetLocalDirForWnd();
\r
2023 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2027 // EnableUserOpe();
\r
2035 /*----- サブディレクトリ以下を全て削除する ------------------------------------
\r
2038 * FILELIST *Dt : 削除するファイルのリスト
\r
2039 * int Win : ウインドウ番号 (WIN_xxx)
\r
2040 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2041 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2042 * char *CurDir : カレントディレクトリ
\r
2046 *----------------------------------------------------------------------------*/
\r
2048 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2052 if(Dt->Node == NODE_DIR)
\r
2054 DeleteAllDir(Dt->Next, Win, Sw, Flg, CurDir);
\r
2058 DelNotifyAndDo(Dt, Win, Sw, Flg, CurDir);
\r
2067 /*----- 削除するかどうかの確認と削除実行 --------------------------------------
\r
2070 * FILELIST *Dt : 削除するファイルのリスト
\r
2071 * int Win : ウインドウ番号 (WIN_xxx)
\r
2072 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2073 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2074 * char *CurDir : カレントディレクトリ
\r
2078 *----------------------------------------------------------------------------*/
\r
2080 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2082 char Path[FMAX_PATH+1];
\r
2084 if(Win == WIN_LOCAL)
\r
2086 AskLocalCurDir(Path, FMAX_PATH);
\r
2088 strcat(Path, Dt->File);
\r
2089 ReplaceAll(Path, '/', '\\');
\r
2093 AskRemoteCurDir(Path, FMAX_PATH);
\r
2094 SetSlashTail(Path);
\r
2095 strcat(Path, Dt->File);
\r
2096 ReplaceAll(Path, '\\', '/');
\r
2099 if(*Sw != YES_ALL)
\r
2101 sprintf(TmpString, "%s", Path);
\r
2103 // ローカルのファイルのパスの最後の'\\'が消えるバグ修正
\r
2104 // if(AskHostType() == HTYPE_VMS)
\r
2105 if(Win == WIN_REMOTE && AskHostType() == HTYPE_VMS)
\r
2106 ReformToVMSstylePathName(TmpString);
\r
2109 *Sw = DialogBox(GetFtpInst(), MAKEINTRESOURCE(delete_dlg), GetMainHwnd(), DeleteDialogCallBack);
\r
2112 if((*Sw == YES) || (*Sw == YES_ALL))
\r
2114 if(Win == WIN_LOCAL)
\r
2116 if(Dt->Node == NODE_FILE)
\r
2117 DoLocalDELE(Path);
\r
2124 /* フルパスを使わない時のための処理 */
\r
2126 // if(ProcForNonFullpath(Path, CurDir, GetMainHwnd(), 0) == FFFTP_FAIL)
\r
2127 if(ProcForNonFullpath(AskCmdCtrlSkt(), Path, CurDir, GetMainHwnd(), &CancelFlg) == FFFTP_FAIL)
\r
2132 if(Dt->Node == NODE_FILE)
\r
2144 /*----- ファイル削除ダイアログのコールバック ----------------------------------
\r
2147 * HWND hDlg : ウインドウハンドル
\r
2148 * UINT message : メッセージ番号
\r
2149 * WPARAM wParam : メッセージの WPARAM 引数
\r
2150 * LPARAM lParam : メッセージの LPARAM 引数
\r
2154 *----------------------------------------------------------------------------*/
\r
2156 static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2160 case WM_INITDIALOG :
\r
2161 if(CurWin == WIN_LOCAL)
\r
2162 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN066);
\r
2164 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN067);
\r
2165 SendDlgItemMessage(hDlg, DELETE_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2169 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2172 EndDialog(hDlg, YES);
\r
2176 EndDialog(hDlg, NO);
\r
2180 EndDialog(hDlg, YES_ALL);
\r
2184 EndDialog(hDlg, NO_ALL);
\r
2193 /*----- ファイル一覧で指定されたファイルの名前を変更する ----------------------
\r
2200 *----------------------------------------------------------------------------*/
\r
2202 void RenameProc(void)
\r
2205 FILELIST *FileListBase;
\r
2207 char New[FMAX_PATH+1];
\r
2214 Sts = FFFTP_SUCCESS;
\r
2215 if(GetFocus() == GetLocalHwnd())
\r
2220 Sts = CheckClosedAndReconnect();
\r
2223 if(Sts == FFFTP_SUCCESS)
\r
2227 FileListBase = NULL;
\r
2228 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2232 Pos = FileListBase;
\r
2233 while(Pos != NULL)
\r
2235 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2237 strcpy(TmpString, Pos->File);
\r
2239 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2244 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2246 strcpy(New, TmpString);
\r
2247 if(Win == WIN_LOCAL)
\r
2248 DoLocalRENAME(Pos->File, New);
\r
2250 DoRENAME(Pos->File, New);
\r
2256 DeleteFileList(&FileListBase);
\r
2260 if(Win == WIN_LOCAL)
\r
2261 GetLocalDirForWnd();
\r
2263 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2273 // リモート側でのファイルの移動(リネーム)を行う
\r
2275 // RenameProc()をベースに改造。(2007.9.5 yutaka)
\r
2277 void MoveRemoteFileProc(int drop_index)
\r
2280 FILELIST *FileListBase;
\r
2283 char New[FMAX_PATH+1];
\r
2284 char Old[FMAX_PATH+1];
\r
2285 char HostDir[FMAX_PATH+1];
\r
2292 if(MoveMode == MOVE_DISABLE)
\r
2297 AskRemoteCurDir(HostDir, FMAX_PATH);
\r
2300 GetNodeName(WIN_REMOTE, drop_index, Pkt.File, FMAX_PATH);
\r
2302 if(MoveMode == MOVE_DLG)
\r
2304 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(move_notify_dlg), GetRemoteHwnd(), ExeEscTextDialogProc, (LPARAM)Pkt.File) == NO)
\r
2310 Sts = FFFTP_SUCCESS;
\r
2312 if(GetFocus() == GetLocalHwnd())
\r
2317 Sts = CheckClosedAndReconnect();
\r
2321 Sts = CheckClosedAndReconnect();
\r
2324 if(Sts == FFFTP_SUCCESS)
\r
2328 FileListBase = NULL;
\r
2329 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2333 Pos = FileListBase;
\r
2334 while(Pos != NULL)
\r
2336 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2338 strcpy(TmpString, Pos->File);
\r
2341 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2349 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2352 strncpy_s(Old, sizeof(Old), HostDir, _TRUNCATE);
\r
2353 strncat_s(Old, sizeof(Old), "/", _TRUNCATE);
\r
2354 strncat_s(Old, sizeof(Old), Pos->File, _TRUNCATE);
\r
2357 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2358 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2359 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2360 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2361 strncat_s(New, sizeof(New), Pos->File, _TRUNCATE);
\r
2363 if(Win == WIN_LOCAL)
\r
2364 DoLocalRENAME(Old, New);
\r
2366 DoRENAME(Old, New);
\r
2372 DeleteFileList(&FileListBase);
\r
2376 if(Win == WIN_LOCAL) {
\r
2377 GetLocalDirForWnd();
\r
2379 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\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 DoCWD(New, YES, YES, YES);
\r
2385 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2396 /*----- 新ファイル名入力ダイアログのコールバック ------------------------------
\r
2399 * HWND hDlg : ウインドウハンドル
\r
2400 * UINT message : メッセージ番号
\r
2401 * WPARAM wParam : メッセージの WPARAM 引数
\r
2402 * LPARAM lParam : メッセージの LPARAM 引数
\r
2406 *----------------------------------------------------------------------------*/
\r
2408 static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2412 case WM_INITDIALOG :
\r
2413 if(CurWin == WIN_LOCAL)
\r
2414 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN068);
\r
2416 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN069);
\r
2417 SendDlgItemMessage(hDlg, RENAME_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
2418 SendDlgItemMessage(hDlg, RENAME_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2419 SendDlgItemMessage(hDlg, RENAME_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2423 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2426 SendDlgItemMessage(hDlg, RENAME_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
2427 EndDialog(hDlg, YES);
\r
2431 EndDialog(hDlg, NO);
\r
2434 case RENAME_STOP :
\r
2435 EndDialog(hDlg, NO_ALL);
\r
2444 /*----- 新しいディレクトリを作成する ------------------------------------------
\r
2451 *----------------------------------------------------------------------------*/
\r
2453 void MkdirProc(void)
\r
2457 char Path[FMAX_PATH+1];
\r
2464 if(GetFocus() == GetLocalHwnd())
\r
2467 Title = MSGJPN070;
\r
2472 Title = MSGJPN071;
\r
2476 Sts = InputDialogBox(mkdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2478 if((Sts == YES) && (strlen(Path) != 0))
\r
2480 if(Win == WIN_LOCAL)
\r
2484 GetLocalDirForWnd();
\r
2489 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2493 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2502 /*----- ヒストリリストを使ったディレクトリの移動 ------------------------------
\r
2505 * HWND hWnd : コンボボックスのウインドウハンドル
\r
2509 *----------------------------------------------------------------------------*/
\r
2511 void ChangeDirComboProc(HWND hWnd)
\r
2513 char Tmp[FMAX_PATH+1];
\r
2519 if((i = SendMessage(hWnd, CB_GETCURSEL, 0, 0)) != CB_ERR)
\r
2521 SendMessage(hWnd, CB_GETLBTEXT, i, (LPARAM)Tmp);
\r
2523 if(hWnd == GetLocalHistHwnd())
\r
2527 GetLocalDirForWnd();
\r
2532 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2535 if(DoCWD(Tmp, YES, NO, YES) < FTP_RETRY)
\r
2536 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2545 /*----- ブックマークを使ったディレクトリの移動 --------------------------------
\r
2548 * int MarkID : ブックマークのメニューID
\r
2552 *----------------------------------------------------------------------------*/
\r
2554 void ChangeDirBmarkProc(int MarkID)
\r
2556 char Local[FMAX_PATH+1];
\r
2557 char Remote[FMAX_PATH+1];
\r
2563 Sts = AskBookMarkText(MarkID, Local, Remote, FMAX_PATH+1);
\r
2564 if((Sts == BMARK_TYPE_LOCAL) || (Sts == BMARK_TYPE_BOTH))
\r
2567 if(DoLocalCWD(Local) == FFFTP_SUCCESS)
\r
2568 GetLocalDirForWnd();
\r
2572 if((Sts == BMARK_TYPE_REMOTE) || (Sts == BMARK_TYPE_BOTH))
\r
2574 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2577 if(DoCWD(Remote, YES, NO, YES) < FTP_RETRY)
\r
2578 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2586 /*----- ディレクトリ名を入力してディレクトリの移動 ----------------------------
\r
2589 * int Win : ウインドウ番号 (WIN_xxx)
\r
2593 *----------------------------------------------------------------------------*/
\r
2595 void ChangeDirDirectProc(int Win)
\r
2598 char Path[FMAX_PATH+1];
\r
2605 if(Win == WIN_LOCAL)
\r
2606 Title = MSGJPN072;
\r
2608 Title = MSGJPN073;
\r
2611 if(Win == WIN_LOCAL)
\r
2612 Sts = InputDialogBox(chdir_br_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2614 Sts = InputDialogBox(chdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2616 if((Sts == YES) && (strlen(Path) != 0))
\r
2618 if(Win == WIN_LOCAL)
\r
2622 GetLocalDirForWnd();
\r
2627 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2630 if(DoCWD(Path, YES, NO, YES) < FTP_RETRY)
\r
2631 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2640 /*----- Dropされたファイルによるディレクトリの移動 ----------------------------
\r
2643 * WPARAM wParam : ドロップされたファイルの情報
\r
2647 *----------------------------------------------------------------------------*/
\r
2649 void ChangeDirDropFileProc(WPARAM wParam)
\r
2651 char Path[FMAX_PATH+1];
\r
2654 MakeDroppedDir(wParam, Path);
\r
2656 GetLocalDirForWnd();
\r
2662 /*----- ファイルの属性変更 ----------------------------------------------------
\r
2669 *----------------------------------------------------------------------------*/
\r
2671 void ChmodProc(void)
\r
2674 FILELIST *FileListBase;
\r
2684 if(GetFocus() == GetRemoteHwnd())
\r
2686 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2689 FileListBase = NULL;
\r
2690 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2691 if(FileListBase != NULL)
\r
2693 sprintf(Tmp, "%03X", FileListBase->Attr);
\r
2694 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(chmod_dlg), GetMainHwnd(), ChmodDialogCallBack, (LPARAM)Tmp) == YES)
\r
2697 Pos = FileListBase;
\r
2698 while(Pos != NULL)
\r
2700 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2702 DoCHMOD(Pos->File, Tmp);
\r
2707 if(ChmodFlg == YES)
\r
2708 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2711 DeleteFileList(&FileListBase);
\r
2715 else if(GetFocus() == GetLocalHwnd())
\r
2718 FileListBase = NULL;
\r
2719 MakeSelectedFileList(WIN_LOCAL, NO, NO, &FileListBase, &CancelFlg);
\r
2720 if(FileListBase != NULL)
\r
2722 if((Buf = malloc(1)) != NULL)
\r
2726 Pos = FileListBase;
\r
2727 while(Pos != NULL)
\r
2729 if((BufTmp = realloc(Buf, BufLen + strlen(Pos->File) + 2)) != NULL)
\r
2732 strcpy(Buf+BufLen, Pos->File);
\r
2733 BufLen += strlen(Pos->File) + 1;
\r
2738 memset(Buf+BufLen, NUL, 1);
\r
2739 DispFileProperty(Buf);
\r
2743 DeleteFileList(&FileListBase);
\r
2750 /*----- 属性変更ダイアログのコールバック --------------------------------------
\r
2753 * HWND hDlg : ウインドウハンドル
\r
2754 * UINT message : メッセージ番号
\r
2755 * WPARAM wParam : メッセージの WPARAM 引数
\r
2756 * LPARAM lParam : メッセージの LPARAM 引数
\r
2760 *----------------------------------------------------------------------------*/
\r
2762 BOOL CALLBACK ChmodDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2770 case WM_INITDIALOG :
\r
2771 Buf = (char *)lParam;
\r
2772 SendDlgItemMessage(hDlg, PERM_NOW, EM_LIMITTEXT, 4, 0);
\r
2773 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Buf);
\r
2774 SetAttrToDialog(hDlg, xtoi(Buf));
\r
2778 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2781 SendDlgItemMessage(hDlg, PERM_NOW, WM_GETTEXT, 5, (LPARAM)Buf);
\r
2782 EndDialog(hDlg, YES);
\r
2786 EndDialog(hDlg, NO);
\r
2789 case PERM_O_READ :
\r
2790 case PERM_O_WRITE :
\r
2791 case PERM_O_EXEC :
\r
2792 case PERM_G_READ :
\r
2793 case PERM_G_WRITE :
\r
2794 case PERM_G_EXEC :
\r
2795 case PERM_A_READ :
\r
2796 case PERM_A_WRITE :
\r
2797 case PERM_A_EXEC :
\r
2798 Tmp = GetAttrFromDialog(hDlg);
\r
2799 sprintf(Str, "%03X", Tmp);
\r
2800 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Str);
\r
2804 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000017);
\r
2813 /*----- 属性をダイアログボックスに設定 ----------------------------------------
\r
2816 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2821 *----------------------------------------------------------------------------*/
\r
2823 static void SetAttrToDialog(HWND hDlg, int Attr)
\r
2826 SendDlgItemMessage(hDlg, PERM_O_READ, BM_SETCHECK, 1, 0);
\r
2828 SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_SETCHECK, 1, 0);
\r
2830 SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_SETCHECK, 1, 0);
\r
2833 SendDlgItemMessage(hDlg, PERM_G_READ, BM_SETCHECK, 1, 0);
\r
2835 SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_SETCHECK, 1, 0);
\r
2837 SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_SETCHECK, 1, 0);
\r
2840 SendDlgItemMessage(hDlg, PERM_A_READ, BM_SETCHECK, 1, 0);
\r
2842 SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_SETCHECK, 1, 0);
\r
2844 SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_SETCHECK, 1, 0);
\r
2850 /*----- ダイアログボックスの内容から属性を取得 --------------------------------
\r
2853 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2857 *----------------------------------------------------------------------------*/
\r
2859 static int GetAttrFromDialog(HWND hDlg)
\r
2865 if(SendDlgItemMessage(hDlg, PERM_O_READ, BM_GETCHECK, 0, 0) == 1)
\r
2867 if(SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2869 if(SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2872 if(SendDlgItemMessage(hDlg, PERM_G_READ, BM_GETCHECK, 0, 0) == 1)
\r
2874 if(SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2876 if(SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2879 if(SendDlgItemMessage(hDlg, PERM_A_READ, BM_GETCHECK, 0, 0) == 1)
\r
2881 if(SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2883 if(SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2892 /*----- 任意のコマンドを送る --------------------------------------------------
\r
2899 *----------------------------------------------------------------------------*/
\r
2901 void SomeCmdProc(void)
\r
2905 FILELIST *FileListBase;
\r
2910 if(GetFocus() == GetRemoteHwnd())
\r
2912 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2915 FileListBase = NULL;
\r
2916 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2917 memset(Cmd, NUL, 81);
\r
2918 if(FileListBase != NULL)
\r
2920 strncpy(Cmd, FileListBase->File, 80);
\r
2922 DeleteFileList(&FileListBase);
\r
2924 if(InputDialogBox(somecmd_dlg, GetMainHwnd(), NULL, Cmd, 81, &Tmp, IDH_HELP_TOPIC_0000023) == YES)
\r
2937 /*----- ファイル総容量の計算を行う --------------------------------------------
\r
2944 *----------------------------------------------------------------------------*/
\r
2946 void CalcFileSizeProc(void)
\r
2948 FILELIST *ListBase;
\r
2957 if((All = DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_notify_dlg), GetMainHwnd(), SizeNotifyDlgWndProc)) != NO_ALL)
\r
2959 Sts = FFFTP_SUCCESS;
\r
2960 if(GetFocus() == GetLocalHwnd())
\r
2965 Sts = CheckClosedAndReconnect();
\r
2968 if(Sts == FFFTP_SUCCESS)
\r
2971 MakeSelectedFileList(Win, YES, All, &ListBase, &CancelFlg);
\r
2975 while(Pos != NULL)
\r
2977 if(Pos->Node != NODE_DIR)
\r
2978 FileSize += Pos->Size;
\r
2981 DeleteFileList(&ListBase);
\r
2982 DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_dlg), GetMainHwnd(), SizeDlgWndProc);
\r
2989 /*----- ファイル容量検索確認ダイアログのコールバック --------------------------
\r
2992 * HWND hDlg : ウインドウハンドル
\r
2993 * UINT message : メッセージ番号
\r
2994 * WPARAM wParam : メッセージの WPARAM 引数
\r
2995 * LPARAM lParam : メッセージの LPARAM 引数
\r
2999 *----------------------------------------------------------------------------*/
\r
3001 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
3005 case WM_INITDIALOG :
\r
3006 if(GetFocus() == GetLocalHwnd())
\r
3007 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN074);
\r
3009 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN075);
\r
3013 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3016 if(SendDlgItemMessage(hDlg, FSNOTIFY_SEL_ONLY, BM_GETCHECK, 0, 0) == 1)
\r
3017 EndDialog(hDlg, NO);
\r
3019 EndDialog(hDlg, YES);
\r
3023 EndDialog(hDlg, NO_ALL);
\r
3032 /*----- ファイル容量検索ダイアログのコールバック ------------------------------
\r
3035 * HWND hDlg : ウインドウハンドル
\r
3036 * UINT message : メッセージ番号
\r
3037 * WPARAM wParam : メッセージの WPARAM 引数
\r
3038 * LPARAM lParam : メッセージの LPARAM 引数
\r
3042 *----------------------------------------------------------------------------*/
\r
3044 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
3046 char Tmp[FMAX_PATH+1];
\r
3050 case WM_INITDIALOG :
\r
3051 if(GetFocus() == GetLocalHwnd())
\r
3052 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN076);
\r
3054 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN077);
\r
3056 MakeSizeString(FileSize, Tmp);
\r
3057 SendDlgItemMessage(hDlg, FSIZE_SIZE, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
3061 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3065 EndDialog(hDlg, YES);
\r
3075 /*----- ディレクトリ移動失敗時のエラーを表示 ----------------------------------
\r
3078 * HWND hDlg : ウインドウハンドル
\r
3082 *----------------------------------------------------------------------------*/
\r
3084 void DispCWDerror(HWND hWnd)
\r
3086 DialogBox(GetFtpInst(), MAKEINTRESOURCE(cwderr_dlg), hWnd, ExeEscDialogProc);
\r
3091 /*----- URLをクリップボードにコピー -------------------------------------------
\r
3098 *----------------------------------------------------------------------------*/
\r
3100 void CopyURLtoClipBoard(void)
\r
3102 FILELIST *FileListBase;
\r
3105 char Path[FMAX_PATH+1];
\r
3106 char Host[HOST_ADRS_LEN+1];
\r
3111 if(GetFocus() == GetRemoteHwnd())
\r
3113 FileListBase = NULL;
\r
3114 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
3115 if(FileListBase != NULL)
\r
3117 strcpy(Host, AskHostAdrs());
\r
3120 Pos = FileListBase;
\r
3121 while(Pos != NULL)
\r
3123 AskRemoteCurDir(Path, FMAX_PATH);
\r
3124 SetSlashTail(Path);
\r
3125 strcat(Path, Pos->File);
\r
3127 if(AskHostType() == HTYPE_VMS)
\r
3128 ReformToVMSstylePathName(Path);
\r
3131 if(AskHostPort() != PORT_NOR)
\r
3132 sprintf(Port, ":%d", AskHostPort());
\r
3135 Total += strlen(Path) + strlen(Host) + strlen(Port) + 8; /* 8は "ftp://\r\n" のぶん */
\r
3136 if(AskHostType() == HTYPE_VMS)
\r
3139 if((Buf = realloc(Buf, Total+1)) == NULL)
\r
3142 if(AskHostType() != HTYPE_VMS)
\r
3143 sprintf(Buf + Set, "ftp://%s%s%s\r\n", Host, Port, Path);
\r
3145 sprintf(Buf + Set, "ftp://%s%s/%s\r\n", Host, Port, Path);
\r
3152 CopyStrToClipBoard(Buf);
\r
3156 DeleteFileList(&FileListBase);
\r
3162 /*----- フルパスを使わないファイルアクセスの準備 ------------------------------
\r
3165 * char *Path : パス名
\r
3166 * char *CurDir : カレントディレクトリ
\r
3167 * HWND hWnd : エラーウインドウを表示する際の親ウインドウ
\r
3168 * int Type : 使用するソケットの種類
\r
3169 * 0=コマンドソケット, 1=転送ソケット
\r
3172 * int ステータス(FFFTP_SUCCESS/FFFTP_FAIL)
\r
3176 * このモジュール内で CWD を行ない、
\r
3177 * Path にファイル名のみ残す。(パス名は消す)
\r
3178 *----------------------------------------------------------------------------*/
\r
3181 //int ProcForNonFullpath(char *Path, char *CurDir, HWND hWnd, int Type)
\r
3182 int ProcForNonFullpath(SOCKET cSkt, char *Path, char *CurDir, HWND hWnd, int *CancelCheckWork)
\r
3186 char Tmp[FMAX_PATH+1];
\r
3188 Sts = FFFTP_SUCCESS;
\r
3189 if(AskNoFullPathMode() == YES)
\r
3191 strcpy(Tmp, Path);
\r
3192 if(AskHostType() == HTYPE_VMS)
\r
3194 GetUpperDirEraseTopSlash(Tmp);
\r
3195 ReformToVMSstyleDirName(Tmp);
\r
3197 else if(AskHostType() == HTYPE_STRATUS)
\r
3198 GetUpperDirEraseTopSlash(Tmp);
\r
3202 if(strcmp(Tmp, CurDir) != 0)
\r
3206 // Cmd = CommandProcCmd(NULL, "CWD %s", Tmp);
\r
3208 // Cmd = CommandProcTrn(NULL, "CWD %s", Tmp);
\r
3209 Cmd = CommandProcTrn(cSkt, NULL, CancelCheckWork, "CWD %s", Tmp);
\r
3211 if(Cmd/100 != FTP_COMPLETE)
\r
3213 DispCWDerror(hWnd);
\r
3217 strcpy(CurDir, Tmp);
\r
3219 strcpy(Path, GetFileName(Path));
\r
3225 /*----- ディレクトリ名をVAX VMSスタイルに変換する -----------------------------
\r
3228 * char *Path : パス名
\r
3234 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr.ppp]
\r
3235 *----------------------------------------------------------------------------*/
\r
3237 void ReformToVMSstyleDirName(char *Path)
\r
3242 if((Btm = strchr(Path, ']')) != NULL)
\r
3245 while((Pos = strchr(Pos, '/')) != NULL)
\r
3248 memmove(Btm, Btm+1, strlen(Btm+1)+1);
\r
3249 Pos = strchr(Path, NUL);
\r
3250 if(*(Pos-1) == '.')
\r
3261 /*----- ファイル名をVAX VMSスタイルに変換する ---------------------------------
\r
3264 * char *Path : パス名
\r
3270 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr]ppp
\r
3271 *----------------------------------------------------------------------------*/
\r
3273 void ReformToVMSstylePathName(char *Path)
\r
3275 char Fname[FMAX_PATH+1];
\r
3277 strcpy(Fname, GetFileName(Path));
\r
3279 GetUpperDirEraseTopSlash(Path);
\r
3280 ReformToVMSstyleDirName(Path);
\r
3282 strcat(Path, Fname);
\r
3288 #if defined(HAVE_OPENVMS)
\r
3289 /*----- VMSの"HOGE.DIR;?"というディレクトリ名から"HOGE"を取り出す ---------------
\r
3292 * char *DirName : "HOGE.DIR;?"形式のディレクトリ名
\r
3293 * int Flg : ";"のチェックをする(TRUE)かしない(FALSE)か
\r
3300 *----------------------------------------------------------------------------*/
\r
3302 void ReformVMSDirName(char *DirName, int Flg)
\r
3306 if (Flg == TRUE) {
\r
3307 /* ';'がない場合はVMS形式じゃなさそうなので何もしない */
\r
3308 if ((p = strrchr(DirName, ';')) == NULL)
\r
3312 /* ".DIR"があったらつぶす */
\r
3313 if ((p = strrchr(DirName, '.'))) {
\r
3314 if (memcmp(p + 1, "DIR", 3) == 0)
\r
3321 /*----- ファイル名に使えない文字がないかチェックし名前を変更する --------------
\r
3324 * char *Fname : ファイル名
\r
3328 * FFFTP_SUCCESS/FFFTP_FAIL=中止する
\r
3332 *----------------------------------------------------------------------------*/
\r
3334 static int RenameUnuseableName(char *Fname)
\r
3339 Ret = FFFTP_SUCCESS;
\r
3342 if((_mbschr(Fname, ':') != NULL) ||
\r
3343 (_mbschr(Fname, '*') != NULL) ||
\r
3344 (_mbschr(Fname, '?') != NULL) ||
\r
3345 (_mbschr(Fname, '<') != NULL) ||
\r
3346 (_mbschr(Fname, '>') != NULL) ||
\r
3347 (_mbschr(Fname, '|') != NULL) ||
\r
3348 (_mbschr(Fname, '\x22') != NULL) ||
\r
3349 (_mbschr(Fname, '\\') != NULL))
\r
3351 if(InputDialogBox(forcerename_dlg, GetMainHwnd(), NULL, Fname, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001) == NO)
\r