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
128 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
136 // KeepTransferDialog(YES);
\r
138 FileListBase = NULL;
\r
139 MakeSelectedFileList(WIN_REMOTE, (ForceFile == YES ? NO : YES), All, &FileListBase, &CancelFlg);
\r
141 if(AskNoFullPathMode() == YES)
\r
143 strcpy(Pkt.Cmd, "SETCUR");
\r
144 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
145 AddTransFileList(&Pkt);
\r
148 Pos = FileListBase;
\r
151 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
152 SetYenTail(Pkt.LocalFile);
\r
153 strcpy(TmpString, Pos->File);
\r
154 if((ChName == NO) || ((ForceFile == NO) && (Pos->Node == NODE_DIR)))
\r
156 if(FnameCnv == FNAME_LOWER)
\r
157 _mbslwr(TmpString);
\r
158 else if(FnameCnv == FNAME_UPPER)
\r
159 _mbsupr(TmpString);
\r
160 RemoveAfterSemicolon(TmpString);
\r
161 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
166 CurWin = WIN_REMOTE;
\r
167 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
169 if(RenameUnuseableName(TmpString) == FFFTP_FAIL)
\r
175 strcat(Pkt.LocalFile, TmpString);
\r
176 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
178 if((ForceFile == NO) && (Pos->Node == NODE_DIR))
\r
180 strcpy(Pkt.Cmd, "MKD ");
\r
181 strcpy(Pkt.RemoteFile, "");
\r
182 AddTransFileList(&Pkt);
\r
184 else if((Pos->Node == NODE_FILE) ||
\r
185 ((ForceFile == YES) && (Pos->Node == NODE_DIR)))
\r
187 if(AskHostType() == HTYPE_ACOS)
\r
189 strcpy(Pkt.RemoteFile, "'");
\r
190 strcat(Pkt.RemoteFile, AskHostLsName());
\r
191 strcat(Pkt.RemoteFile, "(");
\r
192 strcat(Pkt.RemoteFile, Pos->File);
\r
193 strcat(Pkt.RemoteFile, ")");
\r
194 strcat(Pkt.RemoteFile, "'");
\r
196 else if(AskHostType() == HTYPE_ACOS_4)
\r
198 strcpy(Pkt.RemoteFile, Pos->File);
\r
202 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
203 SetSlashTail(Pkt.RemoteFile);
\r
204 strcat(Pkt.RemoteFile, Pos->File);
\r
205 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
208 strcpy(Pkt.Cmd, "RETR ");
\r
209 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
210 Pkt.Size = Pos->Size;
\r
211 Pkt.Time = Pos->Time;
\r
212 Pkt.KanjiCode = AskHostKanjiCode();
\r
214 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
215 Pkt.KanaCnv = AskHostKanaCnv();
\r
217 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
218 if(Pkt.Mode == EXIST_ABORT)
\r
220 else if(Pkt.Mode != EXIST_IGNORE)
\r
221 AddTransFileList(&Pkt);
\r
226 if(AskNoFullPathMode() == YES)
\r
228 strcpy(Pkt.Cmd, "BACKCUR");
\r
229 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
230 AddTransFileList(&Pkt);
\r
232 DeleteFileList(&FileListBase);
\r
234 strcpy(Pkt.Cmd, "GOQUIT");
\r
235 AddTransFileList(&Pkt);
\r
237 GoForwardTransWindow();
\r
238 // KeepTransferDialog(NO);
\r
246 /*----- 指定されたファイルを一つダウンロードする ------------------------------
\r
249 * char *Fname : ファイル名
\r
253 *----------------------------------------------------------------------------*/
\r
255 void DirectDownLoadProc(char *Fname)
\r
262 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
270 // KeepTransferDialog(YES);
\r
272 if(AskNoFullPathMode() == YES)
\r
274 strcpy(Pkt.Cmd, "SETCUR");
\r
275 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
276 AddTransFileList(&Pkt);
\r
279 if(strlen(Fname) > 0)
\r
281 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
282 SetYenTail(Pkt.LocalFile);
\r
283 strcpy(TmpString, Fname);
\r
284 if(FnameCnv == FNAME_LOWER)
\r
285 _mbslwr(TmpString);
\r
286 else if(FnameCnv == FNAME_UPPER)
\r
287 _mbsupr(TmpString);
\r
288 RemoveAfterSemicolon(TmpString);
\r
290 if(RenameUnuseableName(TmpString) == FFFTP_SUCCESS)
\r
292 strcat(Pkt.LocalFile, TmpString);
\r
293 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
295 if(AskHostType() == HTYPE_ACOS)
\r
297 strcpy(Pkt.RemoteFile, "'");
\r
298 strcat(Pkt.RemoteFile, AskHostLsName());
\r
299 strcat(Pkt.RemoteFile, "(");
\r
300 strcat(Pkt.RemoteFile, Fname);
\r
301 strcat(Pkt.RemoteFile, ")");
\r
302 strcat(Pkt.RemoteFile, "'");
\r
304 else if(AskHostType() == HTYPE_ACOS_4)
\r
306 strcpy(Pkt.RemoteFile, Fname);
\r
310 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
311 SetSlashTail(Pkt.RemoteFile);
\r
312 strcat(Pkt.RemoteFile, Fname);
\r
313 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
316 strcpy(Pkt.Cmd, "RETR-S ");
\r
317 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
319 /* サイズと日付は転送側スレッドで取得し、セットする */
\r
321 Pkt.KanjiCode = AskHostKanjiCode();
\r
323 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
324 Pkt.KanaCnv = AskHostKanaCnv();
\r
326 Pkt.Mode = CheckLocalFile(&Pkt); /* Pkt.ExistSize がセットされる */
\r
327 if((Pkt.Mode != EXIST_ABORT) && (Pkt.Mode != EXIST_IGNORE))
\r
328 AddTransFileList(&Pkt);
\r
332 if(AskNoFullPathMode() == YES)
\r
334 strcpy(Pkt.Cmd, "BACKCUR");
\r
335 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
336 AddTransFileList(&Pkt);
\r
339 strcpy(Pkt.Cmd, "GOQUIT");
\r
340 AddTransFileList(&Pkt);
\r
342 GoForwardTransWindow();
\r
343 // KeepTransferDialog(NO);
\r
351 /*----- 入力されたファイル名のファイルを一つダウンロードする ------------------
\r
358 *----------------------------------------------------------------------------*/
\r
360 void InputDownLoadProc(void)
\r
362 char Path[FMAX_PATH+1];
\r
365 // DisableUserOpe();
\r
368 if(InputDialogBox(downname_dlg, GetMainHwnd(), NULL, Path, FMAX_PATH, &Tmp, IDH_HELP_TOPIC_0000001) == YES)
\r
370 DirectDownLoadProc(Path);
\r
373 // EnableUserOpe();
\r
379 /*----- ミラーリングダウンロードを行う ----------------------------------------
\r
382 * int Notify : 確認を行うかどうか (YES/NO)
\r
386 *----------------------------------------------------------------------------*/
\r
388 void MirrorDownloadProc(int Notify)
\r
390 FILELIST *LocalListBase;
\r
391 FILELIST *RemoteListBase;
\r
392 FILELIST *LocalPos;
\r
393 FILELIST *RemotePos;
\r
396 char Name[FMAX_PATH+1];
\r
404 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
414 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_down_dlg), GetMainHwnd(), MirrorNotifyCallBack, 0);
\r
418 if((Notify == YES) || (Notify == YES_LIST))
\r
420 /*===== ファイルリスト取得 =====*/
\r
422 LocalListBase = NULL;
\r
423 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
424 RemoteListBase = NULL;
\r
425 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
427 RemotePos = RemoteListBase;
\r
428 while(RemotePos != NULL)
\r
430 RemotePos->Attr = YES; /* RemotePos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
431 RemotePos = RemotePos->Next;
\r
434 LocalPos = LocalListBase;
\r
435 while(LocalPos != NULL)
\r
437 if(AskMirrorNoTrn(LocalPos->File, 1) == NO)
\r
439 LocalPos->Attr = YES;
\r
440 LocalPos = LocalPos->Next;
\r
444 LocalPos->Attr = NO; /* LocalPos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
446 if(LocalPos->Node == NODE_DIR)
\r
448 Level = AskDirLevel(LocalPos->File);
\r
449 LocalPos = LocalPos->Next;
\r
450 while(LocalPos != NULL)
\r
452 if((LocalPos->Node == NODE_DIR) &&
\r
453 (AskDirLevel(LocalPos->File) <= Level))
\r
457 LocalPos->Attr = NO;
\r
458 LocalPos = LocalPos->Next;
\r
462 LocalPos = LocalPos->Next;
\r
466 /*===== ファイルリスト比較 =====*/
\r
468 RemotePos = RemoteListBase;
\r
469 while(RemotePos != NULL)
\r
471 if(AskMirrorNoTrn(RemotePos->File, 0) == NO)
\r
473 strcpy(Name, RemotePos->File);
\r
474 // ReplaceAll(Name, '/', '\\');
\r
476 if(MirrorFnameCnv == YES)
\r
477 Mode = COMP_LOWERMATCH;
\r
479 Mode = COMP_STRICT;
\r
481 if((LocalPos = SearchFileList(Name, LocalListBase, Mode)) != NULL)
\r
483 if((RemotePos->Node == NODE_DIR) && (LocalPos->Node == NODE_DIR))
\r
485 LocalPos->Attr = NO;
\r
486 RemotePos->Attr = NO;
\r
488 else if((RemotePos->Node == NODE_FILE) && (LocalPos->Node == NODE_FILE))
\r
490 LocalPos->Attr = NO;
\r
491 if(CompareFileTime(&RemotePos->Time, &LocalPos->Time) <= 0)
\r
492 RemotePos->Attr = NO;
\r
495 RemotePos = RemotePos->Next;
\r
499 if(RemotePos->Node == NODE_FILE)
\r
501 RemotePos->Attr = NO;
\r
502 RemotePos = RemotePos->Next;
\r
506 RemotePos->Attr = NO;
\r
507 Level = AskDirLevel(RemotePos->File);
\r
508 RemotePos = RemotePos->Next;
\r
509 while(RemotePos != NULL)
\r
511 if((RemotePos->Node == NODE_DIR) &&
\r
512 (AskDirLevel(RemotePos->File) <= Level))
\r
516 RemotePos->Attr = NO;
\r
517 RemotePos = RemotePos->Next;
\r
523 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
525 /*===== 削除/アップロード =====*/
\r
527 LocalPos = LocalListBase;
\r
528 while(LocalPos != NULL)
\r
530 if((LocalPos->Attr == YES) && (LocalPos->Node == NODE_FILE))
\r
532 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
533 SetYenTail(Pkt.LocalFile);
\r
534 strcat(Pkt.LocalFile, LocalPos->File);
\r
535 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
536 strcpy(Pkt.RemoteFile, "");
\r
537 strcpy(Pkt.Cmd, "L-DELE ");
\r
538 AddTmpTransFileList(&Pkt, &Base);
\r
540 LocalPos = LocalPos->Next;
\r
542 MirrorDeleteAllLocalDir(LocalListBase, &Pkt, &Base);
\r
545 RemotePos = RemoteListBase;
\r
546 while(RemotePos != NULL)
\r
548 if(RemotePos->Attr == YES)
\r
550 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
551 SetYenTail(Pkt.LocalFile);
\r
552 Cat = strchr(Pkt.LocalFile, NUL);
\r
553 strcat(Pkt.LocalFile, RemotePos->File);
\r
555 if(MirrorFnameCnv == YES)
\r
558 RemoveAfterSemicolon(Cat);
\r
559 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
561 if(RemotePos->Node == NODE_DIR)
\r
563 strcpy(Pkt.RemoteFile, "");
\r
564 strcpy(Pkt.Cmd, "L-MKD ");
\r
565 AddTmpTransFileList(&Pkt, &Base);
\r
567 else if(RemotePos->Node == NODE_FILE)
\r
569 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
570 SetSlashTail(Pkt.RemoteFile);
\r
571 strcat(Pkt.RemoteFile, RemotePos->File);
\r
572 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
574 strcpy(Pkt.Cmd, "RETR ");
\r
575 Pkt.Type = AskTransferTypeAssoc(Pkt.RemoteFile, AskTransferType());
\r
576 Pkt.Size = RemotePos->Size;
\r
577 Pkt.Time = RemotePos->Time;
\r
579 Pkt.KanjiCode = AskHostKanjiCode();
\r
581 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
582 Pkt.KanaCnv = AskHostKanaCnv();
\r
583 Pkt.Mode = EXIST_OVW;
\r
584 AddTmpTransFileList(&Pkt, &Base);
\r
587 RemotePos = RemotePos->Next;
\r
590 if((Notify == YES) ||
\r
591 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirrordown_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
593 if(AskNoFullPathMode() == YES)
\r
595 strcpy(Pkt.Cmd, "SETCUR");
\r
596 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
597 AddTransFileList(&Pkt);
\r
599 AppendTransFileList(Base);
\r
601 if(AskNoFullPathMode() == YES)
\r
603 strcpy(Pkt.Cmd, "BACKCUR");
\r
604 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
605 AddTransFileList(&Pkt);
\r
608 strcpy(Pkt.Cmd, "GOQUIT");
\r
609 AddTransFileList(&Pkt);
\r
612 EraseTmpTransFileList(&Base);
\r
614 DeleteFileList(&LocalListBase);
\r
615 DeleteFileList(&RemoteListBase);
\r
617 GoForwardTransWindow();
\r
626 /*----- ミラーリングのファイル一覧を表示 --------------------------------------
\r
629 * FILELIST *Local : ローカル側
\r
630 * FILELIST *Remote : リモート側
\r
634 *----------------------------------------------------------------------------*/
\r
636 static void DispMirrorFiles(FILELIST *Local, FILELIST *Remote)
\r
642 if(DebugConsole == YES)
\r
644 DoPrintf("---- MIRROR FILE LIST ----");
\r
645 while(Local != NULL)
\r
647 FileTimeToLocalFileTime(&Local->Time, &fTime);
\r
648 FileTimeToSystemTime(&fTime, &sTime);
\r
649 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
650 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
651 DoPrintf("LOCAL : %s %s [%s] %s", Local->Attr==1?"YES":"NO ", Local->Node==NODE_DIR?"DIR ":"FILE", Date, Local->File);
\r
652 Local = Local->Next;
\r
654 while(Remote != NULL)
\r
656 FileTimeToLocalFileTime(&Remote->Time, &fTime);
\r
657 FileTimeToSystemTime(&fTime, &sTime);
\r
658 sprintf(Date, "%04d/%02d/%02d %02d:%02d:%02d.%04d",
\r
659 sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, sTime.wMilliseconds);
\r
660 DoPrintf("REMOTE : %s %s [%s] %s", Remote->Attr==1?"YES":"NO ", Remote->Node==NODE_DIR?"DIR ":"FILE", Date, Remote->File);
\r
661 Remote = Remote->Next;
\r
663 DoPrintf("---- END ----");
\r
669 /*----- ミラーリング時のローカル側のフォルダ削除 ------------------------------
\r
672 * FILELIST *Local : ファイルリスト
\r
673 * TRANSPACKET *Pkt :
\r
674 * TRANSPACKET **Base :
\r
678 *----------------------------------------------------------------------------*/
\r
680 static void MirrorDeleteAllLocalDir(FILELIST *Local, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
682 while(Local != NULL)
\r
684 if(Local->Node == NODE_DIR)
\r
686 MirrorDeleteAllLocalDir(Local->Next, Pkt, Base);
\r
688 if(Local->Attr == YES)
\r
690 AskLocalCurDir(Pkt->LocalFile, FMAX_PATH);
\r
691 SetYenTail(Pkt->LocalFile);
\r
692 strcat(Pkt->LocalFile, Local->File);
\r
693 ReplaceAll(Pkt->LocalFile, '/', '\\');
\r
694 strcpy(Pkt->RemoteFile, "");
\r
695 strcpy(Pkt->Cmd, "L-RMD ");
\r
696 AddTmpTransFileList(Pkt, Base);
\r
700 Local = Local->Next;
\r
706 /*----- ファイル名のセミコロン以降を取り除く ----------------------------------
\r
709 * char *Path : ファイル名
\r
716 * オプション設定によって処理を切替える
\r
717 *----------------------------------------------------------------------------*/
\r
719 static void RemoveAfterSemicolon(char *Path)
\r
723 if(VaxSemicolon == YES)
\r
725 if((Pos = strchr(Path, ';')) != NULL)
\r
732 /*----- ローカルに同じ名前のファイルがないかチェック --------------------------
\r
735 * TRANSPACKET *Pkt : 転送ファイル情報
\r
739 * EXIST_OVW/EXIST_RESUME/EXIST_IGNORE
\r
742 * Pkt.ExistSize, ExistMode、ExistNotify が変更される
\r
743 *----------------------------------------------------------------------------*/
\r
745 static int CheckLocalFile(TRANSPACKET *Pkt)
\r
748 WIN32_FIND_DATA Find;
\r
752 Pkt->ExistSize = 0;
\r
753 if(RecvMode != TRANS_OVW)
\r
755 if((fHnd = FindFirstFile(Pkt->LocalFile, &Find)) != INVALID_HANDLE_VALUE)
\r
759 Pkt->ExistSize = MakeLongLong(Find.nFileSizeHigh, Find.nFileSizeLow);
\r
761 if(ExistNotify == YES)
\r
763 SoundPlay(SND_ERROR);
\r
764 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(down_exist_dlg), GetMainHwnd(), DownExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
772 if(Ret == EXIST_NEW)
\r
775 if(CompareFileTime(&Find.ftLastWriteTime, &Pkt->Time) < 0)
\r
778 Ret = EXIST_IGNORE;
\r
786 /*----- ローカルに同じ名前のファイルがある時の確認ダイアログのコールバック ----
\r
789 * HWND hDlg : ウインドウハンドル
\r
790 * UINT message : メッセージ番号
\r
791 * WPARAM wParam : メッセージの WPARAM 引数
\r
792 * LPARAM lParam : メッセージの LPARAM 引数
\r
796 *----------------------------------------------------------------------------*/
\r
798 static BOOL CALLBACK DownExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
800 static TRANSPACKET *Pkt;
\r
801 static const RADIOBUTTON DownExistButton[] = {
\r
802 { DOWN_EXIST_OVW, EXIST_OVW },
\r
803 { DOWN_EXIST_NEW, EXIST_NEW },
\r
804 { DOWN_EXIST_RESUME, EXIST_RESUME },
\r
805 { DOWN_EXIST_IGNORE, EXIST_IGNORE }
\r
807 #define DOWNEXISTBUTTONS (sizeof(DownExistButton)/sizeof(RADIOBUTTON))
\r
811 case WM_INITDIALOG :
\r
812 Pkt = (TRANSPACKET *)lParam;
\r
813 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
814 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->LocalFile);
\r
816 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
817 EnableWindow(GetDlgItem(hDlg, DOWN_EXIST_RESUME), FALSE);
\r
819 SetRadioButtonByValue(hDlg, ExistMode, DownExistButton, DOWNEXISTBUTTONS);
\r
823 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
827 /* ここに break はない */
\r
830 ExistMode = AskRadioButtonValue(hDlg, DownExistButton, DOWNEXISTBUTTONS);
\r
831 SendDlgItemMessage(hDlg, DOWN_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->LocalFile);
\r
832 EndDialog(hDlg, YES);
\r
836 // ExistMode = EXIST_ABORT;
\r
837 EndDialog(hDlg, NO);
\r
841 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000009);
\r
854 /*----- ファイル一覧で指定されたファイルをアップロードする --------------------
\r
857 * int ChName : 名前を変えるかどうか (YES/NO)
\r
858 * int All : 全てが選ばれている物として扱うかどうか (YES/NO)
\r
862 *----------------------------------------------------------------------------*/
\r
864 void UpLoadListProc(int ChName, int All)
\r
866 FILELIST *FileListBase;
\r
871 FILELIST *RemoteList;
\r
872 char Tmp[FMAX_PATH+1];
\r
878 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
885 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
886 FileListBase = NULL;
\r
887 MakeSelectedFileList(WIN_LOCAL, YES, All, &FileListBase, &CancelFlg);
\r
889 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
892 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
897 Pos = FileListBase;
\r
900 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
901 SetSlashTail(Pkt.RemoteFile);
\r
902 Cat = strchr(Pkt.RemoteFile, NUL);
\r
903 if((ChName == NO) || (Pos->Node == NODE_DIR))
\r
905 strcat(Pkt.RemoteFile, Pos->File);
\r
906 if(FnameCnv == FNAME_LOWER)
\r
908 else if(FnameCnv == FNAME_UPPER)
\r
914 strcpy(TmpString, Pos->File);
\r
915 CurWin = WIN_LOCAL;
\r
916 if(DialogBox(GetFtpInst(), MAKEINTRESOURCE(updown_as_dlg), GetMainHwnd(), UpDownAsDialogCallBack) == YES)
\r
917 strcat(Pkt.RemoteFile, TmpString);
\r
921 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
923 if(AskHostType() == HTYPE_ACOS)
\r
925 strcpy(Pkt.RemoteFile, "'");
\r
926 strcat(Pkt.RemoteFile, AskHostLsName());
\r
927 strcat(Pkt.RemoteFile, "(");
\r
928 strcat(Pkt.RemoteFile, Cat);
\r
929 strcat(Pkt.RemoteFile, ")");
\r
930 strcat(Pkt.RemoteFile, "'");
\r
932 else if(AskHostType() == HTYPE_ACOS_4)
\r
933 strcpy(Pkt.RemoteFile, Cat);
\r
935 if(Pos->Node == NODE_DIR)
\r
939 // ホスト側のファイル一覧をRemoteListに登録
\r
941 if(RemoteList != NULL)
\r
942 DeleteFileList(&RemoteList);
\r
945 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
946 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
948 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
949 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
950 DoCWD(Tmp, NO, NO, NO);
\r
955 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
957 strcpy(Pkt1.Cmd, "SETCUR");
\r
958 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
959 AddTransFileList(&Pkt1);
\r
962 strcpy(Pkt.Cmd, "MKD ");
\r
963 strcpy(Pkt.LocalFile, "");
\r
964 AddTransFileList(&Pkt);
\r
967 else if(Pos->Node == NODE_FILE)
\r
970 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
971 SetYenTail(Pkt.LocalFile);
\r
972 strcat(Pkt.LocalFile, Pos->File);
\r
973 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
975 strcpy(Pkt.Cmd, "STOR ");
\r
976 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
978 Pkt.Time = Pos->Time;
\r
979 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
980 Pkt.KanjiCode = AskHostKanjiCode();
\r
982 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
983 Pkt.KanaCnv = AskHostKanaCnv();
\r
984 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
985 if(Pkt.Mode == EXIST_ABORT)
\r
987 else if(Pkt.Mode != EXIST_IGNORE)
\r
989 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
991 strcpy(Pkt1.Cmd, "SETCUR");
\r
992 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
993 AddTransFileList(&Pkt1);
\r
996 AddTransFileList(&Pkt);
\r
1002 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
1004 strcpy(Pkt.Cmd, "BACKCUR");
\r
1005 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1006 AddTransFileList(&Pkt);
\r
1009 if(RemoteList != NULL)
\r
1010 DeleteFileList(&RemoteList);
\r
1012 DeleteFileList(&FileListBase);
\r
1014 strcpy(Pkt.Cmd, "GOQUIT");
\r
1015 AddTransFileList(&Pkt);
\r
1017 GoForwardTransWindow();
\r
1025 /*----- ドラッグ&ドロップで指定されたファイルをアップロードする --------------
\r
1028 * WPARAM wParam : ドロップされたファイルの情報
\r
1032 *----------------------------------------------------------------------------*/
\r
1034 void UpLoadDragProc(WPARAM wParam)
\r
1036 FILELIST *FileListBase;
\r
1041 FILELIST *RemoteList;
\r
1042 char Tmp[FMAX_PATH+1];
\r
1044 char Cur[FMAX_PATH+1];
\r
1049 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1056 // ローカル側で選ばれているファイルをFileListBaseに登録
\r
1057 FileListBase = NULL;
\r
1058 MakeDroppedFileList(wParam, Cur, &FileListBase);
\r
1060 // 現在ホスト側のファイル一覧に表示されているものをRemoteListに登録
\r
1062 RemoteList = NULL;
\r
1063 AddRemoteTreeToFileList(AskCurrentFileListNum(), "", RDIR_NONE, &RemoteList);
\r
1066 ExistNotify = YES;
\r
1068 Pos = FileListBase;
\r
1069 while(Pos != NULL)
\r
1071 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1072 SetSlashTail(Pkt.RemoteFile);
\r
1073 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1075 strcat(Pkt.RemoteFile, Pos->File);
\r
1076 if(FnameCnv == FNAME_LOWER)
\r
1078 else if(FnameCnv == FNAME_UPPER)
\r
1080 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1082 if(AskHostType() == HTYPE_ACOS)
\r
1084 strcpy(Pkt.RemoteFile, "'");
\r
1085 strcat(Pkt.RemoteFile, AskHostLsName());
\r
1086 strcat(Pkt.RemoteFile, "(");
\r
1087 strcat(Pkt.RemoteFile, Cat);
\r
1088 strcat(Pkt.RemoteFile, ")");
\r
1089 strcat(Pkt.RemoteFile, "'");
\r
1091 else if(AskHostType() == HTYPE_ACOS_4)
\r
1092 strcpy(Pkt.RemoteFile, Cat);
\r
1094 if(Pos->Node == NODE_DIR)
\r
1098 // ホスト側のファイル一覧をRemoteListに登録
\r
1100 if(RemoteList != NULL)
\r
1101 DeleteFileList(&RemoteList);
\r
1102 RemoteList = NULL;
\r
1104 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
1105 if(DoCWD(Pkt.RemoteFile, NO, NO, NO) == FTP_COMPLETE)
\r
1107 if(DoDirListCmdSkt("", "", 998, &CancelFlg) == FTP_COMPLETE)
\r
1108 AddRemoteTreeToFileList(998, "", RDIR_NONE, &RemoteList);
\r
1109 DoCWD(Tmp, NO, NO, NO);
\r
1113 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1115 strcpy(Pkt1.Cmd, "SETCUR");
\r
1116 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1117 AddTransFileList(&Pkt1);
\r
1120 strcpy(Pkt.Cmd, "MKD ");
\r
1121 strcpy(Pkt.LocalFile, "");
\r
1122 AddTransFileList(&Pkt);
\r
1125 else if(Pos->Node == NODE_FILE)
\r
1128 strcpy(Pkt.LocalFile, Cur);
\r
1129 SetYenTail(Pkt.LocalFile);
\r
1130 strcat(Pkt.LocalFile, Pos->File);
\r
1131 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1133 strcpy(Pkt.Cmd, "STOR ");
\r
1134 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1136 Pkt.Time = Pos->Time;
\r
1137 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1138 Pkt.KanjiCode = AskHostKanjiCode();
\r
1140 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1141 Pkt.KanaCnv = AskHostKanaCnv();
\r
1142 Pkt.Mode = CheckRemoteFile(&Pkt, RemoteList);
\r
1143 if(Pkt.Mode == EXIST_ABORT)
\r
1145 else if(Pkt.Mode != EXIST_IGNORE)
\r
1147 if((FirstAdd == YES) && (AskNoFullPathMode() == YES))
\r
1149 strcpy(Pkt1.Cmd, "SETCUR");
\r
1150 AskRemoteCurDir(Pkt1.RemoteFile, FMAX_PATH);
\r
1151 AddTransFileList(&Pkt1);
\r
1154 AddTransFileList(&Pkt);
\r
1160 if((FirstAdd == NO) && (AskNoFullPathMode() == YES))
\r
1162 strcpy(Pkt.Cmd, "BACKCUR");
\r
1163 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1164 AddTransFileList(&Pkt);
\r
1167 if(RemoteList != NULL)
\r
1168 DeleteFileList(&RemoteList);
\r
1170 DeleteFileList(&FileListBase);
\r
1172 strcpy(Pkt.Cmd, "GOQUIT");
\r
1173 AddTransFileList(&Pkt);
\r
1175 GoForwardTransWindow();
\r
1183 /*----- ミラーリングアップロードを行う ----------------------------------------
\r
1186 * int Notify : 確認を行うかどうか (YES/NO)
\r
1190 *----------------------------------------------------------------------------*/
\r
1192 void MirrorUploadProc(int Notify)
\r
1194 FILELIST *LocalListBase;
\r
1195 FILELIST *RemoteListBase;
\r
1196 FILELIST *LocalPos;
\r
1197 FILELIST *RemotePos;
\r
1199 TRANSPACKET *Base;
\r
1200 char Name[FMAX_PATH+1];
\r
1204 SYSTEMTIME TmpStime;
\r
1205 FILETIME TmpFtimeL;
\r
1206 FILETIME TmpFtimeR;
\r
1211 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1221 Notify = DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_up_dlg), GetMainHwnd(), MirrorNotifyCallBack, 1);
\r
1225 if((Notify == YES) || (Notify == YES_LIST))
\r
1227 /*===== ファイルリスト取得 =====*/
\r
1229 LocalListBase = NULL;
\r
1230 MakeSelectedFileList(WIN_LOCAL, YES, YES, &LocalListBase, &CancelFlg);
\r
1231 RemoteListBase = NULL;
\r
1232 MakeSelectedFileList(WIN_REMOTE, YES, YES, &RemoteListBase, &CancelFlg);
\r
1234 LocalPos = LocalListBase;
\r
1235 while(LocalPos != NULL)
\r
1237 LocalPos->Attr = YES; /* LocalPos->Attrは転送するかどうかのフラグに使用 (YES/NO) */
\r
1238 LocalPos = LocalPos->Next;
\r
1241 RemotePos = RemoteListBase;
\r
1242 while(RemotePos != NULL)
\r
1244 if(AskMirrorNoTrn(RemotePos->File, 1) == NO)
\r
1246 RemotePos->Attr = YES;
\r
1247 RemotePos = RemotePos->Next;
\r
1251 RemotePos->Attr = NO; /* RemotePos->Attrは削除するかどうかのフラグに使用 (YES/NO) */
\r
1253 if(RemotePos->Node == NODE_DIR)
\r
1255 Level = AskDirLevel(RemotePos->File);
\r
1256 RemotePos = RemotePos->Next;
\r
1257 while(RemotePos != NULL)
\r
1259 if((RemotePos->Node == NODE_DIR) &&
\r
1260 (AskDirLevel(RemotePos->File) <= Level))
\r
1264 RemotePos->Attr = NO;
\r
1265 RemotePos = RemotePos->Next;
\r
1269 RemotePos = RemotePos->Next;
\r
1273 /*===== ファイルリスト比較 =====*/
\r
1275 LocalPos = LocalListBase;
\r
1276 while(LocalPos != NULL)
\r
1278 if(AskMirrorNoTrn(LocalPos->File, 0) == NO)
\r
1280 strcpy(Name, LocalPos->File);
\r
1281 ReplaceAll(Name, '\\', '/');
\r
1283 if(MirrorFnameCnv == YES)
\r
1284 Mode = COMP_LOWERMATCH;
\r
1286 Mode = COMP_STRICT;
\r
1288 if(LocalPos->Node == NODE_DIR)
\r
1290 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1292 if(RemotePos->Node == NODE_DIR)
\r
1294 RemotePos->Attr = NO;
\r
1295 LocalPos->Attr = NO;
\r
1299 else if(LocalPos->Node == NODE_FILE)
\r
1301 if((RemotePos = SearchFileList(Name, RemoteListBase, Mode)) != NULL)
\r
1303 if(RemotePos->Node == NODE_FILE)
\r
1305 FileTimeToLocalFileTime(&LocalPos->Time, &TmpFtimeL);
\r
1306 FileTimeToLocalFileTime(&RemotePos->Time, &TmpFtimeR);
\r
1307 if((RemotePos->InfoExist & FINFO_TIME) == 0)
\r
1309 FileTimeToSystemTime(&TmpFtimeL, &TmpStime);
\r
1310 TmpStime.wHour = 0;
\r
1311 TmpStime.wMinute = 0;
\r
1312 TmpStime.wSecond = 0;
\r
1313 TmpStime.wMilliseconds = 0;
\r
1314 SystemTimeToFileTime(&TmpStime, &TmpFtimeL);
\r
1316 FileTimeToSystemTime(&TmpFtimeR, &TmpStime);
\r
1317 TmpStime.wHour = 0;
\r
1318 TmpStime.wMinute = 0;
\r
1319 TmpStime.wSecond = 0;
\r
1320 TmpStime.wMilliseconds = 0;
\r
1321 SystemTimeToFileTime(&TmpStime, &TmpFtimeR);
\r
1323 RemotePos->Attr = NO;
\r
1324 if(CompareFileTime(&TmpFtimeL, &TmpFtimeR) <= 0)
\r
1325 LocalPos->Attr = NO;
\r
1330 LocalPos = LocalPos->Next;
\r
1334 if(LocalPos->Node == NODE_FILE)
\r
1336 LocalPos->Attr = NO;
\r
1337 LocalPos = LocalPos->Next;
\r
1341 LocalPos->Attr = NO;
\r
1342 Level = AskDirLevel(LocalPos->File);
\r
1343 LocalPos = LocalPos->Next;
\r
1344 while(LocalPos != NULL)
\r
1346 if((LocalPos->Node == NODE_DIR) &&
\r
1347 (AskDirLevel(LocalPos->File) <= Level))
\r
1351 LocalPos->Attr = NO;
\r
1352 LocalPos = LocalPos->Next;
\r
1358 DispMirrorFiles(LocalListBase, RemoteListBase);
\r
1360 /*===== 削除/アップロード =====*/
\r
1362 RemotePos = RemoteListBase;
\r
1363 while(RemotePos != NULL)
\r
1365 if((RemotePos->Attr == YES) && (RemotePos->Node == NODE_FILE))
\r
1367 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1368 SetSlashTail(Pkt.RemoteFile);
\r
1369 strcat(Pkt.RemoteFile, RemotePos->File);
\r
1370 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1371 strcpy(Pkt.LocalFile, "");
\r
1372 strcpy(Pkt.Cmd, "R-DELE ");
\r
1373 AddTmpTransFileList(&Pkt, &Base);
\r
1375 RemotePos = RemotePos->Next;
\r
1377 MirrorDeleteAllDir(RemoteListBase, &Pkt, &Base);
\r
1379 LocalPos = LocalListBase;
\r
1380 while(LocalPos != NULL)
\r
1382 if(LocalPos->Attr == YES)
\r
1384 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1385 SetSlashTail(Pkt.RemoteFile);
\r
1386 Cat = strchr(Pkt.RemoteFile, NUL);
\r
1387 strcat(Pkt.RemoteFile, LocalPos->File);
\r
1389 if(MirrorFnameCnv == YES)
\r
1392 ReplaceAll(Pkt.RemoteFile, '\\', '/');
\r
1394 if(LocalPos->Node == NODE_DIR)
\r
1396 strcpy(Pkt.LocalFile, "");
\r
1397 strcpy(Pkt.Cmd, "R-MKD ");
\r
1398 AddTmpTransFileList(&Pkt, &Base);
\r
1400 else if(LocalPos->Node == NODE_FILE)
\r
1402 AskLocalCurDir(Pkt.LocalFile, FMAX_PATH);
\r
1403 SetYenTail(Pkt.LocalFile);
\r
1404 strcat(Pkt.LocalFile, LocalPos->File);
\r
1405 ReplaceAll(Pkt.LocalFile, '/', '\\');
\r
1407 strcpy(Pkt.Cmd, "STOR ");
\r
1408 Pkt.Type = AskTransferTypeAssoc(Pkt.LocalFile, AskTransferType());
\r
1410 Pkt.Time = LocalPos->Time;
\r
1411 Pkt.Attr = AskUpLoadFileAttr(Pkt.RemoteFile);
\r
1412 Pkt.KanjiCode = AskHostKanjiCode();
\r
1414 Pkt.KanjiCodeDesired = AskLocalKanjiCode();
\r
1415 Pkt.KanaCnv = AskHostKanaCnv();
\r
1416 Pkt.Mode = EXIST_OVW;
\r
1417 AddTmpTransFileList(&Pkt, &Base);
\r
1420 LocalPos = LocalPos->Next;
\r
1423 if((Notify == YES) ||
\r
1424 (DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(mirror_notify_dlg), GetMainHwnd(), MirrorDispListCallBack, (LPARAM)&Base) == YES))
\r
1426 if(AskNoFullPathMode() == YES)
\r
1428 strcpy(Pkt.Cmd, "SETCUR");
\r
1429 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1430 AddTransFileList(&Pkt);
\r
1432 AppendTransFileList(Base);
\r
1434 if(AskNoFullPathMode() == YES)
\r
1436 strcpy(Pkt.Cmd, "BACKCUR");
\r
1437 AskRemoteCurDir(Pkt.RemoteFile, FMAX_PATH);
\r
1438 AddTransFileList(&Pkt);
\r
1441 strcpy(Pkt.Cmd, "GOQUIT");
\r
1442 AddTransFileList(&Pkt);
\r
1445 EraseTmpTransFileList(&Base);
\r
1447 DeleteFileList(&LocalListBase);
\r
1448 DeleteFileList(&RemoteListBase);
\r
1450 GoForwardTransWindow();
\r
1459 /*----- ミラーリング時のホスト側のフォルダ削除 --------------------------------
\r
1462 * FILELIST *Base : ファイルリスト
\r
1463 * TRANSPACKET *Pkt :
\r
1464 * TRANSPACKET **Base :
\r
1468 *----------------------------------------------------------------------------*/
\r
1470 static void MirrorDeleteAllDir(FILELIST *Remote, TRANSPACKET *Pkt, TRANSPACKET **Base)
\r
1472 while(Remote != NULL)
\r
1474 if(Remote->Node == NODE_DIR)
\r
1476 MirrorDeleteAllDir(Remote->Next, Pkt, Base);
\r
1478 if(Remote->Attr == YES)
\r
1480 AskRemoteCurDir(Pkt->RemoteFile, FMAX_PATH);
\r
1481 SetSlashTail(Pkt->RemoteFile);
\r
1482 strcat(Pkt->RemoteFile, Remote->File);
\r
1483 ReplaceAll(Pkt->RemoteFile, '\\', '/');
\r
1484 strcpy(Pkt->LocalFile, "");
\r
1485 strcpy(Pkt->Cmd, "R-RMD ");
\r
1486 AddTmpTransFileList(Pkt, Base);
\r
1490 Remote = Remote->Next;
\r
1496 /*----- ミラーリングアップロード開始確認ウインドウのコールバック --------------
\r
1499 * HWND hDlg : ウインドウハンドル
\r
1500 * UINT message : メッセージ番号
\r
1501 * WPARAM wParam : メッセージの WPARAM 引数
\r
1502 * LPARAM lParam : メッセージの LPARAM 引数
\r
1506 *----------------------------------------------------------------------------*/
\r
1508 static BOOL CALLBACK MirrorNotifyCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1514 case WM_INITDIALOG :
\r
1519 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1522 EndDialog(hDlg, YES);
\r
1526 EndDialog(hDlg, NO);
\r
1529 case MIRRORUP_DISP :
\r
1530 EndDialog(hDlg, YES_LIST);
\r
1535 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000013);
\r
1537 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1545 /*----- ミラーリングアップロード処理内容確認ウインドウのコールバック ----------
\r
1548 * HWND hDlg : ウインドウハンドル
\r
1549 * UINT message : メッセージ番号
\r
1550 * WPARAM wParam : メッセージの WPARAM 引数
\r
1551 * LPARAM lParam : メッセージの LPARAM 引数
\r
1555 *----------------------------------------------------------------------------*/
\r
1557 static BOOL CALLBACK MirrorDispListCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1559 static DIALOGSIZE DlgSize = {
\r
1560 { MIRROR_DEL, MIRROR_SIZEGRIP, -1 },
\r
1561 { IDOK, IDCANCEL, IDHELP, MIRROR_DEL, MIRROR_COPYNUM, MIRROR_MAKENUM, MIRROR_DELNUM, MIRROR_SIZEGRIP, -1 },
\r
1562 { MIRROR_LIST, -1 },
\r
1567 static TRANSPACKET **Base;
\r
1569 char Tmp[FMAX_PATH+1+6];
\r
1575 case WM_INITDIALOG :
\r
1576 Base = (TRANSPACKET **)lParam;
\r
1578 while(Pos != NULL)
\r
1581 if((strncmp(Pos->Cmd, "R-DELE", 6) == 0) ||
\r
1582 (strncmp(Pos->Cmd, "R-RMD", 5) == 0))
\r
1583 sprintf(Tmp, MSGJPN052, Pos->RemoteFile);
\r
1584 else if(strncmp(Pos->Cmd, "R-MKD", 5) == 0)
\r
1585 sprintf(Tmp, MSGJPN053, Pos->RemoteFile);
\r
1586 else if(strncmp(Pos->Cmd, "STOR", 4) == 0)
\r
1587 sprintf(Tmp, MSGJPN054, Pos->RemoteFile);
\r
1588 else if((strncmp(Pos->Cmd, "L-DELE", 6) == 0) ||
\r
1589 (strncmp(Pos->Cmd, "L-RMD", 5) == 0))
\r
1590 sprintf(Tmp, MSGJPN055, Pos->LocalFile);
\r
1591 else if(strncmp(Pos->Cmd, "L-MKD", 5) == 0)
\r
1592 sprintf(Tmp, MSGJPN056, Pos->LocalFile);
\r
1593 else if(strncmp(Pos->Cmd, "RETR", 4) == 0)
\r
1594 sprintf(Tmp, MSGJPN057, Pos->LocalFile);
\r
1596 if(strlen(Tmp) > 0)
\r
1597 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_ADDSTRING, 0, (LPARAM)Tmp);
\r
1600 CountMirrorFiles(hDlg, *Base);
\r
1601 DlgSizeInit(hDlg, &DlgSize, &MirrorDlgSize);
\r
1602 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1606 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1609 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1610 EndDialog(hDlg, YES);
\r
1614 AskDlgSize(hDlg, &DlgSize, &MirrorDlgSize);
\r
1615 EndDialog(hDlg, NO);
\r
1619 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0);
\r
1620 if((List = malloc(Num * sizeof(int))) != NULL)
\r
1622 Num = SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELITEMS, Num, (LPARAM)List);
\r
1623 for(Num--; Num >= 0; Num--)
\r
1625 if(RemoveTmpTransFileListItem(Base, List[Num]) == FFFTP_SUCCESS)
\r
1626 SendDlgItemMessage(hDlg, MIRROR_LIST, LB_DELETESTRING, List[Num], 0);
\r
1631 CountMirrorFiles(hDlg, *Base);
\r
1635 case MIRROR_LIST :
\r
1636 switch(GET_WM_COMMAND_CMD(wParam, lParam))
\r
1638 case LBN_SELCHANGE :
\r
1639 if(SendDlgItemMessage(hDlg, MIRROR_LIST, LB_GETSELCOUNT, 0, 0) > 0)
\r
1640 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), TRUE);
\r
1642 EnableWindow(GetDlgItem(hDlg, MIRROR_DEL), FALSE);
\r
1648 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000012);
\r
1653 DlgSizeChange(hDlg, &DlgSize, (RECT *)lParam, (int)wParam);
\r
1660 /*----- ミラーリングで転送/削除するファイルの数を数えダイアログに表示---------
\r
1664 * TRANSPACKET *Pkt :
\r
1668 *----------------------------------------------------------------------------*/
\r
1670 static void CountMirrorFiles(HWND hDlg, TRANSPACKET *Pkt)
\r
1680 while(Pkt != NULL)
\r
1682 if((strncmp(Pkt->Cmd, "R-DELE", 6) == 0) ||
\r
1683 (strncmp(Pkt->Cmd, "R-RMD", 5) == 0) ||
\r
1684 (strncmp(Pkt->Cmd, "L-DELE", 6) == 0) ||
\r
1685 (strncmp(Pkt->Cmd, "L-RMD", 5) == 0))
\r
1689 else if((strncmp(Pkt->Cmd, "R-MKD", 5) == 0) ||
\r
1690 (strncmp(Pkt->Cmd, "L-MKD", 5) == 0))
\r
1694 else if((strncmp(Pkt->Cmd, "STOR", 4) == 0) ||
\r
1695 (strncmp(Pkt->Cmd, "RETR", 4) == 0))
\r
1703 sprintf(Tmp, MSGJPN058, Copy);
\r
1705 sprintf(Tmp, MSGJPN059);
\r
1706 SendDlgItemMessage(hDlg, MIRROR_COPYNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1709 sprintf(Tmp, MSGJPN060, Make);
\r
1711 sprintf(Tmp, MSGJPN061);
\r
1712 SendDlgItemMessage(hDlg, MIRROR_MAKENUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1715 sprintf(Tmp, MSGJPN062, Del);
\r
1717 sprintf(Tmp, MSGJPN063);
\r
1718 SendDlgItemMessage(hDlg, MIRROR_DELNUM, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
1726 /*----- ミラーリングで転送/削除しないファイルかどうかを返す ------------------
\r
1729 * char Fname : ファイル名
\r
1731 * 0=転送しないファイル, 1=削除しないファイル
\r
1736 *----------------------------------------------------------------------------*/
\r
1738 static int AskMirrorNoTrn(char *Fname, int Mode)
\r
1743 Tbl = MirrorNoTrn;
\r
1745 Tbl = MirrorNoDel;
\r
1748 if(StrMultiLen(Tbl) > 0)
\r
1750 Fname = GetFileName(Fname);
\r
1751 while(*Tbl != NUL)
\r
1753 if(CheckFname(Fname, Tbl) == FFFTP_SUCCESS)
\r
1758 Tbl += strlen(Tbl) + 1;
\r
1765 /*----- アップロードするファイルの属性を返す ----------------------------------
\r
1768 * char Fname : ファイル名
\r
1771 * int 属性 (-1=設定なし)
\r
1772 *----------------------------------------------------------------------------*/
\r
1774 static int AskUpLoadFileAttr(char *Fname)
\r
1780 Tbl = DefAttrList;
\r
1781 Fname = GetFileName(Fname);
\r
1783 while(*Tbl != NUL)
\r
1785 Sts = CheckFname(Fname, Tbl);
\r
1786 Tbl += strlen(Tbl) + 1;
\r
1788 if((Sts == FFFTP_SUCCESS) && (*Tbl != NUL))
\r
1793 Tbl += strlen(Tbl) + 1;
\r
1799 /*----- ホストに同じ名前のファイルがないかチェック- ---------------------------a
\r
1802 * TRANSPACKET *Pkt : 転送ファイル情報
\r
1803 * FILELIST *ListList :
\r
1807 * EXIST_OVW/EXIST_UNIQUE/EXIST_IGNORE
\r
1810 * Pkt.ExistSize, UpExistMode、ExistNotify が変更される
\r
1811 *----------------------------------------------------------------------------*/
\r
1813 static int CheckRemoteFile(TRANSPACKET *Pkt, FILELIST *ListList)
\r
1819 Pkt->ExistSize = 0;
\r
1820 if(SendMode != TRANS_OVW)
\r
1822 if((Exist = SearchFileList(GetFileName(Pkt->RemoteFile), ListList, COMP_STRICT)) != NULL)
\r
1824 Pkt->ExistSize = Exist->Size;
\r
1826 if(ExistNotify == YES)
\r
1828 SoundPlay(SND_ERROR);
\r
1829 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(up_exist_dlg), GetMainHwnd(), UpExistDialogCallBack, (LPARAM)Pkt) == NO)
\r
1830 Ret = EXIST_ABORT;
\r
1832 Ret = UpExistMode;
\r
1835 Ret = UpExistMode;
\r
1837 if(Ret == EXIST_NEW)
\r
1840 if(CompareFileTime(&Exist->Time, &Pkt->Time) < 0)
\r
1843 Ret = EXIST_IGNORE;
\r
1851 /*----- ホストに同じ名前のファイルがある時の確認ダイアログのコールバック ------
\r
1854 * HWND hDlg : ウインドウハンドル
\r
1855 * UINT message : メッセージ番号
\r
1856 * WPARAM wParam : メッセージの WPARAM 引数
\r
1857 * LPARAM lParam : メッセージの LPARAM 引数
\r
1861 *----------------------------------------------------------------------------*/
\r
1863 static BOOL CALLBACK UpExistDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1865 static TRANSPACKET *Pkt;
\r
1866 static const RADIOBUTTON UpExistButton[] = {
\r
1867 { UP_EXIST_OVW, EXIST_OVW },
\r
1868 { UP_EXIST_NEW, EXIST_NEW },
\r
1869 { UP_EXIST_RESUME, EXIST_RESUME },
\r
1870 { UP_EXIST_UNIQUE, EXIST_UNIQUE },
\r
1871 { UP_EXIST_IGNORE, EXIST_IGNORE }
\r
1873 #define UPEXISTBUTTONS (sizeof(UpExistButton)/sizeof(RADIOBUTTON))
\r
1877 case WM_INITDIALOG :
\r
1878 Pkt = (TRANSPACKET *)lParam;
\r
1879 SendDlgItemMessage(hDlg, UP_EXIST_NAME, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1880 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_SETTEXT, 0, (LPARAM)Pkt->RemoteFile);
\r
1882 if((Pkt->Type == TYPE_A) || (Pkt->ExistSize <= 0))
\r
1883 EnableWindow(GetDlgItem(hDlg, UP_EXIST_RESUME), FALSE);
\r
1885 SetRadioButtonByValue(hDlg, UpExistMode, UpExistButton, UPEXISTBUTTONS);
\r
1889 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1893 /* ここに break はない */
\r
1896 UpExistMode = AskRadioButtonValue(hDlg, UpExistButton, UPEXISTBUTTONS);
\r
1897 SendDlgItemMessage(hDlg, UP_EXIST_NAME, WM_GETTEXT, FMAX_PATH, (LPARAM)Pkt->RemoteFile);
\r
1898 EndDialog(hDlg, YES);
\r
1902 // Pkt->Abort = ABORT_USER;
\r
1903 // UpExistMode = EXIST_IGNORE;
\r
1904 EndDialog(hDlg, NO);
\r
1908 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000011);
\r
1917 /*----- アップロード/ダウンロードファイル名入力ダイアログのコールバック ------
\r
1920 * HWND hDlg : ウインドウハンドル
\r
1921 * UINT message : メッセージ番号
\r
1922 * WPARAM wParam : メッセージの WPARAM 引数
\r
1923 * LPARAM lParam : メッセージの LPARAM 引数
\r
1927 *----------------------------------------------------------------------------*/
\r
1929 static BOOL CALLBACK UpDownAsDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
1933 case WM_INITDIALOG :
\r
1934 if(CurWin == WIN_LOCAL)
\r
1935 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN064);
\r
1937 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN065);
\r
1939 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
1940 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1941 SendDlgItemMessage(hDlg, UPDOWNAS_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
1945 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
1948 SendDlgItemMessage(hDlg, UPDOWNAS_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
1949 EndDialog(hDlg, YES);
\r
1952 case UPDOWNAS_STOP :
\r
1953 EndDialog(hDlg, NO_ALL);
\r
1962 /*----- ファイル一覧で指定されたファイルを削除する ----------------------------
\r
1969 *----------------------------------------------------------------------------*/
\r
1971 void DeleteProc(void)
\r
1974 FILELIST *FileListBase;
\r
1978 char CurDir[FMAX_PATH+1];
\r
1979 char Tmp[FMAX_PATH+1];
\r
1987 AskRemoteCurDir(CurDir, FMAX_PATH);
\r
1988 FileListBase = NULL;
\r
1989 if(GetFocus() == GetLocalHwnd())
\r
1992 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
1997 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
1998 MakeSelectedFileList(Win, YES, NO, &FileListBase, &CancelFlg);
\r
2006 // DisableUserOpe();
\r
2010 Pos = FileListBase;
\r
2011 while(Pos != NULL)
\r
2013 if(Pos->Node == NODE_FILE)
\r
2015 DelNotifyAndDo(Pos, Win, &Sts, &DelFlg, CurDir);
\r
2023 DeleteAllDir(FileListBase, Win, &Sts, &DelFlg, CurDir);
\r
2025 if(Win == WIN_REMOTE)
\r
2027 AskRemoteCurDir(Tmp, FMAX_PATH);
\r
2028 if(strcmp(Tmp, CurDir) != 0)
\r
2029 DoCWD(Tmp, NO, NO, NO);
\r
2032 DeleteFileList(&FileListBase);
\r
2036 if(Win == WIN_LOCAL)
\r
2037 GetLocalDirForWnd();
\r
2039 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2043 // EnableUserOpe();
\r
2051 /*----- サブディレクトリ以下を全て削除する ------------------------------------
\r
2054 * FILELIST *Dt : 削除するファイルのリスト
\r
2055 * int Win : ウインドウ番号 (WIN_xxx)
\r
2056 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2057 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2058 * char *CurDir : カレントディレクトリ
\r
2062 *----------------------------------------------------------------------------*/
\r
2064 static void DeleteAllDir(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2068 if(Dt->Node == NODE_DIR)
\r
2070 DeleteAllDir(Dt->Next, Win, Sw, Flg, CurDir);
\r
2074 DelNotifyAndDo(Dt, Win, Sw, Flg, CurDir);
\r
2083 /*----- 削除するかどうかの確認と削除実行 --------------------------------------
\r
2086 * FILELIST *Dt : 削除するファイルのリスト
\r
2087 * int Win : ウインドウ番号 (WIN_xxx)
\r
2088 * int *Sw : 操作方法 (YES/NO/YES_ALL/NO_ALL)
\r
2089 * int *Flg : ファイルを削除したかどうかのフラグ (YES/NO)
\r
2090 * char *CurDir : カレントディレクトリ
\r
2094 *----------------------------------------------------------------------------*/
\r
2096 static void DelNotifyAndDo(FILELIST *Dt, int Win, int *Sw, int *Flg, char *CurDir)
\r
2098 char Path[FMAX_PATH+1];
\r
2100 if(Win == WIN_LOCAL)
\r
2102 AskLocalCurDir(Path, FMAX_PATH);
\r
2104 strcat(Path, Dt->File);
\r
2105 ReplaceAll(Path, '/', '\\');
\r
2109 AskRemoteCurDir(Path, FMAX_PATH);
\r
2110 SetSlashTail(Path);
\r
2111 strcat(Path, Dt->File);
\r
2112 ReplaceAll(Path, '\\', '/');
\r
2115 if(*Sw != YES_ALL)
\r
2117 sprintf(TmpString, "%s", Path);
\r
2119 if(AskHostType() == HTYPE_VMS)
\r
2120 ReformToVMSstylePathName(TmpString);
\r
2123 *Sw = DialogBox(GetFtpInst(), MAKEINTRESOURCE(delete_dlg), GetMainHwnd(), DeleteDialogCallBack);
\r
2126 if((*Sw == YES) || (*Sw == YES_ALL))
\r
2128 if(Win == WIN_LOCAL)
\r
2130 if(Dt->Node == NODE_FILE)
\r
2131 DoLocalDELE(Path);
\r
2138 /* フルパスを使わない時のための処理 */
\r
2140 // if(ProcForNonFullpath(Path, CurDir, GetMainHwnd(), 0) == FFFTP_FAIL)
\r
2141 if(ProcForNonFullpath(AskCmdCtrlSkt(), Path, CurDir, GetMainHwnd(), &CancelFlg) == FFFTP_FAIL)
\r
2146 if(Dt->Node == NODE_FILE)
\r
2158 /*----- ファイル削除ダイアログのコールバック ----------------------------------
\r
2161 * HWND hDlg : ウインドウハンドル
\r
2162 * UINT message : メッセージ番号
\r
2163 * WPARAM wParam : メッセージの WPARAM 引数
\r
2164 * LPARAM lParam : メッセージの LPARAM 引数
\r
2168 *----------------------------------------------------------------------------*/
\r
2170 static BOOL CALLBACK DeleteDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2174 case WM_INITDIALOG :
\r
2175 if(CurWin == WIN_LOCAL)
\r
2176 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN066);
\r
2178 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN067);
\r
2179 SendDlgItemMessage(hDlg, DELETE_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2183 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2186 EndDialog(hDlg, YES);
\r
2190 EndDialog(hDlg, NO);
\r
2194 EndDialog(hDlg, YES_ALL);
\r
2198 EndDialog(hDlg, NO_ALL);
\r
2207 /*----- ファイル一覧で指定されたファイルの名前を変更する ----------------------
\r
2214 *----------------------------------------------------------------------------*/
\r
2216 void RenameProc(void)
\r
2219 FILELIST *FileListBase;
\r
2221 char New[FMAX_PATH+1];
\r
2228 Sts = FFFTP_SUCCESS;
\r
2229 if(GetFocus() == GetLocalHwnd())
\r
2234 Sts = CheckClosedAndReconnect();
\r
2237 if(Sts == FFFTP_SUCCESS)
\r
2241 FileListBase = NULL;
\r
2242 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2246 Pos = FileListBase;
\r
2247 while(Pos != NULL)
\r
2249 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2251 strcpy(TmpString, Pos->File);
\r
2253 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2258 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2260 strcpy(New, TmpString);
\r
2261 if(Win == WIN_LOCAL)
\r
2262 DoLocalRENAME(Pos->File, New);
\r
2264 DoRENAME(Pos->File, New);
\r
2270 DeleteFileList(&FileListBase);
\r
2274 if(Win == WIN_LOCAL)
\r
2275 GetLocalDirForWnd();
\r
2277 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2287 // リモート側でのファイルの移動(リネーム)を行う
\r
2289 // RenameProc()をベースに改造。(2007.9.5 yutaka)
\r
2291 void MoveRemoteFileProc(int drop_index)
\r
2294 FILELIST *FileListBase;
\r
2297 char New[FMAX_PATH+1];
\r
2298 char Old[FMAX_PATH+1];
\r
2299 char HostDir[FMAX_PATH+1];
\r
2306 if(MoveMode == MOVE_DISABLE)
\r
2311 AskRemoteCurDir(HostDir, FMAX_PATH);
\r
2314 GetNodeName(WIN_REMOTE, drop_index, Pkt.File, FMAX_PATH);
\r
2316 if(MoveMode == MOVE_DLG)
\r
2318 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(move_notify_dlg), GetRemoteHwnd(), ExeEscTextDialogProc, (LPARAM)Pkt.File) == NO)
\r
2324 Sts = FFFTP_SUCCESS;
\r
2326 if(GetFocus() == GetLocalHwnd())
\r
2331 Sts = CheckClosedAndReconnect();
\r
2335 Sts = CheckClosedAndReconnect();
\r
2338 if(Sts == FFFTP_SUCCESS)
\r
2342 FileListBase = NULL;
\r
2343 MakeSelectedFileList(Win, NO, NO, &FileListBase, &CancelFlg);
\r
2347 Pos = FileListBase;
\r
2348 while(Pos != NULL)
\r
2350 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2352 strcpy(TmpString, Pos->File);
\r
2355 Sts = DialogBox(GetFtpInst(), MAKEINTRESOURCE(rename_dlg), GetMainHwnd(), RenameDialogCallBack);
\r
2363 if((Sts == YES) && (strlen(TmpString) != 0))
\r
2366 strncpy_s(Old, sizeof(Old), HostDir, _TRUNCATE);
\r
2367 strncat_s(Old, sizeof(Old), "/", _TRUNCATE);
\r
2368 strncat_s(Old, sizeof(Old), Pos->File, _TRUNCATE);
\r
2371 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2372 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2373 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2374 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2375 strncat_s(New, sizeof(New), Pos->File, _TRUNCATE);
\r
2377 if(Win == WIN_LOCAL)
\r
2378 DoLocalRENAME(Old, New);
\r
2380 DoRENAME(Old, New);
\r
2386 DeleteFileList(&FileListBase);
\r
2390 if(Win == WIN_LOCAL) {
\r
2391 GetLocalDirForWnd();
\r
2393 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2395 strncpy_s(New, sizeof(New), HostDir, _TRUNCATE);
\r
2396 strncat_s(New, sizeof(New), "/", _TRUNCATE);
\r
2397 strncat_s(New, sizeof(New), Pkt.File, _TRUNCATE);
\r
2398 DoCWD(New, YES, YES, YES);
\r
2399 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2410 /*----- 新ファイル名入力ダイアログのコールバック ------------------------------
\r
2413 * HWND hDlg : ウインドウハンドル
\r
2414 * UINT message : メッセージ番号
\r
2415 * WPARAM wParam : メッセージの WPARAM 引数
\r
2416 * LPARAM lParam : メッセージの LPARAM 引数
\r
2420 *----------------------------------------------------------------------------*/
\r
2422 static BOOL CALLBACK RenameDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2426 case WM_INITDIALOG :
\r
2427 if(CurWin == WIN_LOCAL)
\r
2428 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN068);
\r
2430 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)MSGJPN069);
\r
2431 SendDlgItemMessage(hDlg, RENAME_NEW, EM_LIMITTEXT, FMAX_PATH, 0);
\r
2432 SendDlgItemMessage(hDlg, RENAME_NEW, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2433 SendDlgItemMessage(hDlg, RENAME_TEXT, WM_SETTEXT, 0, (LPARAM)TmpString);
\r
2437 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2440 SendDlgItemMessage(hDlg, RENAME_NEW, WM_GETTEXT, FMAX_PATH, (LPARAM)TmpString);
\r
2441 EndDialog(hDlg, YES);
\r
2445 EndDialog(hDlg, NO);
\r
2448 case RENAME_STOP :
\r
2449 EndDialog(hDlg, NO_ALL);
\r
2458 /*----- 新しいディレクトリを作成する ------------------------------------------
\r
2465 *----------------------------------------------------------------------------*/
\r
2467 void MkdirProc(void)
\r
2471 char Path[FMAX_PATH+1];
\r
2478 if(GetFocus() == GetLocalHwnd())
\r
2481 Title = MSGJPN070;
\r
2486 Title = MSGJPN071;
\r
2490 Sts = InputDialogBox(mkdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2492 if((Sts == YES) && (strlen(Path) != 0))
\r
2494 if(Win == WIN_LOCAL)
\r
2498 GetLocalDirForWnd();
\r
2503 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2507 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2516 /*----- ヒストリリストを使ったディレクトリの移動 ------------------------------
\r
2519 * HWND hWnd : コンボボックスのウインドウハンドル
\r
2523 *----------------------------------------------------------------------------*/
\r
2525 void ChangeDirComboProc(HWND hWnd)
\r
2527 char Tmp[FMAX_PATH+1];
\r
2533 if((i = SendMessage(hWnd, CB_GETCURSEL, 0, 0)) != CB_ERR)
\r
2535 SendMessage(hWnd, CB_GETLBTEXT, i, (LPARAM)Tmp);
\r
2537 if(hWnd == GetLocalHistHwnd())
\r
2541 GetLocalDirForWnd();
\r
2546 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2549 if(DoCWD(Tmp, YES, NO, YES) < FTP_RETRY)
\r
2550 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2559 /*----- ブックマークを使ったディレクトリの移動 --------------------------------
\r
2562 * int MarkID : ブックマークのメニューID
\r
2566 *----------------------------------------------------------------------------*/
\r
2568 void ChangeDirBmarkProc(int MarkID)
\r
2570 char Local[FMAX_PATH+1];
\r
2571 char Remote[FMAX_PATH+1];
\r
2577 Sts = AskBookMarkText(MarkID, Local, Remote, FMAX_PATH+1);
\r
2578 if((Sts == BMARK_TYPE_LOCAL) || (Sts == BMARK_TYPE_BOTH))
\r
2581 if(DoLocalCWD(Local) == FFFTP_SUCCESS)
\r
2582 GetLocalDirForWnd();
\r
2586 if((Sts == BMARK_TYPE_REMOTE) || (Sts == BMARK_TYPE_BOTH))
\r
2588 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2591 if(DoCWD(Remote, YES, NO, YES) < FTP_RETRY)
\r
2592 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2600 /*----- ディレクトリ名を入力してディレクトリの移動 ----------------------------
\r
2603 * int Win : ウインドウ番号 (WIN_xxx)
\r
2607 *----------------------------------------------------------------------------*/
\r
2609 void ChangeDirDirectProc(int Win)
\r
2612 char Path[FMAX_PATH+1];
\r
2619 if(Win == WIN_LOCAL)
\r
2620 Title = MSGJPN072;
\r
2622 Title = MSGJPN073;
\r
2625 if(Win == WIN_LOCAL)
\r
2626 Sts = InputDialogBox(chdir_br_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2628 Sts = InputDialogBox(chdir_dlg, GetMainHwnd(), Title, Path, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001);
\r
2630 if((Sts == YES) && (strlen(Path) != 0))
\r
2632 if(Win == WIN_LOCAL)
\r
2636 GetLocalDirForWnd();
\r
2641 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2644 if(DoCWD(Path, YES, NO, YES) < FTP_RETRY)
\r
2645 GetRemoteDirForWnd(CACHE_NORMAL, &CancelFlg);
\r
2654 /*----- Dropされたファイルによるディレクトリの移動 ----------------------------
\r
2657 * WPARAM wParam : ドロップされたファイルの情報
\r
2661 *----------------------------------------------------------------------------*/
\r
2663 void ChangeDirDropFileProc(WPARAM wParam)
\r
2665 char Path[FMAX_PATH+1];
\r
2668 MakeDroppedDir(wParam, Path);
\r
2670 GetLocalDirForWnd();
\r
2676 /*----- ファイルの属性変更 ----------------------------------------------------
\r
2683 *----------------------------------------------------------------------------*/
\r
2685 void ChmodProc(void)
\r
2688 FILELIST *FileListBase;
\r
2698 if(GetFocus() == GetRemoteHwnd())
\r
2700 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2703 FileListBase = NULL;
\r
2704 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2705 if(FileListBase != NULL)
\r
2707 sprintf(Tmp, "%03X", FileListBase->Attr);
\r
2708 if(DialogBoxParam(GetFtpInst(), MAKEINTRESOURCE(chmod_dlg), GetMainHwnd(), ChmodDialogCallBack, (LPARAM)Tmp) == YES)
\r
2711 Pos = FileListBase;
\r
2712 while(Pos != NULL)
\r
2714 if((Pos->Node == NODE_FILE) || (Pos->Node == NODE_DIR))
\r
2716 DoCHMOD(Pos->File, Tmp);
\r
2721 if(ChmodFlg == YES)
\r
2722 GetRemoteDirForWnd(CACHE_REFRESH, &CancelFlg);
\r
2725 DeleteFileList(&FileListBase);
\r
2729 else if(GetFocus() == GetLocalHwnd())
\r
2732 FileListBase = NULL;
\r
2733 MakeSelectedFileList(WIN_LOCAL, NO, NO, &FileListBase, &CancelFlg);
\r
2734 if(FileListBase != NULL)
\r
2736 if((Buf = malloc(1)) != NULL)
\r
2740 Pos = FileListBase;
\r
2741 while(Pos != NULL)
\r
2743 if((BufTmp = realloc(Buf, BufLen + strlen(Pos->File) + 2)) != NULL)
\r
2746 strcpy(Buf+BufLen, Pos->File);
\r
2747 BufLen += strlen(Pos->File) + 1;
\r
2752 memset(Buf+BufLen, NUL, 1);
\r
2753 DispFileProperty(Buf);
\r
2757 DeleteFileList(&FileListBase);
\r
2764 /*----- 属性変更ダイアログのコールバック --------------------------------------
\r
2767 * HWND hDlg : ウインドウハンドル
\r
2768 * UINT message : メッセージ番号
\r
2769 * WPARAM wParam : メッセージの WPARAM 引数
\r
2770 * LPARAM lParam : メッセージの LPARAM 引数
\r
2774 *----------------------------------------------------------------------------*/
\r
2776 BOOL CALLBACK ChmodDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)
\r
2784 case WM_INITDIALOG :
\r
2785 Buf = (char *)lParam;
\r
2786 SendDlgItemMessage(hDlg, PERM_NOW, EM_LIMITTEXT, 4, 0);
\r
2787 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Buf);
\r
2788 SetAttrToDialog(hDlg, xtoi(Buf));
\r
2792 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
2795 SendDlgItemMessage(hDlg, PERM_NOW, WM_GETTEXT, 5, (LPARAM)Buf);
\r
2796 EndDialog(hDlg, YES);
\r
2800 EndDialog(hDlg, NO);
\r
2803 case PERM_O_READ :
\r
2804 case PERM_O_WRITE :
\r
2805 case PERM_O_EXEC :
\r
2806 case PERM_G_READ :
\r
2807 case PERM_G_WRITE :
\r
2808 case PERM_G_EXEC :
\r
2809 case PERM_A_READ :
\r
2810 case PERM_A_WRITE :
\r
2811 case PERM_A_EXEC :
\r
2812 Tmp = GetAttrFromDialog(hDlg);
\r
2813 sprintf(Str, "%03X", Tmp);
\r
2814 SendDlgItemMessage(hDlg, PERM_NOW, WM_SETTEXT, 0, (LPARAM)Str);
\r
2818 hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, IDH_HELP_TOPIC_0000017);
\r
2827 /*----- 属性をダイアログボックスに設定 ----------------------------------------
\r
2830 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2835 *----------------------------------------------------------------------------*/
\r
2837 static void SetAttrToDialog(HWND hDlg, int Attr)
\r
2840 SendDlgItemMessage(hDlg, PERM_O_READ, BM_SETCHECK, 1, 0);
\r
2842 SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_SETCHECK, 1, 0);
\r
2844 SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_SETCHECK, 1, 0);
\r
2847 SendDlgItemMessage(hDlg, PERM_G_READ, BM_SETCHECK, 1, 0);
\r
2849 SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_SETCHECK, 1, 0);
\r
2851 SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_SETCHECK, 1, 0);
\r
2854 SendDlgItemMessage(hDlg, PERM_A_READ, BM_SETCHECK, 1, 0);
\r
2856 SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_SETCHECK, 1, 0);
\r
2858 SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_SETCHECK, 1, 0);
\r
2864 /*----- ダイアログボックスの内容から属性を取得 --------------------------------
\r
2867 * HWND hWnd : ダイアログボックスのウインドウハンドル
\r
2871 *----------------------------------------------------------------------------*/
\r
2873 static int GetAttrFromDialog(HWND hDlg)
\r
2879 if(SendDlgItemMessage(hDlg, PERM_O_READ, BM_GETCHECK, 0, 0) == 1)
\r
2881 if(SendDlgItemMessage(hDlg, PERM_O_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2883 if(SendDlgItemMessage(hDlg, PERM_O_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2886 if(SendDlgItemMessage(hDlg, PERM_G_READ, BM_GETCHECK, 0, 0) == 1)
\r
2888 if(SendDlgItemMessage(hDlg, PERM_G_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2890 if(SendDlgItemMessage(hDlg, PERM_G_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2893 if(SendDlgItemMessage(hDlg, PERM_A_READ, BM_GETCHECK, 0, 0) == 1)
\r
2895 if(SendDlgItemMessage(hDlg, PERM_A_WRITE, BM_GETCHECK, 0, 0) == 1)
\r
2897 if(SendDlgItemMessage(hDlg, PERM_A_EXEC, BM_GETCHECK, 0, 0) == 1)
\r
2906 /*----- 任意のコマンドを送る --------------------------------------------------
\r
2913 *----------------------------------------------------------------------------*/
\r
2915 void SomeCmdProc(void)
\r
2919 FILELIST *FileListBase;
\r
2924 if(GetFocus() == GetRemoteHwnd())
\r
2926 if(CheckClosedAndReconnect() == FFFTP_SUCCESS)
\r
2929 FileListBase = NULL;
\r
2930 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
2931 memset(Cmd, NUL, 81);
\r
2932 if(FileListBase != NULL)
\r
2934 strncpy(Cmd, FileListBase->File, 80);
\r
2936 DeleteFileList(&FileListBase);
\r
2938 if(InputDialogBox(somecmd_dlg, GetMainHwnd(), NULL, Cmd, 81, &Tmp, IDH_HELP_TOPIC_0000023) == YES)
\r
2951 /*----- ファイル総容量の計算を行う --------------------------------------------
\r
2958 *----------------------------------------------------------------------------*/
\r
2960 void CalcFileSizeProc(void)
\r
2962 FILELIST *ListBase;
\r
2971 if((All = DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_notify_dlg), GetMainHwnd(), SizeNotifyDlgWndProc)) != NO_ALL)
\r
2973 Sts = FFFTP_SUCCESS;
\r
2974 if(GetFocus() == GetLocalHwnd())
\r
2979 Sts = CheckClosedAndReconnect();
\r
2982 if(Sts == FFFTP_SUCCESS)
\r
2985 MakeSelectedFileList(Win, YES, All, &ListBase, &CancelFlg);
\r
2989 while(Pos != NULL)
\r
2991 if(Pos->Node != NODE_DIR)
\r
2992 FileSize += Pos->Size;
\r
2995 DeleteFileList(&ListBase);
\r
2996 DialogBox(GetFtpInst(), MAKEINTRESOURCE(filesize_dlg), GetMainHwnd(), SizeDlgWndProc);
\r
3003 /*----- ファイル容量検索確認ダイアログのコールバック --------------------------
\r
3006 * HWND hDlg : ウインドウハンドル
\r
3007 * UINT message : メッセージ番号
\r
3008 * WPARAM wParam : メッセージの WPARAM 引数
\r
3009 * LPARAM lParam : メッセージの LPARAM 引数
\r
3013 *----------------------------------------------------------------------------*/
\r
3015 static LRESULT CALLBACK SizeNotifyDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
3019 case WM_INITDIALOG :
\r
3020 if(GetFocus() == GetLocalHwnd())
\r
3021 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN074);
\r
3023 SendDlgItemMessage(hDlg, FSNOTIFY_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN075);
\r
3027 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3030 if(SendDlgItemMessage(hDlg, FSNOTIFY_SEL_ONLY, BM_GETCHECK, 0, 0) == 1)
\r
3031 EndDialog(hDlg, NO);
\r
3033 EndDialog(hDlg, YES);
\r
3037 EndDialog(hDlg, NO_ALL);
\r
3046 /*----- ファイル容量検索ダイアログのコールバック ------------------------------
\r
3049 * HWND hDlg : ウインドウハンドル
\r
3050 * UINT message : メッセージ番号
\r
3051 * WPARAM wParam : メッセージの WPARAM 引数
\r
3052 * LPARAM lParam : メッセージの LPARAM 引数
\r
3056 *----------------------------------------------------------------------------*/
\r
3058 static LRESULT CALLBACK SizeDlgWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
\r
3060 char Tmp[FMAX_PATH+1];
\r
3064 case WM_INITDIALOG :
\r
3065 if(GetFocus() == GetLocalHwnd())
\r
3066 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN076);
\r
3068 SendDlgItemMessage(hDlg, FSIZE_TITLE, WM_SETTEXT, 0, (LPARAM)MSGJPN077);
\r
3070 MakeSizeString(FileSize, Tmp);
\r
3071 SendDlgItemMessage(hDlg, FSIZE_SIZE, WM_SETTEXT, 0, (LPARAM)Tmp);
\r
3075 switch(GET_WM_COMMAND_ID(wParam, lParam))
\r
3079 EndDialog(hDlg, YES);
\r
3089 /*----- ディレクトリ移動失敗時のエラーを表示 ----------------------------------
\r
3092 * HWND hDlg : ウインドウハンドル
\r
3096 *----------------------------------------------------------------------------*/
\r
3098 void DispCWDerror(HWND hWnd)
\r
3100 DialogBox(GetFtpInst(), MAKEINTRESOURCE(cwderr_dlg), hWnd, ExeEscDialogProc);
\r
3105 /*----- URLをクリップボードにコピー -------------------------------------------
\r
3112 *----------------------------------------------------------------------------*/
\r
3114 void CopyURLtoClipBoard(void)
\r
3116 FILELIST *FileListBase;
\r
3119 char Path[FMAX_PATH+1];
\r
3120 char Host[HOST_ADRS_LEN+1];
\r
3125 if(GetFocus() == GetRemoteHwnd())
\r
3127 FileListBase = NULL;
\r
3128 MakeSelectedFileList(WIN_REMOTE, NO, NO, &FileListBase, &CancelFlg);
\r
3129 if(FileListBase != NULL)
\r
3131 strcpy(Host, AskHostAdrs());
\r
3134 Pos = FileListBase;
\r
3135 while(Pos != NULL)
\r
3137 AskRemoteCurDir(Path, FMAX_PATH);
\r
3138 SetSlashTail(Path);
\r
3139 strcat(Path, Pos->File);
\r
3141 if(AskHostType() == HTYPE_VMS)
\r
3142 ReformToVMSstylePathName(Path);
\r
3145 if(AskHostPort() != PORT_NOR)
\r
3146 sprintf(Port, ":%d", AskHostPort());
\r
3149 Total += strlen(Path) + strlen(Host) + strlen(Port) + 8; /* 8は "ftp://\r\n" のぶん */
\r
3150 if(AskHostType() == HTYPE_VMS)
\r
3153 if((Buf = realloc(Buf, Total+1)) == NULL)
\r
3156 if(AskHostType() != HTYPE_VMS)
\r
3157 sprintf(Buf + Set, "ftp://%s%s%s\r\n", Host, Port, Path);
\r
3159 sprintf(Buf + Set, "ftp://%s%s/%s\r\n", Host, Port, Path);
\r
3166 CopyStrToClipBoard(Buf);
\r
3170 DeleteFileList(&FileListBase);
\r
3176 /*----- フルパスを使わないファイルアクセスの準備 ------------------------------
\r
3179 * char *Path : パス名
\r
3180 * char *CurDir : カレントディレクトリ
\r
3181 * HWND hWnd : エラーウインドウを表示する際の親ウインドウ
\r
3182 * int Type : 使用するソケットの種類
\r
3183 * 0=コマンドソケット, 1=転送ソケット
\r
3186 * int ステータス(FFFTP_SUCCESS/FFFTP_FAIL)
\r
3190 * このモジュール内で CWD を行ない、
\r
3191 * Path にファイル名のみ残す。(パス名は消す)
\r
3192 *----------------------------------------------------------------------------*/
\r
3195 //int ProcForNonFullpath(char *Path, char *CurDir, HWND hWnd, int Type)
\r
3196 int ProcForNonFullpath(SOCKET cSkt, char *Path, char *CurDir, HWND hWnd, int *CancelCheckWork)
\r
3200 char Tmp[FMAX_PATH+1];
\r
3202 Sts = FFFTP_SUCCESS;
\r
3203 if(AskNoFullPathMode() == YES)
\r
3205 strcpy(Tmp, Path);
\r
3206 if(AskHostType() == HTYPE_VMS)
\r
3208 GetUpperDirEraseTopSlash(Tmp);
\r
3209 ReformToVMSstyleDirName(Tmp);
\r
3211 else if(AskHostType() == HTYPE_STRATUS)
\r
3212 GetUpperDirEraseTopSlash(Tmp);
\r
3216 if(strcmp(Tmp, CurDir) != 0)
\r
3220 // Cmd = CommandProcCmd(NULL, "CWD %s", Tmp);
\r
3222 // Cmd = CommandProcTrn(NULL, "CWD %s", Tmp);
\r
3223 Cmd = CommandProcTrn(cSkt, NULL, CancelCheckWork, "CWD %s", Tmp);
\r
3225 if(Cmd/100 != FTP_COMPLETE)
\r
3227 DispCWDerror(hWnd);
\r
3231 strcpy(CurDir, Tmp);
\r
3233 strcpy(Path, GetFileName(Path));
\r
3239 /*----- ディレクトリ名をVAX VMSスタイルに変換する -----------------------------
\r
3242 * char *Path : パス名
\r
3248 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr.ppp]
\r
3249 *----------------------------------------------------------------------------*/
\r
3251 void ReformToVMSstyleDirName(char *Path)
\r
3256 if((Btm = strchr(Path, ']')) != NULL)
\r
3259 while((Pos = strchr(Pos, '/')) != NULL)
\r
3262 memmove(Btm, Btm+1, strlen(Btm+1)+1);
\r
3263 Pos = strchr(Path, NUL);
\r
3264 if(*(Pos-1) == '.')
\r
3275 /*----- ファイル名をVAX VMSスタイルに変換する ---------------------------------
\r
3278 * char *Path : パス名
\r
3284 * ddd:[xxx.yyy]/rrr/ppp --> ddd:[xxx.yyy.rrr]ppp
\r
3285 *----------------------------------------------------------------------------*/
\r
3287 void ReformToVMSstylePathName(char *Path)
\r
3289 char Fname[FMAX_PATH+1];
\r
3291 strcpy(Fname, GetFileName(Path));
\r
3293 GetUpperDirEraseTopSlash(Path);
\r
3294 ReformToVMSstyleDirName(Path);
\r
3296 strcat(Path, Fname);
\r
3302 #if defined(HAVE_OPENVMS)
\r
3303 /*----- VMSの"HOGE.DIR;?"というディレクトリ名から"HOGE"を取り出す ---------------
\r
3306 * char *DirName : "HOGE.DIR;?"形式のディレクトリ名
\r
3307 * int Flg : ";"のチェックをする(TRUE)かしない(FALSE)か
\r
3314 *----------------------------------------------------------------------------*/
\r
3316 void ReformVMSDirName(char *DirName, int Flg)
\r
3320 if (Flg == TRUE) {
\r
3321 /* ';'がない場合はVMS形式じゃなさそうなので何もしない */
\r
3322 if ((p = strrchr(DirName, ';')) == NULL)
\r
3326 /* ".DIR"があったらつぶす */
\r
3327 if ((p = strrchr(DirName, '.'))) {
\r
3328 if (memcmp(p + 1, "DIR", 3) == 0)
\r
3335 /*----- ファイル名に使えない文字がないかチェックし名前を変更する --------------
\r
3338 * char *Fname : ファイル名
\r
3342 * FFFTP_SUCCESS/FFFTP_FAIL=中止する
\r
3346 *----------------------------------------------------------------------------*/
\r
3348 static int RenameUnuseableName(char *Fname)
\r
3353 Ret = FFFTP_SUCCESS;
\r
3356 if((_mbschr(Fname, ':') != NULL) ||
\r
3357 (_mbschr(Fname, '*') != NULL) ||
\r
3358 (_mbschr(Fname, '?') != NULL) ||
\r
3359 (_mbschr(Fname, '<') != NULL) ||
\r
3360 (_mbschr(Fname, '>') != NULL) ||
\r
3361 (_mbschr(Fname, '|') != NULL) ||
\r
3362 (_mbschr(Fname, '\x22') != NULL) ||
\r
3363 (_mbschr(Fname, '\\') != NULL))
\r
3365 if(InputDialogBox(forcerename_dlg, GetMainHwnd(), NULL, Fname, FMAX_PATH+1, &Tmp, IDH_HELP_TOPIC_0000001) == NO)
\r