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
31 #include <windows.h>
\r
35 #include <mbstring.h>
\r
36 #include <windowsx.h>
\r
37 #include <commctrl.h>
\r
40 #include "resource.h"
\r
42 #include <htmlhelp.h>
\r
46 #undef __MBSWRAPPER_H__
\r
47 #include "mbswrapper.h"
\r
50 /*===== プロトタイプ =====*/
\r
52 static int CheckRemoteFile(TRANSPACKET *Pkt, FILELIST *ListList);
\r
53 static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
55 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote);
\r
56 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base);
\r
57 static int CheckLocalFile(TRANSPACKET *Pkt);
\r
58 static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
59 static void RemoveAfterSemicolon(char *Path);
\r
60 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base);
\r
61 static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
62 static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
63 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt);
\r
64 static int AskMirrorNoTrn(char *Fname, int Mode);
\r
65 static int AskUpLoadFileAttr(char *Fname);
\r
66 static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
67 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir);
\r
68 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir);
\r
69 static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
70 static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);
\r
71 static void SetAttrToDialog(HWND hWnd, int Attr);
\r
72 static int GetAttrFromDialog(HWND hDlg);
\r
73 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
74 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
\r
75 static int RenameUnuseableName(char *Fname);
\r
79 extern HWND hHelpWin;
\r
82 extern int FnameCnv;
\r
83 extern int RecvMode;
\r
84 extern int SendMode;
\r
85 extern int MoveMode;
\r
86 extern char MirrorNoTrn[MIRROR_LEN+1];
\r
87 extern char MirrorNoDel[MIRROR_LEN+1];
\r
88 extern int MirrorFnameCnv;
\r
89 extern char DefAttrList[DEFATTRLIST_LEN+1];
\r
90 extern SIZE MirrorDlgSize;
\r
91 extern int VaxSemicolon;
\r
92 extern int DebugConsole;
\r
93 extern int CancelFlg;
\r
95 /*===== ローカルなワーク =====*/
\r
97 static char TmpString[FMAX_PATH+80]; /* テンポラリ */
\r
98 static int CurWin; /* ウインドウ番号 */
\r
100 int UpExistMode = EXIST_OVW; /* アップロードで同じ名前のファイルがある時の扱い方 EXIST_xxx */
\r
101 int ExistMode = EXIST_OVW; /* 同じ名前のファイルがある時の扱い方 EXIST_xxx */
\r
102 static int ExistNotify; /* 確認ダイアログを出すかどうか YES/NO */
\r
104 static double FileSize; /* ファイル総容量 */
\r
108 /*----- ファイル一覧で指定されたファイルをダウンロードする --------------------
\r
111 * int ChName : 名前を変えるかどうか (YES/NO)
\r
112 * int ForceFile : ディレクトリをファイル見なすかどうか (YES/NO)
\r
113 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
117 *----------------------------------------------------------------------------*/
\r
119 void DownLoadProc(int ChName, int ForceFile, int All)
\r
121 FILELIST *FileListBase;
\r
125 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
130 // KeepTransferDialog(YES);
\r
132 FileListBase = NULL;
\r
133 MakeSelectedFileList(WIN_REMOTE, (ForceFile == YES ? NO : YES), All, &FileListBase, &CancelFlg);
\r
135 if(AskNoFullPathMode() == YES)
\r
137 strcpy(Pkt.Cmd, "SETCUR");
\r
138 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
139 AddTransFileList(&Pkt);
\r
142 Pos = FileListBase;
\r
145 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
146 SetYenTail(Pkt.LocalFile);
\r
147 strcpy(TmpString, Pos->File);
\r
148 if((ChName == NO) || ((ForceFile == NO) && (Pos->Node == NODE_DIR)))
\r
150 if(FnameCnv == FNAME_LOWER)
\r
151 _mbslwr(TmpString);
\r
152 else if(FnameCnv == FNAME_UPPER)
\r
153 _mbsupr(TmpString);
\r
154 RemoveAfterSemicolon(TmpString);
\r
155 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
160 CurWin = WIN_REMOTE;
\r
161 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
163 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
169 strcat(Pkt.LocalFile, TmpString);
\r
170 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
172 if((ForceFile == NO) && (Pos->Node == NODE_DIR))
\r
174 strcpy(Pkt.Cmd, "MKD ");
\r
175 strcpy(Pkt.RemoteFile, "");
\r
176 AddTransFileList(&Pkt);
\r
178 else if((Pos->Node == NODE_FILE) ||
\r
179 ((ForceFile == YES) && (Pos->Node == NODE_DIR)))
\r
181 if(AskHostType() == HTYPE_ACOS)
\r
183 strcpy(Pkt.RemoteFile, "'");
\r
184 strcat(Pkt.RemoteFile, AskHostLsName());
\r
185 strcat(Pkt.RemoteFile, "(");
\r
186 strcat(Pkt.RemoteFile, Pos->File);
\r
187 strcat(Pkt.RemoteFile, ")");
\r
188 strcat(Pkt.RemoteFile, "'");
\r
190 else if(AskHostType() == HTYPE_ACOS_4)
\r
192 strcpy(Pkt.RemoteFile, Pos->File);
\r
196 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
197 SetSlashTail(Pkt.RemoteFile);
\r
198 strcat(Pkt.RemoteFile, Pos->File);
\r
199 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
202 strcpy(Pkt.Cmd, "RETR ");
\r
203 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
204 Pkt.Size = Pos->Size;
\r
205 Pkt.Time = Pos->Time;
\r
206 Pkt.KanjiCode = AskHostKanjiCode();
\r
208 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
209 Pkt.KanaCnv = AskHostKanaCnv();
\r
211 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
212 if(Pkt.Mode == EXIST_ABORT)
\r
214 else if(Pkt.Mode != EXIST_IGNORE)
\r
215 AddTransFileList(&Pkt);
\r
220 if(AskNoFullPathMode() == YES)
\r
222 strcpy(Pkt.Cmd, "BACKCUR");
\r
223 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
224 AddTransFileList(&Pkt);
\r
226 DeleteFileList(&FileListBase);
\r
228 strcpy(Pkt.Cmd, "GOQUIT");
\r
229 AddTransFileList(&Pkt);
\r
231 GoForwardTransWindow();
\r
232 // KeepTransferDialog(NO);
\r
240 /*----- 指定されたファイルを一つダウンロードする ------------------------------
\r
243 * char *Fname : ファイル名
\r
247 *----------------------------------------------------------------------------*/
\r
249 void DirectDownLoadProc(char *Fname)
\r
253 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
258 // KeepTransferDialog(YES);
\r
260 if(AskNoFullPathMode() == YES)
\r
262 strcpy(Pkt.Cmd, "SETCUR");
\r
263 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
264 AddTransFileList(&Pkt);
\r
267 if(strlen(Fname) > 0)
\r
269 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
270 SetYenTail(Pkt.LocalFile);
\r
271 strcpy(TmpString, Fname);
\r
272 if(FnameCnv == FNAME_LOWER)
\r
273 _mbslwr(TmpString);
\r
274 else if(FnameCnv == FNAME_UPPER)
\r
275 _mbsupr(TmpString);
\r
276 RemoveAfterSemicolon(TmpString);
\r
278 if(RenameUnuseableName(TmpString) == FFFTP_SUCCESS)
\r
280 strcat(Pkt.LocalFile, TmpString);
\r
281 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
283 if(AskHostType() == HTYPE_ACOS)
\r
285 strcpy(Pkt.RemoteFile, "'");
\r
286 strcat(Pkt.RemoteFile, AskHostLsName());
\r
287 strcat(Pkt.RemoteFile, "(");
\r
288 strcat(Pkt.RemoteFile, Fname);
\r
289 strcat(Pkt.RemoteFile, ")");
\r
290 strcat(Pkt.RemoteFile, "'");
\r
292 else if(AskHostType() == HTYPE_ACOS_4)
\r
294 strcpy(Pkt.RemoteFile, Fname);
\r
298 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
299 SetSlashTail(Pkt.RemoteFile);
\r
300 strcat(Pkt.RemoteFile, Fname);
\r
301 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
304 strcpy(Pkt.Cmd, "RETR-S ");
\r
305 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
307 /* サイズと日付は転送側スレッドで取得し、セットする */
\r
309 Pkt.KanjiCode = AskHostKanjiCode();
\r
311 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
312 Pkt.KanaCnv = AskHostKanaCnv();
\r
314 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
315 if((Pkt.Mode != EXIST_ABORT) && (Pkt.Mode != EXIST_IGNORE))
\r
316 AddTransFileList(&Pkt);
\r
320 if(AskNoFullPathMode() == YES)
\r
322 strcpy(Pkt.Cmd, "BACKCUR");
\r
323 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
324 AddTransFileList(&Pkt);
\r
327 strcpy(Pkt.Cmd, "GOQUIT");
\r
328 AddTransFileList(&Pkt);
\r
330 GoForwardTransWindow();
\r
331 // KeepTransferDialog(NO);
\r
339 /*----- 入力されたファイル名のファイルを一つダウンロードする ------------------
\r
346 *----------------------------------------------------------------------------*/
\r
348 void InputDownLoadProc(void)
\r
350 char Path[FMAX_PATH+1];
\r
353 // DisableUserOpe();
\r
356 if(InputDialogBox(downname_dlg, GetMainHwnd(), NULL, Path, FMAX_PATH, &Tmp, IDH_HELP_TOPIC_0000001) == YES)
\r
358 DirectDownLoadProc(Path);
\r
361 // EnableUserOpe();
\r
367 /*----- ミラーリングダウンロードを行う ----------------------------------------
\r
370 * int Notify : 確認を行うかどうか (YES/NO)
\r
374 *----------------------------------------------------------------------------*/
\r
376 void MirrorDownloadProc(int Notify)
\r
378 FILELIST *LocalListBase;
\r
379 FILELIST *RemoteListBase;
\r
380 FILELIST *LocalPos;
\r
381 FILELIST *RemotePos;
\r
384 char Name[FMAX_PATH+1];
\r
389 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
396 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_down_dlg), GetMainHwnd(), MirrorNotifyCallBack, 0);
\r
400 if((Notify == YES) || (Notify == YES_LIST))
\r
402 /*===== ファイルリスト取得 =====*/
\r
404 LocalListBase = NULL;
\r
405 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
406 RemoteListBase = NULL;
\r
407 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
409 RemotePos = RemoteListBase;
\r
410 while(RemotePos != NULL)
\r
412 RemotePos->Attr = YES; /* RemotePos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
413 RemotePos = RemotePos->Next;
\r
416 LocalPos = LocalListBase;
\r
417 while(LocalPos != NULL)
\r
419 if(AskMirrorNoTrn(LocalPos->File, 1) == NO)
\r
421 LocalPos->Attr = YES;
\r
422 LocalPos = LocalPos->Next;
\r
426 LocalPos->Attr = NO; /* LocalPos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
428 if(LocalPos->Node == NODE_DIR)
\r
430 Level = AskDirLevel(LocalPos->File);
\r
431 LocalPos = LocalPos->Next;
\r
432 while(LocalPos != NULL)
\r
434 if((LocalPos->Node == NODE_DIR) &&
\r
435 (AskDirLevel(LocalPos->File) <= Level))
\r
439 LocalPos->Attr = NO;
\r
440 LocalPos = LocalPos->Next;
\r
444 LocalPos = LocalPos->Next;
\r
448 /*===== ファイルリスト比較 =====*/
\r
450 RemotePos = RemoteListBase;
\r
451 while(RemotePos != NULL)
\r
453 if(AskMirrorNoTrn(RemotePos->File, 0) == NO)
\r
455 strcpy(Name, RemotePos->File);
\r
456 // ReplaceAll(Name, '/', '\\');
\r
458 if(MirrorFnameCnv == YES)
\r
459 Mode = COMP_LOWERMATCH;
\r
461 Mode = COMP_STRICT;
\r
463 if((LocalPos = SearchFileList(Name, LocalListBase, Mode)) != NULL)
\r
465 if((RemotePos->Node == NODE_DIR) && (LocalPos->Node == NODE_DIR))
\r
467 LocalPos->Attr = NO;
\r
468 RemotePos->Attr = NO;
\r
470 else if((RemotePos->Node == NODE_FILE) && (LocalPos->Node == NODE_FILE))
\r
472 LocalPos->Attr = NO;
\r
473 if(CompareFileTime(&RemotePos->Time, &LocalPos->Time) <= 0)
\r
474 RemotePos->Attr = NO;
\r
477 RemotePos = RemotePos->Next;
\r
481 if(RemotePos->Node == NODE_FILE)
\r
483 RemotePos->Attr = NO;
\r
484 RemotePos = RemotePos->Next;
\r
488 RemotePos->Attr = NO;
\r
489 Level = AskDirLevel(RemotePos->File);
\r
490 RemotePos = RemotePos->Next;
\r
491 while(RemotePos != NULL)
\r
493 if((RemotePos->Node == NODE_DIR) &&
\r
494 (AskDirLevel(RemotePos->File) <= Level))
\r
498 RemotePos->Attr = NO;
\r
499 RemotePos = RemotePos->Next;
\r
505 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
507 /*===== 削除/アップロード =====*/
\r
509 LocalPos = LocalListBase;
\r
510 while(LocalPos != NULL)
\r
512 if((LocalPos->Attr == YES) && (LocalPos->Node == NODE_FILE))
\r
514 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
515 SetYenTail(Pkt.LocalFile);
\r
516 strcat(Pkt.LocalFile, LocalPos->File);
\r
517 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
518 strcpy(Pkt.RemoteFile, "");
\r
519 strcpy(Pkt.Cmd, "L-DELE ");
\r
520 AddTmpTransFileList(&Pkt, &Base);
\r
522 LocalPos = LocalPos->Next;
\r
524 MirrorDeleteAllLocalDir(LocalListBase, &Pkt, &Base);
\r
527 RemotePos = RemoteListBase;
\r
528 while(RemotePos != NULL)
\r
530 if(RemotePos->Attr == YES)
\r
532 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
533 SetYenTail(Pkt.LocalFile);
\r
534 Cat = strchr(Pkt.LocalFile, NUL);
\r
535 strcat(Pkt.LocalFile, RemotePos->File);
\r
537 if(MirrorFnameCnv == YES)
\r
540 RemoveAfterSemicolon(Cat);
\r
541 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
543 if(RemotePos->Node == NODE_DIR)
\r
545 strcpy(Pkt.RemoteFile, "");
\r
546 strcpy(Pkt.Cmd, "L-MKD ");
\r
547 AddTmpTransFileList(&Pkt, &Base);
\r
549 else if(RemotePos->Node == NODE_FILE)
\r
551 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
552 SetSlashTail(Pkt.RemoteFile);
\r
553 strcat(Pkt.RemoteFile, RemotePos->File);
\r
554 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
556 strcpy(Pkt.Cmd, "RETR ");
\r
557 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
558 Pkt.Size = RemotePos->Size;
\r
559 Pkt.Time = RemotePos->Time;
\r
561 Pkt.KanjiCode = AskHostKanjiCode();
\r
563 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
564 Pkt.KanaCnv = AskHostKanaCnv();
\r
565 Pkt.Mode = EXIST_OVW;
\r
566 AddTmpTransFileList(&Pkt, &Base);
\r
569 RemotePos = RemotePos->Next;
\r
572 if((Notify == YES) ||
\r
573 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirrordown_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
575 if(AskNoFullPathMode() == YES)
\r
577 strcpy(Pkt.Cmd, "SETCUR");
\r
578 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
579 AddTransFileList(&Pkt);
\r
581 AppendTransFileList(Base);
\r
583 if(AskNoFullPathMode() == YES)
\r
585 strcpy(Pkt.Cmd, "BACKCUR");
\r
586 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
587 AddTransFileList(&Pkt);
\r
590 strcpy(Pkt.Cmd, "GOQUIT");
\r
591 AddTransFileList(&Pkt);
\r
594 EraseTmpTransFileList(&Base);
\r
596 DeleteFileList(&LocalListBase);
\r
597 DeleteFileList(&RemoteListBase);
\r
599 GoForwardTransWindow();
\r
608 /*----- ミラーリングのファイル一覧を表示 --------------------------------------
\r
611 * FILELIST *Local : ローカル側
\r
612 * FILELIST *Remote : リモート側
\r
616 *----------------------------------------------------------------------------*/
\r
618 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote)
\r
624 if(DebugConsole == YES)
\r
626 DoPrintf("---- MIRROR FILE LIST ----");
\r
627 while(Local != NULL)
\r
629 FileTimeToLocalFileTime(&Local->Time, &fTime);
\r
630 FileTimeToSystemTime(&fTime, &sTime);
\r
631 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
632 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
633 DoPrintf("LOCAL : %s %s [%s] %s", Local->Attr==1?"YES":"NO ", Local->Node==NODE_DIR?"DIR ":"FILE", Date, Local->File);
\r
634 Local = Local->Next;
\r
636 while(Remote != NULL)
\r
638 FileTimeToLocalFileTime(&Remote->Time, &fTime);
\r
639 FileTimeToSystemTime(&fTime, &sTime);
\r
640 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
641 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
642 DoPrintf("REMOTE : %s %s [%s] %s", Remote->Attr==1?"YES":"NO ", Remote->Node==NODE_DIR?"DIR ":"FILE", Date, Remote->File);
\r
643 Remote = Remote->Next;
\r
645 DoPrintf("---- END ----");
\r
651 /*----- ミラーリング時のローカル側のフォルダ削除 ------------------------------
\r
654 * FILELIST *Local : ファイルリスト
\r
655 * TRANSPACKET *Pkt :
\r
656 * TRANSPACKET **Base :
\r
660 *----------------------------------------------------------------------------*/
\r
662 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
664 while(Local != NULL)
\r
666 if(Local->Node == NODE_DIR)
\r
668 MirrorDeleteAllLocalDir(Local->Next, Pkt, Base);
\r
670 if(Local->Attr == YES)
\r
672 AskLocalCurDir(Pkt->LocalFile, FMAX_PATH);
\r
673 SetYenTail(Pkt->LocalFile);
\r
674 strcat(Pkt->LocalFile, Local->File);
\r
675 ReplaceAll(Pkt->LocalFile, '/', '\\');
\r
676 strcpy(Pkt->RemoteFile, "");
\r
677 strcpy(Pkt->Cmd, "L-RMD ");
\r
678 AddTmpTransFileList(Pkt, Base);
\r
682 Local = Local->Next;
\r
688 /*----- ファイル名のセミコロン以降を取り除く ----------------------------------
\r
691 * char *Path : ファイル名
\r
698 * オプション設定によって処理を切替える
\r
699 *----------------------------------------------------------------------------*/
\r
701 static void RemoveAfterSemicolon(char *Path)
\r
705 if(VaxSemicolon == YES)
\r
707 if((Pos = strchr(Path, ';')) != NULL)
\r
714 /*----- ローカルに同じ名前のファイルがないかチェック --------------------------
\r
717 * TRANSPACKET *Pkt : 転送ファイル情報
\r
721 * EXIST_OVW/EXIST_RESUME/EXIST_IGNORE
\r
724 * Pkt.ExistSize, ExistMode、ExistNotify が変更される
\r
725 *----------------------------------------------------------------------------*/
\r
727 static int CheckLocalFile(TRANSPACKET *Pkt)
\r
730 WIN32_FIND_DATA Find;
\r
734 Pkt->ExistSize = 0;
\r
735 if(RecvMode != TRANS_OVW)
\r
737 if((fHnd = FindFirstFile(Pkt->LocalFile, &Find)) != INVALID_HANDLE_VALUE)
\r
741 Pkt->ExistSize = MakeLongLong(Find.nFileSizeHigh, Find.nFileSizeLow);
\r
743 if(ExistNotify == YES)
\r
745 SoundPlay(SND_ERROR);
\r
746 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(down_exist_dlg), GetMainHwnd(), DownExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
754 if(Ret == EXIST_NEW)
\r
757 if(CompareFileTime(&Find.ftLastWriteTime, &Pkt->Time) < 0)
\r
760 Ret = EXIST_IGNORE;
\r
768 /*----- ローカルに同じ名前のファイルがある時の確認ダイアログのコールバック ----
\r
771 * HWND hDlg : ウインドウハンドル
\r
772 * UINT message : メッセージ番号
\r
773 * WPARAM wParam : メッセージの WPARAM 引数
\r
774 * LPARAM lParam : メッセージの LPARAM 引数
\r
778 *----------------------------------------------------------------------------*/
\r
780 static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
782 static TRANSPACKET *Pkt;
\r
783 static const RADIOBUTTON DownExistButton[] = {
\r
784 { DOWN_EXIST_OVW, EXIST_OVW },
\r
785 { DOWN_EXIST_NEW, EXIST_NEW },
\r
786 { DOWN_EXIST_RESUME, EXIST_RESUME },
\r
787 { DOWN_EXIST_IGNORE, EXIST_IGNORE }
\r
789 #define DOWNEXISTBUTTONS (sizeof(DownExistButton)/sizeof(RADIOBUTTON))
\r
793 case WM_INITDIALOG :
\r
794 Pkt = (TRANSPACKET *)lParam;
\r
795 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
796 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->LocalFile);
\r
798 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
799 EnableWindow(GetDlgItem(hDlg, DOWN_EXIST_RESUME), FALSE);
\r
801 SetRadioButtonByValue(hDlg, ExistMode, DownExistButton, DOWNEXISTBUTTONS);
\r
805 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
809 /* ここに break はない */
\r
812 ExistMode = AskRadioButtonValue(hDlg, DownExistButton, DOWNEXISTBUTTONS);
\r
813 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->LocalFile);
\r
814 EndDialog(hDlg, YES);
\r
818 // ExistMode = EXIST_ABORT;
\r
819 EndDialog(hDlg, NO);
\r
823 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000009);
\r
836 /*----- ファイル一覧で指定されたファイルをアップロードする --------------------
\r
839 * int ChName : 名前を変えるかどうか (YES/NO)
\r
840 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
844 *----------------------------------------------------------------------------*/
\r
846 void UpLoadListProc(int ChName, int All)
\r
848 FILELIST *FileListBase;
\r
853 FILELIST *RemoteList;
\r
854 char Tmp[FMAX_PATH+1];
\r
857 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
861 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
862 FileListBase = NULL;
\r
863 MakeSelectedFileList(WIN_LOCAL, YES, All, &FileListBase, &CancelFlg);
\r
865 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
868 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
873 Pos = FileListBase;
\r
876 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
877 SetSlashTail(Pkt.RemoteFile);
\r
878 Cat = strchr(Pkt.RemoteFile, NUL);
\r
879 if((ChName == NO) || (Pos->Node == NODE_DIR))
\r
881 strcat(Pkt.RemoteFile, Pos->File);
\r
882 if(FnameCnv == FNAME_LOWER)
\r
884 else if(FnameCnv == FNAME_UPPER)
\r
890 strcpy(TmpString, Pos->File);
\r
891 CurWin = WIN_LOCAL;
\r
892 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
893 strcat(Pkt.RemoteFile, TmpString);
\r
897 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
899 if(AskHostType() == HTYPE_ACOS)
\r
901 strcpy(Pkt.RemoteFile, "'");
\r
902 strcat(Pkt.RemoteFile, AskHostLsName());
\r
903 strcat(Pkt.RemoteFile, "(");
\r
904 strcat(Pkt.RemoteFile, Cat);
\r
905 strcat(Pkt.RemoteFile, ")");
\r
906 strcat(Pkt.RemoteFile, "'");
\r
908 else if(AskHostType() == HTYPE_ACOS_4)
\r
909 strcpy(Pkt.RemoteFile, Cat);
\r
911 if(Pos->Node == NODE_DIR)
\r
915 // ホスト側のファイル一覧をRemoteListに登録
\r
917 if(RemoteList != NULL)
\r
918 DeleteFileList(&RemoteList);
\r
921 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
922 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
924 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
925 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
926 DoCWD(Tmp, NO, NO, NO);
\r
931 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
933 strcpy(Pkt1.Cmd, "SETCUR");
\r
934 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
935 AddTransFileList(&Pkt1);
\r
938 strcpy(Pkt.Cmd, "MKD ");
\r
939 strcpy(Pkt.LocalFile, "");
\r
940 AddTransFileList(&Pkt);
\r
943 else if(Pos->Node == NODE_FILE)
\r
946 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
947 SetYenTail(Pkt.LocalFile);
\r
948 strcat(Pkt.LocalFile, Pos->File);
\r
949 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
951 strcpy(Pkt.Cmd, "STOR ");
\r
952 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
954 Pkt.Time = Pos->Time;
\r
955 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
956 Pkt.KanjiCode = AskHostKanjiCode();
\r
958 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
959 Pkt.KanaCnv = AskHostKanaCnv();
\r
960 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
961 if(Pkt.Mode == EXIST_ABORT)
\r
963 else if(Pkt.Mode != EXIST_IGNORE)
\r
965 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
967 strcpy(Pkt1.Cmd, "SETCUR");
\r
968 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
969 AddTransFileList(&Pkt1);
\r
972 AddTransFileList(&Pkt);
\r
978 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
980 strcpy(Pkt.Cmd, "BACKCUR");
\r
981 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
982 AddTransFileList(&Pkt);
\r
985 if(RemoteList != NULL)
\r
986 DeleteFileList(&RemoteList);
\r
988 DeleteFileList(&FileListBase);
\r
990 strcpy(Pkt.Cmd, "GOQUIT");
\r
991 AddTransFileList(&Pkt);
\r
993 GoForwardTransWindow();
\r
1001 /*----- ドラッグ&ドロップで指定されたファイルをアップロードする --------------
\r
1004 * WPARAM wParam : ドロップされたファイルの情報
\r
1008 *----------------------------------------------------------------------------*/
\r
1010 void UpLoadDragProc(WPARAM wParam)
\r
1012 FILELIST *FileListBase;
\r
1017 FILELIST *RemoteList;
\r
1018 char Tmp[FMAX_PATH+1];
\r
1020 char Cur[FMAX_PATH+1];
\r
1022 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1026 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
1027 FileListBase = NULL;
\r
1028 MakeDroppedFileList(wParam, Cur, &FileListBase);
\r
1030 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
1032 RemoteList = NULL;
\r
1033 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
1036 ExistNotify = YES;
\r
1038 Pos = FileListBase;
\r
1039 while(Pos != NULL)
\r
1041 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1042 SetSlashTail(Pkt.RemoteFile);
\r
1043 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1045 strcat(Pkt.RemoteFile, Pos->File);
\r
1046 if(FnameCnv == FNAME_LOWER)
\r
1048 else if(FnameCnv == FNAME_UPPER)
\r
1050 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1052 if(AskHostType() == HTYPE_ACOS)
\r
1054 strcpy(Pkt.RemoteFile, "'");
\r
1055 strcat(Pkt.RemoteFile, AskHostLsName());
\r
1056 strcat(Pkt.RemoteFile, "(");
\r
1057 strcat(Pkt.RemoteFile, Cat);
\r
1058 strcat(Pkt.RemoteFile, ")");
\r
1059 strcat(Pkt.RemoteFile, "'");
\r
1061 else if(AskHostType() == HTYPE_ACOS_4)
\r
1062 strcpy(Pkt.RemoteFile, Cat);
\r
1064 if(Pos->Node == NODE_DIR)
\r
1068 // ホスト側のファイル一覧をRemoteListに登録
\r
1070 if(RemoteList != NULL)
\r
1071 DeleteFileList(&RemoteList);
\r
1072 RemoteList = NULL;
\r
1074 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
1075 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
1077 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
1078 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
1079 DoCWD(Tmp, NO, NO, NO);
\r
1083 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1085 strcpy(Pkt1.Cmd, "SETCUR");
\r
1086 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1087 AddTransFileList(&Pkt1);
\r
1090 strcpy(Pkt.Cmd, "MKD ");
\r
1091 strcpy(Pkt.LocalFile, "");
\r
1092 AddTransFileList(&Pkt);
\r
1095 else if(Pos->Node == NODE_FILE)
\r
1098 strcpy(Pkt.LocalFile, Cur);
\r
1099 SetYenTail(Pkt.LocalFile);
\r
1100 strcat(Pkt.LocalFile, Pos->File);
\r
1101 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1103 strcpy(Pkt.Cmd, "STOR ");
\r
1104 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1106 Pkt.Time = Pos->Time;
\r
1107 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1108 Pkt.KanjiCode = AskHostKanjiCode();
\r
1110 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1111 Pkt.KanaCnv = AskHostKanaCnv();
\r
1112 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
1113 if(Pkt.Mode == EXIST_ABORT)
\r
1115 else if(Pkt.Mode != EXIST_IGNORE)
\r
1117 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1119 strcpy(Pkt1.Cmd, "SETCUR");
\r
1120 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1121 AddTransFileList(&Pkt1);
\r
1124 AddTransFileList(&Pkt);
\r
1130 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
1132 strcpy(Pkt.Cmd, "BACKCUR");
\r
1133 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1134 AddTransFileList(&Pkt);
\r
1137 if(RemoteList != NULL)
\r
1138 DeleteFileList(&RemoteList);
\r
1140 DeleteFileList(&FileListBase);
\r
1142 strcpy(Pkt.Cmd, "GOQUIT");
\r
1143 AddTransFileList(&Pkt);
\r
1145 GoForwardTransWindow();
\r
1153 /*----- ミラーリングアップロードを行う ----------------------------------------
\r
1156 * int Notify : 確認を行うかどうか (YES/NO)
\r
1160 *----------------------------------------------------------------------------*/
\r
1162 void MirrorUploadProc(int Notify)
\r
1164 FILELIST *LocalListBase;
\r
1165 FILELIST *RemoteListBase;
\r
1166 FILELIST *LocalPos;
\r
1167 FILELIST *RemotePos;
\r
1169 TRANSPACKET *Base;
\r
1170 char Name[FMAX_PATH+1];
\r
1174 SYSTEMTIME TmpStime;
\r
1175 FILETIME TmpFtimeL;
\r
1176 FILETIME TmpFtimeR;
\r
1178 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1185 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_up_dlg), GetMainHwnd(), MirrorNotifyCallBack, 1);
\r
1189 if((Notify == YES) || (Notify == YES_LIST))
\r
1191 /*===== ファイルリスト取得 =====*/
\r
1193 LocalListBase = NULL;
\r
1194 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
1195 RemoteListBase = NULL;
\r
1196 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
1198 LocalPos = LocalListBase;
\r
1199 while(LocalPos != NULL)
\r
1201 LocalPos->Attr = YES; /* LocalPos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
1202 LocalPos = LocalPos->Next;
\r
1205 RemotePos = RemoteListBase;
\r
1206 while(RemotePos != NULL)
\r
1208 if(AskMirrorNoTrn(RemotePos->File, 1) == NO)
\r
1210 RemotePos->Attr = YES;
\r
1211 RemotePos = RemotePos->Next;
\r
1215 RemotePos->Attr = NO; /* RemotePos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
1217 if(RemotePos->Node == NODE_DIR)
\r
1219 Level = AskDirLevel(RemotePos->File);
\r
1220 RemotePos = RemotePos->Next;
\r
1221 while(RemotePos != NULL)
\r
1223 if((RemotePos->Node == NODE_DIR) &&
\r
1224 (AskDirLevel(RemotePos->File) <= Level))
\r
1228 RemotePos->Attr = NO;
\r
1229 RemotePos = RemotePos->Next;
\r
1233 RemotePos = RemotePos->Next;
\r
1237 /*===== ファイルリスト比較 =====*/
\r
1239 LocalPos = LocalListBase;
\r
1240 while(LocalPos != NULL)
\r
1242 if(AskMirrorNoTrn(LocalPos->File, 0) == NO)
\r
1244 strcpy(Name, LocalPos->File);
\r
1245 ReplaceAll(Name, '\\', '/');
\r
1247 if(MirrorFnameCnv == YES)
\r
1248 Mode = COMP_LOWERMATCH;
\r
1250 Mode = COMP_STRICT;
\r
1252 if(LocalPos->Node == NODE_DIR)
\r
1254 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1256 if(RemotePos->Node == NODE_DIR)
\r
1258 RemotePos->Attr = NO;
\r
1259 LocalPos->Attr = NO;
\r
1263 else if(LocalPos->Node == NODE_FILE)
\r
1265 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1267 if(RemotePos->Node == NODE_FILE)
\r
1269 FileTimeToLocalFileTime(&LocalPos->Time, &TmpFtimeL);
\r
1270 FileTimeToLocalFileTime(&RemotePos->Time, &TmpFtimeR);
\r
1271 if((RemotePos->InfoExist & FINFO_TIME) == 0)
\r
1273 FileTimeToSystemTime(&TmpFtimeL, &TmpStime);
\r
1274 TmpStime.wHour = 0;
\r
1275 TmpStime.wMinute = 0;
\r
1276 TmpStime.wSecond = 0;
\r
1277 TmpStime.wMilliseconds = 0;
\r
1278 SystemTimeToFileTime(&TmpStime, &TmpFtimeL);
\r
1280 FileTimeToSystemTime(&TmpFtimeR, &TmpStime);
\r
1281 TmpStime.wHour = 0;
\r
1282 TmpStime.wMinute = 0;
\r
1283 TmpStime.wSecond = 0;
\r
1284 TmpStime.wMilliseconds = 0;
\r
1285 SystemTimeToFileTime(&TmpStime, &TmpFtimeR);
\r
1287 RemotePos->Attr = NO;
\r
1288 if(CompareFileTime(&TmpFtimeL, &TmpFtimeR) <= 0)
\r
1289 LocalPos->Attr = NO;
\r
1294 LocalPos = LocalPos->Next;
\r
1298 if(LocalPos->Node == NODE_FILE)
\r
1300 LocalPos->Attr = NO;
\r
1301 LocalPos = LocalPos->Next;
\r
1305 LocalPos->Attr = NO;
\r
1306 Level = AskDirLevel(LocalPos->File);
\r
1307 LocalPos = LocalPos->Next;
\r
1308 while(LocalPos != NULL)
\r
1310 if((LocalPos->Node == NODE_DIR) &&
\r
1311 (AskDirLevel(LocalPos->File) <= Level))
\r
1315 LocalPos->Attr = NO;
\r
1316 LocalPos = LocalPos->Next;
\r
1322 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
1324 /*===== 削除/アップロード =====*/
\r
1326 RemotePos = RemoteListBase;
\r
1327 while(RemotePos != NULL)
\r
1329 if((RemotePos->Attr == YES) && (RemotePos->Node == NODE_FILE))
\r
1331 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1332 SetSlashTail(Pkt.RemoteFile);
\r
1333 strcat(Pkt.RemoteFile, RemotePos->File);
\r
1334 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1335 strcpy(Pkt.LocalFile, "");
\r
1336 strcpy(Pkt.Cmd, "R-DELE ");
\r
1337 AddTmpTransFileList(&Pkt, &Base);
\r
1339 RemotePos = RemotePos->Next;
\r
1341 MirrorDeleteAllDir(RemoteListBase, &Pkt, &Base);
\r
1343 LocalPos = LocalListBase;
\r
1344 while(LocalPos != NULL)
\r
1346 if(LocalPos->Attr == YES)
\r
1348 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1349 SetSlashTail(Pkt.RemoteFile);
\r
1350 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1351 strcat(Pkt.RemoteFile, LocalPos->File);
\r
1353 if(MirrorFnameCnv == YES)
\r
1356 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1358 if(LocalPos->Node == NODE_DIR)
\r
1360 strcpy(Pkt.LocalFile, "");
\r
1361 strcpy(Pkt.Cmd, "R-MKD ");
\r
1362 AddTmpTransFileList(&Pkt, &Base);
\r
1364 else if(LocalPos->Node == NODE_FILE)
\r
1366 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
1367 SetYenTail(Pkt.LocalFile);
\r
1368 strcat(Pkt.LocalFile, LocalPos->File);
\r
1369 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1371 strcpy(Pkt.Cmd, "STOR ");
\r
1372 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1374 Pkt.Time = LocalPos->Time;
\r
1375 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1376 Pkt.KanjiCode = AskHostKanjiCode();
\r
1378 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1379 Pkt.KanaCnv = AskHostKanaCnv();
\r
1380 Pkt.Mode = EXIST_OVW;
\r
1381 AddTmpTransFileList(&Pkt, &Base);
\r
1384 LocalPos = LocalPos->Next;
\r
1387 if((Notify == YES) ||
\r
1388 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
1390 if(AskNoFullPathMode() == YES)
\r
1392 strcpy(Pkt.Cmd, "SETCUR");
\r
1393 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1394 AddTransFileList(&Pkt);
\r
1396 AppendTransFileList(Base);
\r
1398 if(AskNoFullPathMode() == YES)
\r
1400 strcpy(Pkt.Cmd, "BACKCUR");
\r
1401 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1402 AddTransFileList(&Pkt);
\r
1405 strcpy(Pkt.Cmd, "GOQUIT");
\r
1406 AddTransFileList(&Pkt);
\r
1409 EraseTmpTransFileList(&Base);
\r
1411 DeleteFileList(&LocalListBase);
\r
1412 DeleteFileList(&RemoteListBase);
\r
1414 GoForwardTransWindow();
\r
1423 /*----- ミラーリング時のホスト側のフォルダ削除 --------------------------------
\r
1426 * FILELIST *Base : ファイルリスト
\r
1427 * TRANSPACKET *Pkt :
\r
1428 * TRANSPACKET **Base :
\r
1432 *----------------------------------------------------------------------------*/
\r
1434 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
1436 while(Remote != NULL)
\r
1438 if(Remote->Node == NODE_DIR)
\r
1440 MirrorDeleteAllDir(Remote->Next, Pkt, Base);
\r
1442 if(Remote->Attr == YES)
\r
1444 AskRemoteCurDir(Pkt->RemoteFile, FMAX_PATH);
\r
1445 SetSlashTail(Pkt->RemoteFile);
\r
1446 strcat(Pkt->RemoteFile, Remote->File);
\r
1447 ReplaceAll(Pkt->RemoteFile, '\\', '/');
\r
1448 strcpy(Pkt->LocalFile, "");
\r
1449 strcpy(Pkt->Cmd, "R-RMD ");
\r
1450 AddTmpTransFileList(Pkt, Base);
\r
1454 Remote = Remote->Next;
\r
1460 /*----- ミラーリングアップロード開始確認ウインドウのコールバック --------------
\r
1463 * HWND hDlg : ウインドウハンドル
\r
1464 * UINT message : メッセージ番号
\r
1465 * WPARAM wParam : メッセージの WPARAM 引数
\r
1466 * LPARAM lParam : メッセージの LPARAM 引数
\r
1470 *----------------------------------------------------------------------------*/
\r
1472 static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1478 case WM_INITDIALOG :
\r
1483 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1486 EndDialog(hDlg, YES);
\r
1490 EndDialog(hDlg, NO);
\r
1493 case MIRRORUP_DISP :
\r
1494 EndDialog(hDlg, YES_LIST);
\r
1499 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000013);
\r
1501 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1509 /*----- ミラーリングアップロード処理内容確認ウインドウのコールバック ----------
\r
1512 * HWND hDlg : ウインドウハンドル
\r
1513 * UINT message : メッセージ番号
\r
1514 * WPARAM wParam : メッセージの WPARAM 引数
\r
1515 * LPARAM lParam : メッセージの LPARAM 引数
\r
1519 *----------------------------------------------------------------------------*/
\r
1521 static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1523 static DIALOGSIZE DlgSize = {
\r
1524 { MIRROR_DEL, MIRROR_SIZEGRIP, -1 },
\r
1525 { IDOK, IDCANCEL, IDHELP, MIRROR_DEL, MIRROR_COPYNUM, MIRROR_MAKENUM, MIRROR_DELNUM, MIRROR_SIZEGRIP, -1 },
\r
1526 { MIRROR_LIST, -1 },
\r
1531 static TRANSPACKET **Base;
\r
1533 char Tmp[FMAX_PATH+1+6];
\r
1539 case WM_INITDIALOG :
\r
1540 Base = (TRANSPACKET **)lParam;
\r
1542 while(Pos != NULL)
\r
1545 if((strncmp(Pos->Cmd, "R-DELE", 6) == 0) ||
\r
1546 (strncmp(Pos->Cmd, "R-RMD", 5) == 0))
\r
1547 sprintf(Tmp, MSGJPN052, Pos->RemoteFile);
\r
1548 else if(strncmp(Pos->Cmd, "R-MKD", 5) == 0)
\r
1549 sprintf(Tmp, MSGJPN053, Pos->RemoteFile);
\r
1550 else if(strncmp(Pos->Cmd, "STOR", 4) == 0)
\r
1551 sprintf(Tmp, MSGJPN054, Pos->RemoteFile);
\r
1552 else if((strncmp(Pos->Cmd, "L-DELE", 6) == 0) ||
\r
1553 (strncmp(Pos->Cmd, "L-RMD", 5) == 0))
\r
1554 sprintf(Tmp, MSGJPN055, Pos->LocalFile);
\r
1555 else if(strncmp(Pos->Cmd, "L-MKD", 5) == 0)
\r
1556 sprintf(Tmp, MSGJPN056, Pos->LocalFile);
\r
1557 else if(strncmp(Pos->Cmd, "RETR", 4) == 0)
\r
1558 sprintf(Tmp, MSGJPN057, Pos->LocalFile);
\r
1560 if(strlen(Tmp) > 0)
\r
1561 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_ADDSTRING, 0, (LPARAM)Tmp);
\r
1564 CountMirrorFiles(hDlg, *Base);
\r
1565 DlgSizeInit(hDlg, &DlgSize, &MirrorDlgSize);
\r
1566 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1570 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1573 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1574 EndDialog(hDlg, YES);
\r
1578 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1579 EndDialog(hDlg, NO);
\r
1583 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0);
\r
1584 if((List = malloc(Num * sizeof(int))) != NULL)
\r
1586 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELITEMS, Num, (LPARAM)List);
\r
1587 for(Num--; Num >= 0; Num--)
\r
1589 if(RemoveTmpTransFileListItem(Base, List[Num]) == FFFTP_SUCCESS)
\r
1590 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_DELETESTRING, List[Num], 0);
\r
1595 CountMirrorFiles(hDlg, *Base);
\r
1599 case MIRROR_LIST :
\r
1600 switch(GET_WM_COMMAND_CMD(wParam, lParam))
\r
1602 case LBN_SELCHANGE :
\r
1603 if(SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0) > 0)
\r
1604 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), TRUE);
\r
1606 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1612 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1617 DlgSizeChange(hDlg, &DlgSize, (RECT *)lParam, (int)wParam);
\r
1624 /*----- ミラーリングで転送/削除するファイルの数を数えダイアログに表示---------
\r
1628 * TRANSPACKET *Pkt :
\r
1632 *----------------------------------------------------------------------------*/
\r
1634 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt)
\r
1644 while(Pkt != NULL)
\r
1646 if((strncmp(Pkt->Cmd, "R-DELE", 6) == 0) ||
\r
1647 (strncmp(Pkt->Cmd, "R-RMD", 5) == 0) ||
\r
1648 (strncmp(Pkt->Cmd, "L-DELE", 6) == 0) ||
\r
1649 (strncmp(Pkt->Cmd, "L-RMD", 5) == 0))
\r
1653 else if((strncmp(Pkt->Cmd, "R-MKD", 5) == 0) ||
\r
1654 (strncmp(Pkt->Cmd, "L-MKD", 5) == 0))
\r
1658 else if((strncmp(Pkt->Cmd, "STOR", 4) == 0) ||
\r
1659 (strncmp(Pkt->Cmd, "RETR", 4) == 0))
\r
1667 sprintf(Tmp, MSGJPN058, Copy);
\r
1669 sprintf(Tmp, MSGJPN059);
\r
1670 SendDlgItemMessage(hDlg, MIRROR_COPYNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1673 sprintf(Tmp, MSGJPN060, Make);
\r
1675 sprintf(Tmp, MSGJPN061);
\r
1676 SendDlgItemMessage(hDlg, MIRROR_MAKENUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1679 sprintf(Tmp, MSGJPN062, Del);
\r
1681 sprintf(Tmp, MSGJPN063);
\r
1682 SendDlgItemMessage(hDlg, MIRROR_DELNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1690 /*----- ミラーリングで転送/削除しないファイルかどうかを返す ------------------
\r
1693 * char Fname : ファイル名
\r
1695 * 0=転送しないファイル, 1=削除しないファイル
\r
1700 *----------------------------------------------------------------------------*/
\r
1702 static int AskMirrorNoTrn(char *Fname, int Mode)
\r
1707 Tbl = MirrorNoTrn;
\r
1709 Tbl = MirrorNoDel;
\r
1712 if(StrMultiLen(Tbl) > 0)
\r
1714 Fname = GetFileName(Fname);
\r
1715 while(*Tbl != NUL)
\r
1717 if(CheckFname(Fname, Tbl) == FFFTP_SUCCESS)
\r
1722 Tbl += strlen(Tbl) + 1;
\r
1729 /*----- アップロードするファイルの属性を返す ----------------------------------
\r
1732 * char Fname : ファイル名
\r
1735 * int 属性 (-1=設定なし)
\r
1736 *----------------------------------------------------------------------------*/
\r
1738 static int AskUpLoadFileAttr(char *Fname)
\r
1744 Tbl = DefAttrList;
\r
1745 Fname = GetFileName(Fname);
\r
1747 while(*Tbl != NUL)
\r
1749 Sts = CheckFname(Fname, Tbl);
\r
1750 Tbl += strlen(Tbl) + 1;
\r
1752 if((Sts == FFFTP_SUCCESS) && (*Tbl != NUL))
\r
1757 Tbl += strlen(Tbl) + 1;
\r
1763 /*----- ホストに同じ名前のファイルがないかチェック- ---------------------------a
\r
1766 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1767 * FILELIST *ListList :
\r
1771 * EXIST_OVW/EXIST_UNIQUE/EXIST_IGNORE
\r
1774 * Pkt.ExistSize, UpExistMode、ExistNotify が変更される
\r
1775 *----------------------------------------------------------------------------*/
\r
1777 static int CheckRemoteFile(TRANSPACKET *Pkt, FILELIST *ListList)
\r
1783 Pkt->ExistSize = 0;
\r
1784 if(SendMode != TRANS_OVW)
\r
1786 if((Exist = SearchFileList(GetFileName(Pkt->RemoteFile), ListList, COMP_STRICT)) != NULL)
\r
1788 Pkt->ExistSize = Exist->Size;
\r
1790 if(ExistNotify == YES)
\r
1792 SoundPlay(SND_ERROR);
\r
1793 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(up_exist_dlg), GetMainHwnd(), UpExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
1794 Ret = EXIST_ABORT;
\r
1796 Ret = UpExistMode;
\r
1799 Ret = UpExistMode;
\r
1801 if(Ret == EXIST_NEW)
\r
1804 if(CompareFileTime(&Exist->Time, &Pkt->Time) < 0)
\r
1807 Ret = EXIST_IGNORE;
\r
1815 /*----- ホストに同じ名前のファイルがある時の確認ダイアログのコールバック ------
\r
1818 * HWND hDlg : ウインドウハンドル
\r
1819 * UINT message : メッセージ番号
\r
1820 * WPARAM wParam : メッセージの WPARAM 引数
\r
1821 * LPARAM lParam : メッセージの LPARAM 引数
\r
1825 *----------------------------------------------------------------------------*/
\r
1827 static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1829 static TRANSPACKET *Pkt;
\r
1830 static const RADIOBUTTON UpExistButton[] = {
\r
1831 { UP_EXIST_OVW, EXIST_OVW },
\r
1832 { UP_EXIST_NEW, EXIST_NEW },
\r
1833 { UP_EXIST_RESUME, EXIST_RESUME },
\r
1834 { UP_EXIST_UNIQUE, EXIST_UNIQUE },
\r
1835 { UP_EXIST_IGNORE, EXIST_IGNORE }
\r
1837 #define UPEXISTBUTTONS (sizeof(UpExistButton)/sizeof(RADIOBUTTON))
\r
1841 case WM_INITDIALOG :
\r
1842 Pkt = (TRANSPACKET *)lParam;
\r
1843 SendDlgItemMessage(hDlg, UP_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1844 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->RemoteFile);
\r
1846 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
1847 EnableWindow(GetDlgItem(hDlg, UP_EXIST_RESUME), FALSE);
\r
1849 SetRadioButtonByValue(hDlg, UpExistMode, UpExistButton, UPEXISTBUTTONS);
\r
1853 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1857 /* ここに break はない */
\r
1860 UpExistMode = AskRadioButtonValue(hDlg, UpExistButton, UPEXISTBUTTONS);
\r
1861 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->RemoteFile);
\r
1862 EndDialog(hDlg, YES);
\r
1866 // Pkt->Abort = ABORT_USER;
\r
1867 // UpExistMode = EXIST_IGNORE;
\r
1868 EndDialog(hDlg, NO);
\r
1872 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000011);
\r
1881 /*----- アップロード/ダウンロードファイル名入力ダイアログのコールバック ------
\r
1884 * HWND hDlg : ウインドウハンドル
\r
1885 * UINT message : メッセージ番号
\r
1886 * WPARAM wParam : メッセージの WPARAM 引数
\r
1887 * LPARAM lParam : メッセージの LPARAM 引数
\r
1891 *----------------------------------------------------------------------------*/
\r
1893 static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1897 case WM_INITDIALOG :
\r
1898 if(CurWin == WIN_LOCAL)
\r
1899 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN064);
\r
1901 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN065);
\r
1903 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1904 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1905 SendDlgItemMessage(hDlg, UPDOWNAS_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1909 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1912 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
1913 EndDialog(hDlg, YES);
\r
1916 case UPDOWNAS_STOP :
\r
1917 EndDialog(hDlg, NO_ALL);
\r
1926 /*----- ファイル一覧で指定されたファイルを削除する ----------------------------
\r
1933 *----------------------------------------------------------------------------*/
\r
1935 void DeleteProc(void)
\r
1938 FILELIST *FileListBase;
\r
1942 char CurDir[FMAX_PATH+1];
\r
1943 char Tmp[FMAX_PATH+1];
\r
1946 AskRemoteCurDir(CurDir, FMAX_PATH);
\r
1947 FileListBase = NULL;
\r
1948 if(GetFocus() == GetLocalHwnd())
\r
1951 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
1956 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1957 MakeSelectedFileList(Win, YES, NO, &FileListBase, &CancelFlg);
\r
1968 Pos = FileListBase;
\r
1969 while(Pos != NULL)
\r
1971 if(Pos->Node == NODE_FILE)
\r
1973 DelNotifyAndDo(Pos, Win, &Sts, &DelFlg, CurDir);
\r
1981 DeleteAllDir(FileListBase, Win, &Sts, &DelFlg, CurDir);
\r
1983 if(Win == WIN_REMOTE)
\r
1985 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
1986 if(strcmp(Tmp, CurDir) != 0)
\r
1987 DoCWD(Tmp, NO, NO, NO);
\r
1990 DeleteFileList(&FileListBase);
\r
1994 if(Win == WIN_LOCAL)
\r
1995 GetLocalDirForWnd();
\r
1997 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2006 /*----- サブディレクトリ以下を全て削除する ------------------------------------
\r
2009 * FILELIST *Dt : 削除するファイルのリスト
\r
2010 * int Win : ウインドウ番号 (WIN_xxx)
\r
2011 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2012 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2013 * char *CurDir : カレントディレクトリ
\r
2017 *----------------------------------------------------------------------------*/
\r
2019 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2023 if(Dt->Node == NODE_DIR)
\r
2025 DeleteAllDir(Dt->Next, Win, Sw, Flg, CurDir);
\r
2029 DelNotifyAndDo(Dt, Win, Sw, Flg, CurDir);
\r
2038 /*----- 削除するかどうかの確認と削除実行 --------------------------------------
\r
2041 * FILELIST *Dt : 削除するファイルのリスト
\r
2042 * int Win : ウインドウ番号 (WIN_xxx)
\r
2043 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2044 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2045 * char *CurDir : カレントディレクトリ
\r
2049 *----------------------------------------------------------------------------*/
\r
2051 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2053 char Path[FMAX_PATH+1];
\r
2055 if(Win == WIN_LOCAL)
\r
2057 AskLocalCurDir(Path, FMAX_PATH);
\r
2059 strcat(Path, Dt->File);
\r
2060 ReplaceAll(Path, '/', '\\');
\r
2064 AskRemoteCurDir(Path, FMAX_PATH);
\r
2065 SetSlashTail(Path);
\r
2066 strcat(Path, Dt->File);
\r
2067 ReplaceAll(Path, '\\', '/');
\r
2070 if(*Sw != YES_ALL)
\r
2072 sprintf(TmpString, "%s", Path);
\r
2074 if(AskHostType() == HTYPE_VMS)
\r
2075 ReformToVMSstylePathName(TmpString);
\r
2078 *Sw = DialogBox(GetFtpInst(), MAKEINTRESOURCE(delete_dlg), GetMainHwnd(), DeleteDialogCallBack);
\r
2081 if((*Sw == YES) || (*Sw == YES_ALL))
\r
2083 if(Win == WIN_LOCAL)
\r
2085 if(Dt->Node == NODE_FILE)
\r
2086 DoLocalDELE(Path);
\r
2093 /* フルパスを使わない時のための処理 */
\r
2094 if(ProcForNonFullpath(Path, CurDir, GetMainHwnd(), 0) == FFFTP_FAIL)
\r
2099 if(Dt->Node == NODE_FILE)
\r
2111 /*----- ファイル削除ダイアログのコールバック ----------------------------------
\r
2114 * HWND hDlg : ウインドウハンドル
\r
2115 * UINT message : メッセージ番号
\r
2116 * WPARAM wParam : メッセージの WPARAM 引数
\r
2117 * LPARAM lParam : メッセージの LPARAM 引数
\r
2121 *----------------------------------------------------------------------------*/
\r
2123 static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2127 case WM_INITDIALOG :
\r
2128 if(CurWin == WIN_LOCAL)
\r
2129 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN066);
\r
2131 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN067);
\r
2132 SendDlgItemMessage(hDlg, DELETE_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2136 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2139 EndDialog(hDlg, YES);
\r
2143 EndDialog(hDlg, NO);
\r
2147 EndDialog(hDlg, YES_ALL);
\r
2151 EndDialog(hDlg, NO_ALL);
\r
2160 /*----- ファイル一覧で指定されたファイルの名前を変更する ----------------------
\r
2167 *----------------------------------------------------------------------------*/
\r
2169 void RenameProc(void)
\r
2172 FILELIST *FileListBase;
\r
2174 char New[FMAX_PATH+1];
\r
2178 Sts = FFFTP_SUCCESS;
\r
2179 if(GetFocus() == GetLocalHwnd())
\r
2184 Sts = CheckClosedAndReconnect();
\r
2187 if(Sts == FFFTP_SUCCESS)
\r
2191 FileListBase = NULL;
\r
2192 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2196 Pos = FileListBase;
\r
2197 while(Pos != NULL)
\r
2199 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2201 strcpy(TmpString, Pos->File);
\r
2203 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2208 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2210 strcpy(New, TmpString);
\r
2211 if(Win == WIN_LOCAL)
\r
2212 DoLocalRENAME(Pos->File, New);
\r
2214 DoRENAME(Pos->File, New);
\r
2220 DeleteFileList(&FileListBase);
\r
2224 if(Win == WIN_LOCAL)
\r
2225 GetLocalDirForWnd();
\r
2227 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2237 // リモート側でのファイルの移動(リネーム)を行う
\r
2239 // RenameProc()をベースに改造。(2007.9.5 yutaka)
\r
2241 void MoveRemoteFileProc(int drop_index)
\r
2244 FILELIST *FileListBase;
\r
2247 char New[FMAX_PATH+1];
\r
2248 char Old[FMAX_PATH+1];
\r
2249 char HostDir[FMAX_PATH+1];
\r
2253 if(MoveMode == MOVE_DISABLE)
\r
2258 AskRemoteCurDir(HostDir, FMAX_PATH);
\r
2261 GetNodeName(WIN_REMOTE, drop_index, Pkt.File, FMAX_PATH);
\r
2263 if(MoveMode == MOVE_DLG)
\r
2265 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(move_notify_dlg), GetRemoteHwnd(), ExeEscTextDialogProc, (LPARAM)Pkt.File) == NO)
\r
2271 Sts = FFFTP_SUCCESS;
\r
2273 if(GetFocus() == GetLocalHwnd())
\r
2278 Sts = CheckClosedAndReconnect();
\r
2282 Sts = CheckClosedAndReconnect();
\r
2285 if(Sts == FFFTP_SUCCESS)
\r
2289 FileListBase = NULL;
\r
2290 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2294 Pos = FileListBase;
\r
2295 while(Pos != NULL)
\r
2297 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2299 strcpy(TmpString, Pos->File);
\r
2302 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2310 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2313 strncpy_s(Old, sizeof(Old), HostDir, _TRUNCATE);
\r
2314 strncat_s(Old, sizeof(Old), "/", _TRUNCATE);
\r
2315 strncat_s(Old, sizeof(Old), Pos->File, _TRUNCATE);
\r
2318 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2319 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2320 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2321 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2322 strncat_s(New, sizeof(New), Pos->File, _TRUNCATE);
\r
2324 if(Win == WIN_LOCAL)
\r
2325 DoLocalRENAME(Old, New);
\r
2327 DoRENAME(Old, New);
\r
2333 DeleteFileList(&FileListBase);
\r
2337 if(Win == WIN_LOCAL) {
\r
2338 GetLocalDirForWnd();
\r
2340 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2342 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2343 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2344 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2345 DoCWD(New, YES, YES, YES);
\r
2346 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2357 /*----- 新ファイル名入力ダイアログのコールバック ------------------------------
\r
2360 * HWND hDlg : ウインドウハンドル
\r
2361 * UINT message : メッセージ番号
\r
2362 * WPARAM wParam : メッセージの WPARAM 引数
\r
2363 * LPARAM lParam : メッセージの LPARAM 引数
\r
2367 *----------------------------------------------------------------------------*/
\r
2369 static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2373 case WM_INITDIALOG :
\r
2374 if(CurWin == WIN_LOCAL)
\r
2375 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN068);
\r
2377 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN069);
\r
2378 SendDlgItemMessage(hDlg, RENAME_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
2379 SendDlgItemMessage(hDlg, RENAME_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2380 SendDlgItemMessage(hDlg, RENAME_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2384 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2387 SendDlgItemMessage(hDlg, RENAME_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
2388 EndDialog(hDlg, YES);
\r
2392 EndDialog(hDlg, NO);
\r
2395 case RENAME_STOP :
\r
2396 EndDialog(hDlg, NO_ALL);
\r
2405 /*----- 新しいディレクトリを作成する ------------------------------------------
\r
2412 *----------------------------------------------------------------------------*/
\r
2414 void MkdirProc(void)
\r
2418 char Path[FMAX_PATH+1];
\r
2422 if(GetFocus() == GetLocalHwnd())
\r
2425 Title = MSGJPN070;
\r
2430 Title = MSGJPN071;
\r
2434 Sts = InputDialogBox(mkdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2436 if((Sts == YES) && (strlen(Path) != 0))
\r
2438 if(Win == WIN_LOCAL)
\r
2442 GetLocalDirForWnd();
\r
2447 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2451 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2460 /*----- ヒストリリストを使ったディレクトリの移動 ------------------------------
\r
2463 * HWND hWnd : コンボボックスのウインドウハンドル
\r
2467 *----------------------------------------------------------------------------*/
\r
2469 void ChangeDirComboProc(HWND hWnd)
\r
2471 char Tmp[FMAX_PATH+1];
\r
2474 if((i = SendMessage(hWnd, CB_GETCURSEL, 0, 0)) != CB_ERR)
\r
2476 SendMessage(hWnd, CB_GETLBTEXT, i, (LPARAM)Tmp);
\r
2478 if(hWnd == GetLocalHistHwnd())
\r
2482 GetLocalDirForWnd();
\r
2487 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2490 if(DoCWD(Tmp, YES, NO, YES) < FTP_RETRY)
\r
2491 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2500 /*----- ブックマークを使ったディレクトリの移動 --------------------------------
\r
2503 * int MarkID : ブックマークのメニューID
\r
2507 *----------------------------------------------------------------------------*/
\r
2509 void ChangeDirBmarkProc(int MarkID)
\r
2511 char Local[FMAX_PATH+1];
\r
2512 char Remote[FMAX_PATH+1];
\r
2515 Sts = AskBookMarkText(MarkID, Local, Remote, FMAX_PATH+1);
\r
2516 if((Sts == BMARK_TYPE_LOCAL) || (Sts == BMARK_TYPE_BOTH))
\r
2519 if(DoLocalCWD(Local) == FFFTP_SUCCESS)
\r
2520 GetLocalDirForWnd();
\r
2524 if((Sts == BMARK_TYPE_REMOTE) || (Sts == BMARK_TYPE_BOTH))
\r
2526 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2529 if(DoCWD(Remote, YES, NO, YES) < FTP_RETRY)
\r
2530 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2538 /*----- ディレクトリ名を入力してディレクトリの移動 ----------------------------
\r
2541 * int Win : ウインドウ番号 (WIN_xxx)
\r
2545 *----------------------------------------------------------------------------*/
\r
2547 void ChangeDirDirectProc(int Win)
\r
2550 char Path[FMAX_PATH+1];
\r
2554 if(Win == WIN_LOCAL)
\r
2555 Title = MSGJPN072;
\r
2557 Title = MSGJPN073;
\r
2560 if(Win == WIN_LOCAL)
\r
2561 Sts = InputDialogBox(chdir_br_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2563 Sts = InputDialogBox(chdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2565 if((Sts == YES) && (strlen(Path) != 0))
\r
2567 if(Win == WIN_LOCAL)
\r
2571 GetLocalDirForWnd();
\r
2576 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2579 if(DoCWD(Path, YES, NO, YES) < FTP_RETRY)
\r
2580 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2589 /*----- Dropされたファイルによるディレクトリの移動 ----------------------------
\r
2592 * WPARAM wParam : ドロップされたファイルの情報
\r
2596 *----------------------------------------------------------------------------*/
\r
2598 void ChangeDirDropFileProc(WPARAM wParam)
\r
2600 char Path[FMAX_PATH+1];
\r
2603 MakeDroppedDir(wParam, Path);
\r
2605 GetLocalDirForWnd();
\r
2611 /*----- ファイルの属性変更 ----------------------------------------------------
\r
2618 *----------------------------------------------------------------------------*/
\r
2620 void ChmodProc(void)
\r
2623 FILELIST *FileListBase;
\r
2630 if(GetFocus() == GetRemoteHwnd())
\r
2632 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2635 FileListBase = NULL;
\r
2636 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2637 if(FileListBase != NULL)
\r
2639 sprintf(Tmp, "%03X", FileListBase->Attr);
\r
2640 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(chmod_dlg), GetMainHwnd(), ChmodDialogCallBack, (LPARAM)Tmp) == YES)
\r
2643 Pos = FileListBase;
\r
2644 while(Pos != NULL)
\r
2646 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2648 DoCHMOD(Pos->File, Tmp);
\r
2653 if(ChmodFlg == YES)
\r
2654 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2657 DeleteFileList(&FileListBase);
\r
2661 else if(GetFocus() == GetLocalHwnd())
\r
2664 FileListBase = NULL;
\r
2665 MakeSelectedFileList(WIN_LOCAL, NO, NO, &FileListBase, &CancelFlg);
\r
2666 if(FileListBase != NULL)
\r
2668 if((Buf = malloc(1)) != NULL)
\r
2672 Pos = FileListBase;
\r
2673 while(Pos != NULL)
\r
2675 if((BufTmp = realloc(Buf, BufLen + strlen(Pos->File) + 2)) != NULL)
\r
2678 strcpy(Buf+BufLen, Pos->File);
\r
2679 BufLen += strlen(Pos->File) + 1;
\r
2684 memset(Buf+BufLen, NUL, 1);
\r
2685 DispFileProperty(Buf);
\r
2689 DeleteFileList(&FileListBase);
\r
2696 /*----- 属性変更ダイアログのコールバック --------------------------------------
\r
2699 * HWND hDlg : ウインドウハンドル
\r
2700 * UINT message : メッセージ番号
\r
2701 * WPARAM wParam : メッセージの WPARAM 引数
\r
2702 * LPARAM lParam : メッセージの LPARAM 引数
\r
2706 *----------------------------------------------------------------------------*/
\r
2708 BOOL CALLBACK ChmodDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2716 case WM_INITDIALOG :
\r
2717 Buf = (char *)lParam;
\r
2718 SendDlgItemMessage(hDlg, PERM_NOW, EM_LIMITTEXT, 4, 0);
\r
2719 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Buf);
\r
2720 SetAttrToDialog(hDlg, xtoi(Buf));
\r
2724 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2727 SendDlgItemMessage(hDlg, PERM_NOW, WM_GETTEXT, 5, (LPARAM)Buf);
\r
2728 EndDialog(hDlg, YES);
\r
2732 EndDialog(hDlg, NO);
\r
2735 case PERM_O_READ :
\r
2736 case PERM_O_WRITE :
\r
2737 case PERM_O_EXEC :
\r
2738 case PERM_G_READ :
\r
2739 case PERM_G_WRITE :
\r
2740 case PERM_G_EXEC :
\r
2741 case PERM_A_READ :
\r
2742 case PERM_A_WRITE :
\r
2743 case PERM_A_EXEC :
\r
2744 Tmp = GetAttrFromDialog(hDlg);
\r
2745 sprintf(Str, "%03X", Tmp);
\r
2746 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Str);
\r
2750 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000017);
\r
2759 /*----- 属性をダイアログボックスに設定 ----------------------------------------
\r
2762 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2767 *----------------------------------------------------------------------------*/
\r
2769 static void SetAttrToDialog(HWND hDlg, int Attr)
\r
2772 SendDlgItemMessage(hDlg, PERM_O_READ, BM_SETCHECK, 1, 0);
\r
2774 SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_SETCHECK, 1, 0);
\r
2776 SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_SETCHECK, 1, 0);
\r
2779 SendDlgItemMessage(hDlg, PERM_G_READ, BM_SETCHECK, 1, 0);
\r
2781 SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_SETCHECK, 1, 0);
\r
2783 SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_SETCHECK, 1, 0);
\r
2786 SendDlgItemMessage(hDlg, PERM_A_READ, BM_SETCHECK, 1, 0);
\r
2788 SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_SETCHECK, 1, 0);
\r
2790 SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_SETCHECK, 1, 0);
\r
2796 /*----- ダイアログボックスの内容から属性を取得 --------------------------------
\r
2799 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2803 *----------------------------------------------------------------------------*/
\r
2805 static int GetAttrFromDialog(HWND hDlg)
\r
2811 if(SendDlgItemMessage(hDlg, PERM_O_READ, BM_GETCHECK, 0, 0) == 1)
\r
2813 if(SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2815 if(SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2818 if(SendDlgItemMessage(hDlg, PERM_G_READ, BM_GETCHECK, 0, 0) == 1)
\r
2820 if(SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2822 if(SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2825 if(SendDlgItemMessage(hDlg, PERM_A_READ, BM_GETCHECK, 0, 0) == 1)
\r
2827 if(SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2829 if(SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2838 /*----- 任意のコマンドを送る --------------------------------------------------
\r
2845 *----------------------------------------------------------------------------*/
\r
2847 void SomeCmdProc(void)
\r
2851 FILELIST *FileListBase;
\r
2853 if(GetFocus() == GetRemoteHwnd())
\r
2855 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2858 FileListBase = NULL;
\r
2859 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2860 memset(Cmd, NUL, 81);
\r
2861 if(FileListBase != NULL)
\r
2863 strncpy(Cmd, FileListBase->File, 80);
\r
2865 DeleteFileList(&FileListBase);
\r
2867 if(InputDialogBox(somecmd_dlg, GetMainHwnd(), NULL, Cmd, 81, &Tmp, IDH_HELP_TOPIC_0000023) == YES)
\r
2880 /*----- ファイル総容量の計算を行う --------------------------------------------
\r
2887 *----------------------------------------------------------------------------*/
\r
2889 void CalcFileSizeProc(void)
\r
2891 FILELIST *ListBase;
\r
2897 if((All = DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_notify_dlg), GetMainHwnd(), SizeNotifyDlgWndProc)) != NO_ALL)
\r
2899 Sts = FFFTP_SUCCESS;
\r
2900 if(GetFocus() == GetLocalHwnd())
\r
2905 Sts = CheckClosedAndReconnect();
\r
2908 if(Sts == FFFTP_SUCCESS)
\r
2911 MakeSelectedFileList(Win, YES, All, &ListBase, &CancelFlg);
\r
2915 while(Pos != NULL)
\r
2917 if(Pos->Node != NODE_DIR)
\r
2918 FileSize += Pos->Size;
\r
2921 DeleteFileList(&ListBase);
\r
2922 DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_dlg), GetMainHwnd(), SizeDlgWndProc);
\r
2929 /*----- ファイル容量検索確認ダイアログのコールバック --------------------------
\r
2932 * HWND hDlg : ウインドウハンドル
\r
2933 * UINT message : メッセージ番号
\r
2934 * WPARAM wParam : メッセージの WPARAM 引数
\r
2935 * LPARAM lParam : メッセージの LPARAM 引数
\r
2939 *----------------------------------------------------------------------------*/
\r
2941 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
2945 case WM_INITDIALOG :
\r
2946 if(GetFocus() == GetLocalHwnd())
\r
2947 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN074);
\r
2949 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN075);
\r
2953 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2956 if(SendDlgItemMessage(hDlg, FSNOTIFY_SEL_ONLY, BM_GETCHECK, 0, 0) == 1)
\r
2957 EndDialog(hDlg, NO);
\r
2959 EndDialog(hDlg, YES);
\r
2963 EndDialog(hDlg, NO_ALL);
\r
2972 /*----- ファイル容量検索ダイアログのコールバック ------------------------------
\r
2975 * HWND hDlg : ウインドウハンドル
\r
2976 * UINT message : メッセージ番号
\r
2977 * WPARAM wParam : メッセージの WPARAM 引数
\r
2978 * LPARAM lParam : メッセージの LPARAM 引数
\r
2982 *----------------------------------------------------------------------------*/
\r
2984 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
2986 char Tmp[FMAX_PATH+1];
\r
2990 case WM_INITDIALOG :
\r
2991 if(GetFocus() == GetLocalHwnd())
\r
2992 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN076);
\r
2994 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN077);
\r
2996 MakeSizeString(FileSize, Tmp);
\r
2997 SendDlgItemMessage(hDlg, FSIZE_SIZE, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
3001 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3005 EndDialog(hDlg, YES);
\r
3015 /*----- ディレクトリ移動失敗時のエラーを表示 ----------------------------------
\r
3018 * HWND hDlg : ウインドウハンドル
\r
3022 *----------------------------------------------------------------------------*/
\r
3024 void DispCWDerror(HWND hWnd)
\r
3026 DialogBox(GetFtpInst(), MAKEINTRESOURCE(cwderr_dlg), hWnd, ExeEscDialogProc);
\r
3031 /*----- URLをクリップボードにコピー -------------------------------------------
\r
3038 *----------------------------------------------------------------------------*/
\r
3040 void CopyURLtoClipBoard(void)
\r
3042 FILELIST *FileListBase;
\r
3045 char Path[FMAX_PATH+1];
\r
3046 char Host[HOST_ADRS_LEN+1];
\r
3051 if(GetFocus() == GetRemoteHwnd())
\r
3053 FileListBase = NULL;
\r
3054 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
3055 if(FileListBase != NULL)
\r
3057 strcpy(Host, AskHostAdrs());
\r
3060 Pos = FileListBase;
\r
3061 while(Pos != NULL)
\r
3063 AskRemoteCurDir(Path, FMAX_PATH);
\r
3064 SetSlashTail(Path);
\r
3065 strcat(Path, Pos->File);
\r
3067 if(AskHostType() == HTYPE_VMS)
\r
3068 ReformToVMSstylePathName(Path);
\r
3071 if(AskHostPort() != PORT_NOR)
\r
3072 sprintf(Port, ":%d", AskHostPort());
\r
3075 Total += strlen(Path) + strlen(Host) + strlen(Port) + 8; /* 8は "ftp://\r\n" のぶん */
\r
3076 if(AskHostType() == HTYPE_VMS)
\r
3079 if((Buf = realloc(Buf, Total+1)) == NULL)
\r
3082 if(AskHostType() != HTYPE_VMS)
\r
3083 sprintf(Buf + Set, "ftp://%s%s%s\r\n", Host, Port, Path);
\r
3085 sprintf(Buf + Set, "ftp://%s%s/%s\r\n", Host, Port, Path);
\r
3092 CopyStrToClipBoard(Buf);
\r
3096 DeleteFileList(&FileListBase);
\r
3102 /*----- フルパスを使わないファイルアクセスの準備 ------------------------------
\r
3105 * char *Path : パス名
\r
3106 * char *CurDir : カレントディレクトリ
\r
3107 * HWND hWnd : エラーウインドウを表示する際の親ウインドウ
\r
3108 * int Type : 使用するソケットの種類
\r
3109 * 0=コマンドソケット, 1=転送ソケット
\r
3112 * int ステータス(FFFTP_SUCCESS/FFFTP_FAIL)
\r
3116 * このモジュール内で CWD を行ない、
\r
3117 * Path にファイル名のみ残す。(パス名は消す)
\r
3118 *----------------------------------------------------------------------------*/
\r
3120 int ProcForNonFullpath(char *Path, char *CurDir, HWND hWnd, int Type)
\r
3124 char Tmp[FMAX_PATH+1];
\r
3126 Sts = FFFTP_SUCCESS;
\r
3127 if(AskNoFullPathMode() == YES)
\r
3129 strcpy(Tmp, Path);
\r
3130 if(AskHostType() == HTYPE_VMS)
\r
3132 GetUpperDirEraseTopSlash(Tmp);
\r
3133 ReformToVMSstyleDirName(Tmp);
\r
3135 else if(AskHostType() == HTYPE_STRATUS)
\r
3136 GetUpperDirEraseTopSlash(Tmp);
\r
3140 if(strcmp(Tmp, CurDir) != 0)
\r
3143 Cmd = CommandProcCmd(NULL, "CWD %s", Tmp);
\r
3145 Cmd = CommandProcTrn(NULL, "CWD %s", Tmp);
\r
3147 if(Cmd/100 != FTP_COMPLETE)
\r
3149 DispCWDerror(hWnd);
\r
3153 strcpy(CurDir, Tmp);
\r
3155 strcpy(Path, GetFileName(Path));
\r
3161 /*----- ディレクトリ名をVAX VMSスタイルに変換する -----------------------------
\r
3164 * char *Path : パス名
\r
3170 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr.ppp]
\r
3171 *----------------------------------------------------------------------------*/
\r
3173 void ReformToVMSstyleDirName(char *Path)
\r
3178 if((Btm = strchr(Path, ']')) != NULL)
\r
3181 while((Pos = strchr(Pos, '/')) != NULL)
\r
3184 memmove(Btm, Btm+1, strlen(Btm+1)+1);
\r
3185 Pos = strchr(Path, NUL);
\r
3186 if(*(Pos-1) == '.')
\r
3197 /*----- ファイル名をVAX VMSスタイルに変換する ---------------------------------
\r
3200 * char *Path : パス名
\r
3206 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr]ppp
\r
3207 *----------------------------------------------------------------------------*/
\r
3209 void ReformToVMSstylePathName(char *Path)
\r
3211 char Fname[FMAX_PATH+1];
\r
3213 strcpy(Fname, GetFileName(Path));
\r
3215 GetUpperDirEraseTopSlash(Path);
\r
3216 ReformToVMSstyleDirName(Path);
\r
3218 strcat(Path, Fname);
\r
3224 #if defined(HAVE_OPENVMS)
\r
3225 /*----- VMSの"HOGE.DIR;?"というディレクトリ名から"HOGE"を取り出す ---------------
\r
3228 * char *DirName : "HOGE.DIR;?"形式のディレクトリ名
\r
3229 * int Flg : ";"のチェックをする(TRUE)かしない(FALSE)か
\r
3236 *----------------------------------------------------------------------------*/
\r
3238 void ReformVMSDirName(char *DirName, int Flg)
\r
3242 if (Flg == TRUE) {
\r
3243 /* ';'がない場合はVMS形式じゃなさそうなので何もしない */
\r
3244 if ((p = strrchr(DirName, ';')) == NULL)
\r
3248 /* ".DIR"があったらつぶす */
\r
3249 if ((p = strrchr(DirName, '.'))) {
\r
3250 if (memcmp(p + 1, "DIR", 3) == 0)
\r
3257 /*----- ファイル名に使えない文字がないかチェックし名前を変更する --------------
\r
3260 * char *Fname : ファイル名
\r
3264 * FFFTP_SUCCESS/FFFTP_FAIL=中止する
\r
3268 *----------------------------------------------------------------------------*/
\r
3270 static int RenameUnuseableName(char *Fname)
\r
3275 Ret = FFFTP_SUCCESS;
\r
3278 if((_mbschr(Fname, ':') != NULL) ||
\r
3279 (_mbschr(Fname, '*') != NULL) ||
\r
3280 (_mbschr(Fname, '?') != NULL) ||
\r
3281 (_mbschr(Fname, '<') != NULL) ||
\r
3282 (_mbschr(Fname, '>') != NULL) ||
\r
3283 (_mbschr(Fname, '|') != NULL) ||
\r
3284 (_mbschr(Fname, '\x22') != NULL) ||
\r
3285 (_mbschr(Fname, '\\') != NULL))
\r
3287 if(InputDialogBox(forcerename_dlg, GetMainHwnd(), NULL, Fname, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001) == NO)
\r