1 /*=============================================================================
\r
5 ===============================================================================
\r
6 / Copyright (C) 1997-2007 Sota. All rights reserved.
\r
8 / Redistribution and use in source and binary forms, with or without
\r
9 / modification, are permitted provided that the following conditions
\r
12 / 1. Redistributions of source code must retain the above copyright
\r
13 / notice, this list of conditions and the following disclaimer.
\r
14 / 2. Redistributions in binary form must reproduce the above copyright
\r
15 / notice, this list of conditions and the following disclaimer in the
\r
16 / documentation and/or other materials provided with the distribution.
\r
18 / THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
\r
19 / IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
\r
20 / OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
\r
21 / IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
\r
22 / INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
\r
23 / BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
\r
24 / USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
\r
25 / ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
\r
26 / (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
\r
27 / THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
\r
28 /============================================================================*/
\r
30 /* このソースは一部、WS_FTP Version 93.12.05 のソースを参考にしました。 */
\r
37 #include <mbstring.h>
\r
40 //#include <winsock.h>
\r
41 #include <winsock2.h>
\r
42 #include <windowsx.h>
\r
43 #include <commctrl.h>
\r
46 #include "resource.h"
\r
51 /*===== プロトタイプ =====*/
\r
53 static int DoPWD(char *Buf);
\r
54 static int ReadOneLine(SOCKET cSkt, char *Buf, int Max, int *CancelCheckWork);
\r
55 static int DoDirList(HWND hWnd, SOCKET cSkt, char *AddOpt, char *Path, int Num, int *CancelCheckWork);
\r
56 static void ChangeSepaLocal2Remote(char *Fname);
\r
57 static void ChangeSepaRemote2Local(char *Fname);
\r
59 /*===== 外部参照 =====*/
\r
61 extern TRANSPACKET MainTransPkt;
\r
65 extern int SendQuit;
\r
68 extern int CancelFlg;
\r
70 /*===== ローカルなワーク =====*/
\r
72 static int PwdCommandType;
\r
75 //static int CheckCancelFlg = NO;
\r
79 /*----- リモート側のカレントディレクトリ変更 ----------------------------------
\r
83 * int Disp : ディレクトリリストにパス名を表示するかどうか(YES/NO)
\r
84 * int ForceGet : 失敗してもカレントディレクトリを取得する
\r
85 * int ErrorBell : エラー事の音を鳴らすかどうか(YES/NO)
\r
89 *----------------------------------------------------------------------------*/
\r
91 int DoCWD(char *Path, int Disp, int ForceGet, int ErrorBell)
\r
94 char Buf[FMAX_PATH+1];
\r
96 Sts = FTP_COMPLETE * 100;
\r
98 if(strcmp(Path, "..") == 0)
\r
99 Sts = CommandProcCmd(NULL, "CDUP");
\r
100 else if(strcmp(Path, "") != 0)
\r
102 if((AskHostType() != HTYPE_VMS) || (strchr(Path, '[') != NULL))
\r
103 Sts = CommandProcCmd(NULL, "CWD %s", Path);
\r
105 Sts = CommandProcCmd(NULL, "CWD [.%s]", Path); /* VMS用 */
\r
108 if((Sts/100 >= FTP_CONTINUE) && (ErrorBell == YES))
\r
109 SoundPlay(SND_ERROR);
\r
111 if((Sts/100 == FTP_COMPLETE) ||
\r
116 if(DoPWD(Buf) != FTP_COMPLETE)
\r
118 /*===== PWDが使えなかった場合 =====*/
\r
124 AskRemoteCurDir(Buf, FMAX_PATH);
\r
125 if(strlen(Buf) == 0)
\r
128 while(*Path != NUL)
\r
130 if(strcmp(Path, ".") == 0)
\r
132 else if(strncmp(Path, "./", 2) == 0)
\r
134 else if(strcmp(Path, "..") == 0)
\r
139 else if(strncmp(Path, "../", 2) == 0)
\r
153 SetRemoteDirHist(Buf);
\r
162 /*----- リモート側のカレントディレクトリ変更(その2)-------------------------
\r
166 * char *Cur : カレントディレクトリ
\r
172 * パス名は "xxx/yyy/zzz" の形式
\r
173 * ディレクトリ変更が失敗したら、カレントディレクトリに戻しておく
\r
174 *----------------------------------------------------------------------------*/
\r
176 int DoCWDStepByStep(char *Path, char *Cur)
\r
181 char Tmp[FMAX_PATH+2];
\r
183 Sts = FTP_COMPLETE;
\r
185 memset(Tmp, NUL, FMAX_PATH+2);
\r
190 if((Set2 = strchr(Set, '/')) != NULL)
\r
192 if((Sts = DoCWD(Set, NO, NO, NO)) != FTP_COMPLETE)
\r
199 if(Sts != FTP_COMPLETE)
\r
200 DoCWD(Cur, NO, NO, NO);
\r
206 /*----- リモート側のカレントディレクトリ取得 ----------------------------------
\r
209 * char *Buf : パス名を返すバッファ
\r
213 *----------------------------------------------------------------------------*/
\r
215 static int DoPWD(char *Buf)
\r
221 if(PwdCommandType == PWD_XPWD)
\r
223 Sts = CommandProcCmd(Tmp, "XPWD");
\r
224 if(Sts/100 != FTP_COMPLETE)
\r
225 PwdCommandType = PWD_PWD;
\r
227 if(PwdCommandType == PWD_PWD)
\r
228 Sts = CommandProcCmd(Tmp, "PWD");
\r
230 if(Sts/100 == FTP_COMPLETE)
\r
232 if((Pos = strchr(Tmp, '"')) != NULL)
\r
234 memmove(Tmp, Pos+1, strlen(Pos+1)+1);
\r
235 if((Pos = strchr(Tmp, '"')) != NULL)
\r
239 memmove(Tmp, Tmp+4, strlen(Tmp+4)+1);
\r
241 if(strlen(Tmp) < FMAX_PATH)
\r
244 ReplaceAll(Buf, '\\', '/');
\r
245 ChangeSepaRemote2Local(Buf);
\r
248 Sts = FTP_ERROR*100;
\r
254 /*----- PWDコマンドのタイプを初期化する ---------------------------------------
\r
261 *----------------------------------------------------------------------------*/
\r
263 void InitPWDcommand()
\r
265 PwdCommandType = PWD_XPWD;
\r
269 /*----- リモート側のディレクトリ作成 ----------------------------------------
\r
276 *----------------------------------------------------------------------------*/
\r
278 int DoMKD(char *Path)
\r
282 Sts = CommandProcCmd(NULL, "MKD %s", Path);
\r
284 if(Sts/100 >= FTP_CONTINUE)
\r
285 SoundPlay(SND_ERROR);
\r
291 /*----- リモート側のディレクトリ削除 ------------------------------------------
\r
298 *----------------------------------------------------------------------------*/
\r
300 int DoRMD(char *Path)
\r
304 Sts = CommandProcCmd(NULL, "RMD %s", Path);
\r
306 if(Sts/100 >= FTP_CONTINUE)
\r
307 SoundPlay(SND_ERROR);
\r
313 /*----- リモート側のファイル削除 ----------------------------------------------
\r
320 *----------------------------------------------------------------------------*/
\r
322 int DoDELE(char *Path)
\r
326 Sts = CommandProcCmd(NULL, "DELE %s", Path);
\r
328 if(Sts/100 >= FTP_CONTINUE)
\r
329 SoundPlay(SND_ERROR);
\r
335 /*----- リモート側のファイル名変更 --------------------------------------------
\r
338 * char *Src : 元ファイル名
\r
339 * char *Dst : 変更後のファイル名
\r
343 *----------------------------------------------------------------------------*/
\r
345 int DoRENAME(char *Src, char *Dst)
\r
349 Sts = CommandProcCmd(NULL, "RNFR %s", Src);
\r
352 // Sts = command(AskCmdCtrlSkt(), NULL, &CheckCancelFlg, "RNTO %s", Dst);
\r
353 Sts = command(AskCmdCtrlSkt(), NULL, &CancelFlg, "RNTO %s", Dst);
\r
355 if(Sts/100 >= FTP_CONTINUE)
\r
356 SoundPlay(SND_ERROR);
\r
362 /*----- リモート側のファイルの属性変更 ----------------------------------------
\r
366 * char *Mode : モード文字列
\r
370 *----------------------------------------------------------------------------*/
\r
372 int DoCHMOD(char *Path, char *Mode)
\r
376 Sts = CommandProcCmd(NULL, "%s %s %s", AskHostChmodCmd(), Mode, Path);
\r
378 if(Sts/100 >= FTP_CONTINUE)
\r
379 SoundPlay(SND_ERROR);
\r
385 /*----- リモート側のファイルのサイズを取得(転送ソケット使用)-----------------
\r
389 * LONGLONG *Size : ファイルのサイズを返すワーク
\r
396 * サイズが選られない時は Size = -1 を返す
\r
397 *----------------------------------------------------------------------------*/
\r
400 //int DoSIZE(char *Path, LONGLONG *Size)
\r
401 int DoSIZE(SOCKET cSkt, char *Path, LONGLONG *Size, int *CancelCheckWork)
\r
407 // Sts = CommandProcTrn(Tmp, "SIZE %s", Path);
\r
408 Sts = CommandProcTrn(cSkt, Tmp, CancelCheckWork, "SIZE %s", Path);
\r
411 if((Sts/100 == FTP_COMPLETE) && (strlen(Tmp) > 4) && IsDigit(Tmp[4]))
\r
412 *Size = _atoi64(&Tmp[4]);
\r
418 /*----- リモート側のファイルの日付を取得(転送ソケット使用)-------------------
\r
422 * FILETIME *Time : 日付を返すワーク
\r
429 * 日付が選られない時は Time = 0 を返す
\r
430 *----------------------------------------------------------------------------*/
\r
433 //int DoMDTM(char *Path, FILETIME *Time)
\r
434 int DoMDTM(SOCKET cSkt, char *Path, FILETIME *Time, int *CancelCheckWork)
\r
440 Time->dwLowDateTime = 0;
\r
441 Time->dwHighDateTime = 0;
\r
444 // Sts = CommandProcTrn(Tmp, "MDTM %s", Path);
\r
445 Sts = CommandProcTrn(cSkt, Tmp, CancelCheckWork, "MDTM %s", Path);
\r
446 if(Sts/100 == FTP_COMPLETE)
\r
448 sTime.wMilliseconds = 0;
\r
449 if(sscanf(Tmp+4, "%04d%02d%02d%02d%02d%02d",
\r
450 &sTime.wYear, &sTime.wMonth, &sTime.wDay,
\r
451 &sTime.wHour, &sTime.wMinute, &sTime.wSecond) == 6)
\r
453 SystemTimeToFileTime(&sTime, Time);
\r
455 // SpecificLocalFileTime2FileTime(Time, AskHostTimeZone());
\r
464 int DoMFMT(SOCKET cSkt, char *Path, FILETIME *Time, int *CancelCheckWork)
\r
470 FileTimeToSystemTime(Time, &sTime);
\r
472 Sts = CommandProcTrn(cSkt, Tmp, CancelCheckWork, "MFMT %04d%02d%02d%02d%02d%02d %s", sTime.wYear, sTime.wMonth, sTime.wDay, sTime.wHour, sTime.wMinute, sTime.wSecond, Path);
\r
477 /*----- リモート側のコマンドを実行 --------------------------------------------
\r
480 * char *CmdStr : コマンド文字列
\r
484 *----------------------------------------------------------------------------*/
\r
487 //int DoQUOTE(char *CmdStr)
\r
488 int DoQUOTE(SOCKET cSkt, char *CmdStr, int *CancelCheckWork)
\r
492 // Sts = CommandProcCmd(NULL, "%s", CmdStr);
\r
493 Sts = CommandProcTrn(cSkt, NULL, CancelCheckWork, "%s", CmdStr);
\r
495 if(Sts/100 >= FTP_CONTINUE)
\r
496 SoundPlay(SND_ERROR);
\r
502 /*----- ソケットを閉じる ------------------------------------------------------
\r
509 *----------------------------------------------------------------------------*/
\r
511 SOCKET DoClose(SOCKET Sock)
\r
513 if(Sock != INVALID_SOCKET)
\r
515 // if(WSAIsBlocking())
\r
517 // DoPrintf("Skt=%u : Cancelled blocking call", Sock);
\r
518 // WSACancelBlockingCall();
\r
520 do_closesocket(Sock);
\r
521 DoPrintf("Skt=%u : Socket closed.", Sock);
\r
522 Sock = INVALID_SOCKET;
\r
524 if(Sock != INVALID_SOCKET)
\r
525 DoPrintf("Skt=%u : Failed to close socket.", Sock);
\r
531 /*----- ホストからログアウトする ----------------------------------------------
\r
534 * kSOCKET ctrl_skt : ソケット
\r
538 *----------------------------------------------------------------------------*/
\r
541 //int DoQUIT(SOCKET ctrl_skt)
\r
542 int DoQUIT(SOCKET ctrl_skt, int *CancelCheckWork)
\r
546 Ret = FTP_COMPLETE;
\r
547 if(SendQuit == YES)
\r
549 // Ret = command(ctrl_skt, NULL, &CheckCancelFlg, "QUIT") / 100;
\r
550 Ret = command(ctrl_skt, NULL, CancelCheckWork, "QUIT") / 100;
\r
556 /*----- リモート側のディレクトリリストを取得(コマンドコントロールソケットを使用)
\r
559 * char *AddOpt : 追加のオプション
\r
561 * int Num : ファイル名番号
\r
565 *----------------------------------------------------------------------------*/
\r
567 int DoDirListCmdSkt(char *AddOpt, char *Path, int Num, int *CancelCheckWork)
\r
571 if(AskTransferNow() == YES)
\r
574 // if((Sts = DoDirList(NULL, AskCmdCtrlSkt(), AddOpt, Path, Num)) == 429)
\r
576 // ReConnectCmdSkt();
\r
577 Sts = DoDirList(NULL, AskCmdCtrlSkt(), AddOpt, Path, Num, CancelCheckWork);
\r
579 if(Sts/100 >= FTP_CONTINUE)
\r
580 SoundPlay(SND_ERROR);
\r
586 /*----- リモート側のディレクトリリストを取得 ----------------------------------
\r
589 * HWND hWnd : 転送中ダイアログのウインドウハンドル
\r
590 * SOCKET cSkt : コントロールソケット
\r
591 * char *AddOpt : 追加のオプション
\r
592 * char *Path : パス名 (""=カレントディレクトリ)
\r
593 * int Num : ファイル名番号
\r
597 *----------------------------------------------------------------------------*/
\r
599 static int DoDirList(HWND hWnd, SOCKET cSkt, char *AddOpt, char *Path, int Num, int *CancelCheckWork)
\r
601 char Tmp[FMAX_PATH];
\r
605 //DoPrintf("===== DoDirList %d = %s", Num, Path);
\r
607 MakeCacheFileName(Num, Tmp);
\r
608 // MainTransPkt.ctrl_skt = cSkt;
\r
610 if(AskListCmdMode() == NO)
\r
612 strcpy(MainTransPkt.Cmd, "NLST");
\r
613 if(strlen(AskHostLsName()) > 0)
\r
615 strcat(MainTransPkt.Cmd, " ");
\r
616 if((AskHostType() == HTYPE_ACOS) || (AskHostType() == HTYPE_ACOS_4))
\r
617 strcat(MainTransPkt.Cmd, "'");
\r
618 strcat(MainTransPkt.Cmd, AskHostLsName());
\r
619 if((AskHostType() == HTYPE_ACOS) || (AskHostType() == HTYPE_ACOS_4))
\r
620 strcat(MainTransPkt.Cmd, "'");
\r
622 if(strlen(AddOpt) > 0)
\r
623 strcat(MainTransPkt.Cmd, AddOpt);
\r
628 // strcpy(MainTransPkt.Cmd, "LIST");
\r
629 if(AskUseMLSD() && (AskHostFeature() & FEATURE_MLSD))
\r
630 strcpy(MainTransPkt.Cmd, "MLSD");
\r
632 strcpy(MainTransPkt.Cmd, "LIST");
\r
633 if(strlen(AddOpt) > 0)
\r
635 strcat(MainTransPkt.Cmd, " -");
\r
636 strcat(MainTransPkt.Cmd, AddOpt);
\r
640 if(strlen(Path) > 0)
\r
641 strcat(MainTransPkt.Cmd, " ");
\r
643 strcpy(MainTransPkt.RemoteFile, Path);
\r
644 strcpy(MainTransPkt.LocalFile, Tmp);
\r
645 MainTransPkt.Type = TYPE_A;
\r
646 MainTransPkt.Size = -1;
\r
647 /* ファイルリストの中の漢字のファイル名は、別途 */
\r
648 /* ChangeFnameRemote2Local で変換する */
\r
649 MainTransPkt.KanjiCode = KANJI_NOCNV;
\r
650 MainTransPkt.KanaCnv = YES;
\r
651 MainTransPkt.Mode = EXIST_OVW;
\r
652 MainTransPkt.ExistSize = 0;
\r
653 MainTransPkt.hWndTrans = hWnd;
\r
654 MainTransPkt.Next = NULL;
\r
656 Sts = DoDownload(cSkt, &MainTransPkt, YES, CancelCheckWork);
\r
659 //DoPrintf("===== DoDirList Done.");
\r
665 /*----- リモート側へコマンドを送りリプライを待つ(コマンドソケット)-----------
\r
668 * char *Reply : リプライのコピー先 (NULL=コピーしない)
\r
669 * char *fmt : フォーマット文字列
\r
676 * コマンドコントロールソケットを使う
\r
677 *----------------------------------------------------------------------------*/
\r
679 int CommandProcCmd(char *Reply, char *fmt, ...)
\r
685 va_start(Args, fmt);
\r
686 wvsprintf(Cmd, fmt, Args);
\r
689 if(AskTransferNow() == YES)
\r
693 //DoPrintf("**CommandProcCmd : %s", Cmd);
\r
695 // if((Sts = command(AskCmdCtrlSkt(), Reply, "%s", Cmd)) == 429)
\r
697 // if(ReConnectCmdSkt() == FFFTP_SUCCESS)
\r
700 // Sts = command(AskCmdCtrlSkt(), Reply, &CheckCancelFlg, "%s", Cmd);
\r
701 Sts = command(AskCmdCtrlSkt(), Reply, &CancelFlg, "%s", Cmd);
\r
708 #if defined(HAVE_TANDEM)
\r
709 /*----- OSS/Guardian ファイルシステムを切り替えるコマンドを送る ---------------
\r
716 *----------------------------------------------------------------------------*/
\r
718 void SwitchOSSProc(void)
\r
720 char Buf[MAX_PATH+1];
\r
722 /* DoPWD でノード名の \ を保存するために OSSフラグも変更する */
\r
723 if(AskOSS() == YES) {
\r
724 DoQUOTE(AskCmdCtrlSkt(), "GUARDIAN", &CancelFlg);
\r
727 DoQUOTE(AskCmdCtrlSkt(), "OSS", &CancelFlg);
\r
730 /* Current Dir 再取得 */
\r
731 if (DoPWD(Buf) == FTP_COMPLETE)
\r
732 SetRemoteDirHist(Buf);
\r
734 PostMessage(GetMainHwnd(), WM_COMMAND, MAKEWPARAM(REFRESH_REMOTE, 0), 0);
\r
741 /*----- リモート側へコマンドを送りリプライを待つ(転送ソケット)---------------
\r
744 * SOCKET cSkt : ソケット
\r
745 * char *Reply : リプライのコピー先 (NULL=コピーしない)
\r
746 * int *CancelCheckWork :
\r
747 * char *fmt : フォーマット文字列
\r
755 *----------------------------------------------------------------------------*/
\r
758 //int CommandProcTrn(char *Reply, char *fmt, ...)
\r
759 int CommandProcTrn(SOCKET cSkt, char *Reply, int* CancelCheckWork, char *fmt, ...)
\r
765 va_start(Args, fmt);
\r
766 wvsprintf(Cmd, fmt, Args);
\r
770 //DoPrintf("**CommandProcTrn : %s", Cmd);
\r
772 // if((Sts = command(AskTrnCtrlSkt(), Reply, "%s", Cmd)) == 429)
\r
774 // if(ReConnectTrnSkt() == FFFTP_SUCCESS)
\r
775 // Sts = command(AskTrnCtrlSkt(), Reply, &CheckCancelFlg, "%s", Cmd);
\r
776 Sts = command(cSkt, Reply, CancelCheckWork, "%s", Cmd);
\r
782 /*----- コマンドを送りリプライを待つ ------------------------------------------
\r
785 * SOCKET cSkt : コントロールソケット
\r
786 * char *Reply : リプライのコピー先 (NULL=コピーしない)
\r
787 * char *fmt : フォーマット文字列
\r
794 * ホストのファイル名の漢字コードに応じて、ここで漢字コードの変換を行なう
\r
795 *----------------------------------------------------------------------------*/
\r
798 //static int cntcnt = 0;
\r
801 int ConvertFTPCommandToPuTTYSFTP(SOCKET cSkt, char *Reply, int *CancelCheckWork, char *Cmd)
\r
806 char NewCmd[FMAX_PATH*2];
\r
807 static char RenameFrom[FMAX_PATH+1];
\r
810 if(strcmp(Cmd, "QUIT") == 0)
\r
812 sprintf(NewCmd, "ls\r\n");
\r
813 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
815 if(strcmp(Cmd, "LIST") == 0)
\r
817 sprintf(NewCmd, "ls\r\n");
\r
818 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
820 else if(strncmp(Cmd, "REST ", 5) == 0)
\r
822 SFTP_SetFilePosition(cSkt, (LONGLONG)_strtoi64(&Cmd[5], NULL, 10));
\r
824 else if(strncmp(Cmd, "RETR ", 5) == 0)
\r
826 sprintf(NewCmd, "get \"%s\"\r\n", &Cmd[5]);
\r
827 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
829 else if(strncmp(Cmd, "STOR ", 5) == 0)
\r
831 sprintf(NewCmd, "put \"%s\"\r\n", &Cmd[5]);
\r
832 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
834 else if(strncmp(Cmd, "APPE ", 5) == 0)
\r
836 sprintf(NewCmd, "reput \"%s\"\r\n", &Cmd[5]);
\r
837 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
839 else if(strncmp(Cmd, "DELE ", 5) == 0)
\r
841 sprintf(NewCmd, "rm \"%s\"\r\n", &Cmd[5]);
\r
842 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
844 else if(strncmp(Cmd, "CWD ", 4) == 0)
\r
846 sprintf(NewCmd, "cd \"%s\"\r\n", &Cmd[4]);
\r
847 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
849 else if(strcmp(Cmd, "PWD") == 0)
\r
851 sprintf(NewCmd, "pwd\r\n");
\r
852 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
854 else if(strcmp(Cmd, "XPWD") == 0)
\r
856 sprintf(NewCmd, "pwd\r\n");
\r
857 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
859 else if(strncmp(Cmd, "MKD ", 4) == 0)
\r
861 sprintf(NewCmd, "mkdir \"%s\"\r\n", &Cmd[4]);
\r
862 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
864 else if(strncmp(Cmd, "RMD ", 4) == 0)
\r
866 sprintf(NewCmd, "rmdir \"%s\"\r\n", &Cmd[4]);
\r
867 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
869 else if(strncmp(Cmd, "RNFR ", 5) == 0)
\r
871 strcpy(RenameFrom, &Cmd[5]);
\r
873 else if(strncmp(Cmd, "RNTO ", 5) == 0)
\r
875 sprintf(NewCmd, "mv \"%s\" \"%s\"\r\n", RenameFrom, &Cmd[5]);
\r
876 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
878 else if(strncmp(Cmd, "SITE CHMOD ", 11) == 0)
\r
881 sprintf(NewCmd, "chmod %s \"%s\"\r\n", &Cmd[11], &Cmd[15]);
\r
882 SFTP_send(cSkt, NewCmd, strlen(NewCmd), 0);
\r
887 int command(SOCKET cSkt, char *Reply, int *CancelCheckWork, char *fmt, ...)
\r
890 char Cmd[FMAX_PATH*2];
\r
892 char TmpBuf[ONELINE_BUF_SIZE];
\r
894 if(cSkt != INVALID_SOCKET)
\r
896 va_start(Args, fmt);
\r
897 wvsprintf(Cmd, fmt, Args);
\r
901 if(IsSFTPAttached(cSkt))
\r
902 return ConvertFTPCommandToPuTTYSFTP(cSkt, Reply, CancelCheckWork, Cmd);
\r
904 if(strncmp(Cmd, "PASS ", 5) == 0)
\r
905 SetTaskMsg(">PASS [xxxxxx]");
\r
906 else if((strncmp(Cmd, "USER ", 5) == 0) ||
\r
907 (strncmp(Cmd, "OPEN ", 5) == 0))
\r
909 SetTaskMsg(">%s", Cmd);
\r
913 ChangeSepaLocal2Remote(Cmd);
\r
914 SetTaskMsg(">%s", Cmd);
\r
915 ChangeFnameLocal2Remote(Cmd, FMAX_PATH*2);
\r
918 // DoPrintf("SEND : %s", Cmd);
\r
919 strcat(Cmd, "\x0D\x0A");
\r
925 if(SendData(cSkt, Cmd, strlen(Cmd), 0, CancelCheckWork) == FFFTP_SUCCESS)
\r
927 Sts = ReadReplyMessage(cSkt, Reply, 1024, CancelCheckWork, TmpBuf);
\r
931 //if(Reply != NULL)
\r
932 // DoPrintf("%x : %x : %s : %s", cSkt, &TmpBuf, Cmd, Reply);
\r
934 // DoPrintf("%x : %x : %s : NULL", cSkt, &TmpBuf, Cmd);
\r
936 // DoPrintf("command() RET=%d", Sts);
\r
945 /*----- データを送る ----------------------------------------------------------
\r
948 * SOCKET Skt : ソケット
\r
950 * int Size : 送るデータのサイズ
\r
951 * int Mode : コールモード
\r
955 * FFFTP_SUCCESS/FFFTP_FAIL
\r
956 *----------------------------------------------------------------------------*/
\r
958 int SendData(SOCKET Skt, char *Data, int Size, int Mode, int *CancelCheckWork)
\r
963 // struct timeval Tout;
\r
964 // struct timeval *ToutPtr;
\r
968 if(Skt != INVALID_SOCKET)
\r
970 Sts = FFFTP_SUCCESS;
\r
973 // FD_ZERO(&SendFds);
\r
974 // FD_SET(Skt, &SendFds);
\r
976 // if(TimeOut != 0)
\r
978 // Tout.tv_sec = TimeOut;
\r
979 // Tout.tv_usec = 0;
\r
980 // ToutPtr = &Tout;
\r
982 // Tmp = select(0, NULL, &SendFds, NULL, ToutPtr);
\r
983 // if(Tmp == SOCKET_ERROR)
\r
985 // Sts = FFFTP_FAIL;
\r
986 // ReportWSError("select", WSAGetLastError());
\r
989 // else if(Tmp == 0)
\r
991 // Sts = FFFTP_FAIL;
\r
992 // SetTaskMsg(MSGJPN241);
\r
996 Tmp = do_send(Skt, Data, Size, Mode, &TimeOutErr, CancelCheckWork);
\r
997 if(TimeOutErr == YES)
\r
1000 SetTaskMsg(MSGJPN241);
\r
1003 else if(Tmp == SOCKET_ERROR)
\r
1006 ReportWSError("send", WSAGetLastError());
\r
1018 /*----- 応答メッセージを受け取る ----------------------------------------------
\r
1021 * SOCKET cSkt : コントロールソケット
\r
1022 * char *Buf : メッセージを受け取るバッファ (NULL=コピーしない)
\r
1023 * int Max : バッファのサイズ
\r
1024 * int *CancelCheckWork :
\r
1025 * char *Tmp : テンポラリワーク
\r
1029 *----------------------------------------------------------------------------*/
\r
1031 int ReadReplyMessage(SOCKET cSkt, char *Buf, int Max, int *CancelCheckWork, char *Tmp)
\r
1040 memset(Buf, NUL, Max);
\r
1044 if(cSkt != INVALID_SOCKET)
\r
1050 iRetCode = ReadOneLine(cSkt, Tmp, ONELINE_BUF_SIZE, CancelCheckWork);
\r
1053 ChangeFnameRemote2Local(Tmp, ONELINE_BUF_SIZE);
\r
1054 SetTaskMsg("%s", Tmp);
\r
1063 if(IsDigit(Tmp[i]) == 0)
\r
1068 strncat(Buf, Tmp, Max);
\r
1069 Max = max1(0, Max-strlen(Tmp));
\r
1071 // strncpy(Buf, Tmp, Max);
\r
1074 if((iRetCode != 421) && (iRetCode != 429))
\r
1076 if((FirstCode == 0) &&
\r
1077 (iRetCode >= 100) && (iRetCode <= 599))
\r
1079 FirstCode = iRetCode;
\r
1082 if((iRetCode < 100) || (iRetCode > 599) ||
\r
1083 (*(Tmp + 3) == '-') ||
\r
1084 ((FirstCode > 0) && (iRetCode != FirstCode)))
\r
1090 FirstCode = iRetCode;
\r
1094 while(iContinue == YES);
\r
1096 return(FirstCode);
\r
1100 /*----- 1行分のデータを受け取る ----------------------------------------------
\r
1103 * SOCKET cSkt : コントロールソケット
\r
1104 * char *Buf : メッセージを受け取るバッファ
\r
1105 * int Max : バッファのサイズ
\r
1106 * int *CancelCheckWork :
\r
1110 *----------------------------------------------------------------------------*/
\r
1112 static int ReadOneLine(SOCKET cSkt, char *Buf, int Max, int *CancelCheckWork)
\r
1119 // fd_set ReadFds;
\r
1120 // struct timeval Tout;
\r
1121 // struct timeval *ToutPtr;
\r
1126 if(cSkt != INVALID_SOCKET)
\r
1128 memset(Buf, NUL, Max);
\r
1129 Max--; /* 末尾のNULLのぶん */
\r
1134 // FD_ZERO(&ReadFds);
\r
1135 // FD_SET(cSkt, &ReadFds);
\r
1136 // ToutPtr = NULL;
\r
1137 // if(TimeOut != 0)
\r
1139 // Tout.tv_sec = TimeOut;
\r
1140 // Tout.tv_usec = 0;
\r
1141 // ToutPtr = &Tout;
\r
1143 // i = select(0, &ReadFds, NULL, NULL, ToutPtr);
\r
1144 // if(i == SOCKET_ERROR)
\r
1146 // ReportWSError("select", WSAGetLastError());
\r
1150 // else if(i == 0)
\r
1152 // SetTaskMsg(MSGJPN242);
\r
1157 /* LFまでを受信するために、最初はPEEKで受信 */
\r
1158 if((SizeOnce = do_recv(cSkt, (LPSTR)Tmp, 1024, MSG_PEEK, &TimeOutErr, CancelCheckWork)) <= 0)
\r
1160 if(TimeOutErr == YES)
\r
1162 SetTaskMsg(MSGJPN242);
\r
1165 else if(SizeOnce == SOCKET_ERROR)
\r
1172 /* LFを探して、あったらそこまでの長さをセット */
\r
1173 for(i = 0; i < SizeOnce ; i++)
\r
1175 if(*(Tmp + i) == NUL || *(Tmp + i) == 0x0A)
\r
1183 if((SizeOnce = do_recv(cSkt, Tmp, SizeOnce, 0, &TimeOutErr, CancelCheckWork)) <= 0)
\r
1186 CopySize = min1(Max, SizeOnce);
\r
1187 memcpy(Pos, Tmp, CopySize);
\r
1191 /* データがLFで終わっていたら1行終わり */
\r
1192 if(*(Tmp + SizeOnce - 1) == 0x0A)
\r
1200 memset(Buf, 0, Max);
\r
1202 if((SizeOnce == -2) || (AskTransferNow() == YES))
\r
1203 // 転送中に全て中止を行うと不正なデータが得られる場合のバグ修正
\r
1204 // DisconnectSet();
\r
1205 cSkt = DoClose(cSkt);
\r
1209 if(IsDigit(*Buf) && IsDigit(*(Buf+1)) && IsDigit(*(Buf+2)))
\r
1211 memset(Tmp, NUL, 4);
\r
1212 strncpy(Tmp, Buf, 3);
\r
1213 ResCode = atoi(Tmp);
\r
1216 /* 末尾の CR,LF,スペースを取り除く */
\r
1217 while((i=strlen(Buf))>2 &&
\r
1218 (Buf[i-1]==0x0a || Buf[i-1]==0x0d || Buf[i-1]==' '))
\r
1226 /*----- 固定長データを受け取る ------------------------------------------------
\r
1229 * SOCKET cSkt : コントロールソケット
\r
1230 * char *Buf : メッセージを受け取るバッファ
\r
1232 * int *CancelCheckWork :
\r
1236 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1237 *----------------------------------------------------------------------------*/
\r
1239 int ReadNchar(SOCKET cSkt, char *Buf, int Size, int *CancelCheckWork)
\r
1241 // struct timeval Tout;
\r
1242 // struct timeval *ToutPtr;
\r
1243 // fd_set ReadFds;
\r
1250 if(cSkt != INVALID_SOCKET)
\r
1252 Sts = FFFTP_SUCCESS;
\r
1255 // FD_ZERO(&ReadFds);
\r
1256 // FD_SET(cSkt, &ReadFds);
\r
1257 // ToutPtr = NULL;
\r
1258 // if(TimeOut != 0)
\r
1260 // Tout.tv_sec = TimeOut;
\r
1261 // Tout.tv_usec = 0;
\r
1262 // ToutPtr = &Tout;
\r
1264 // i = select(0, &ReadFds, NULL, NULL, ToutPtr);
\r
1265 // if(i == SOCKET_ERROR)
\r
1267 // ReportWSError("select", WSAGetLastError());
\r
1268 // Sts = FFFTP_FAIL;
\r
1271 // else if(i == 0)
\r
1273 // SetTaskMsg(MSGJPN243);
\r
1274 // Sts = FFFTP_FAIL;
\r
1278 if((SizeOnce = do_recv(cSkt, Buf, Size, 0, &TimeOutErr, CancelCheckWork)) <= 0)
\r
1280 if(TimeOutErr == YES)
\r
1281 SetTaskMsg(MSGJPN243);
\r
1291 if(Sts == FFFTP_FAIL)
\r
1292 SetTaskMsg(MSGJPN244);
\r
1298 /*----- エラー文字列を取得 ----------------------------------------------------
\r
1301 * UINT Error : エラー番号
\r
1305 *----------------------------------------------------------------------------*/
\r
1307 char *ReturnWSError(UINT Error)
\r
1309 static char Msg[128];
\r
1314 case WSAVERNOTSUPPORTED:
\r
1315 Str = "version of WinSock not supported";
\r
1318 case WSASYSNOTREADY:
\r
1319 Str = "WinSock not present or not responding";
\r
1323 Str = "app version not supported by DLL";
\r
1326 case WSAHOST_NOT_FOUND:
\r
1327 Str = "Authoritive: Host not found";
\r
1330 case WSATRY_AGAIN:
\r
1331 Str = "Non-authoritive: host not found or server failure";
\r
1334 case WSANO_RECOVERY:
\r
1335 Str = "Non-recoverable: refused or not implemented";
\r
1339 Str = "Valid name, no data record for type";
\r
1343 case WSANO_ADDRESS:
\r
1344 Str = "Valid name, no MX record";
\r
1348 case WSANOTINITIALISED:
\r
1349 Str = "WSA Startup not initialized";
\r
1353 Str = "Network subsystem failed";
\r
1356 case WSAEINPROGRESS:
\r
1357 Str = "Blocking operation in progress";
\r
1361 Str = "Blocking call cancelled";
\r
1364 case WSAEAFNOSUPPORT:
\r
1365 Str = "address family not supported";
\r
1369 Str = "no file descriptors available";
\r
1373 Str = "no buffer space available";
\r
1376 case WSAEPROTONOSUPPORT:
\r
1377 Str = "specified protocol not supported";
\r
1380 case WSAEPROTOTYPE:
\r
1381 Str = "protocol wrong type for this socket";
\r
1384 case WSAESOCKTNOSUPPORT:
\r
1385 Str = "socket type not supported for address family";
\r
1389 Str = "descriptor is not a socket";
\r
1392 case WSAEWOULDBLOCK:
\r
1393 Str = "socket marked as non-blocking and SO_LINGER set not 0";
\r
1396 case WSAEADDRINUSE:
\r
1397 Str = "address already in use";
\r
1400 case WSAECONNABORTED:
\r
1401 Str = "connection aborted";
\r
1404 case WSAECONNRESET:
\r
1405 Str = "connection reset";
\r
1409 Str = "not connected";
\r
1412 case WSAETIMEDOUT:
\r
1413 Str = "connection timed out";
\r
1416 case WSAECONNREFUSED:
\r
1417 Str = "connection refused";
\r
1420 case WSAEHOSTDOWN:
\r
1421 Str = "host down";
\r
1424 case WSAEHOSTUNREACH:
\r
1425 Str = "host unreachable";
\r
1428 case WSAEADDRNOTAVAIL:
\r
1429 Str = "address not available";
\r
1433 sprintf(Msg, "error %u", Error);
\r
1440 /*----- デバッグコンソールにエラーを表示 --------------------------------------
\r
1443 * char *Msg : エラーの前に表示するメッセージ
\r
1444 * UINT Error : エラー番号
\r
1448 *----------------------------------------------------------------------------*/
\r
1450 void ReportWSError(char *Msg, UINT Error)
\r
1453 DoPrintf("[[%s : %s]]", Msg, ReturnWSError(Error));
\r
1455 DoPrintf("[[%s]]", ReturnWSError(Error));
\r
1459 /*----- ファイル名をローカル側で扱えるように変換する --------------------------
\r
1462 * char *Fname : ファイル名
\r
1467 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1468 *----------------------------------------------------------------------------*/
\r
1470 int ChangeFnameRemote2Local(char *Fname, int Max)
\r
1475 CODECONVINFO cInfo;
\r
1480 if((Buf = malloc(Max)) != NULL)
\r
1483 if((Buf2 = malloc(strlen(Fname) + 1)) != NULL)
\r
1485 InitCodeConvInfo(&cInfo);
\r
1486 cInfo.KanaCnv = NO; //AskHostNameKana();
\r
1488 // cInfo.Str = Fname;
\r
1489 strcpy(Buf2, Fname);
\r
1491 cInfo.StrLen = strlen(Fname);
\r
1493 cInfo.BufSize = Max - 1;
\r
1495 // ここで全てUTF-8へ変換する
\r
1496 // TODO: SJIS以外も直接UTF-8へ変換
\r
1497 switch(AskHostNameKanji())
\r
1500 ConvSJIStoUTF8N(&cInfo);
\r
1501 *(Buf + cInfo.OutLen) = NUL;
\r
1502 strcpy(Fname, Buf);
\r
1503 Pos = strchr(Fname, NUL);
\r
1504 FlushRestData(&cInfo);
\r
1505 *(Buf + cInfo.OutLen) = NUL;
\r
1510 ConvJIStoSJIS(&cInfo);
\r
1511 *(Buf + cInfo.OutLen) = NUL;
\r
1512 strcpy(Fname, Buf);
\r
1513 Pos = strchr(Fname, NUL);
\r
1514 FlushRestData(&cInfo);
\r
1515 *(Buf + cInfo.OutLen) = NUL;
\r
1518 InitCodeConvInfo(&cInfo);
\r
1519 cInfo.KanaCnv = NO;
\r
1520 cInfo.Str = Fname;
\r
1521 cInfo.StrLen = strlen(Fname);
\r
1523 cInfo.BufSize = Max - 1;
\r
1524 ConvSJIStoUTF8N(&cInfo);
\r
1525 *(Buf + cInfo.OutLen) = NUL;
\r
1526 strcpy(Fname, Buf);
\r
1527 Pos = strchr(Fname, NUL);
\r
1528 FlushRestData(&cInfo);
\r
1529 *(Buf + cInfo.OutLen) = NUL;
\r
1534 ConvEUCtoSJIS(&cInfo);
\r
1535 *(Buf + cInfo.OutLen) = NUL;
\r
1536 strcpy(Fname, Buf);
\r
1537 Pos = strchr(Fname, NUL);
\r
1538 FlushRestData(&cInfo);
\r
1539 *(Buf + cInfo.OutLen) = NUL;
\r
1542 InitCodeConvInfo(&cInfo);
\r
1543 cInfo.KanaCnv = NO;
\r
1544 cInfo.Str = Fname;
\r
1545 cInfo.StrLen = strlen(Fname);
\r
1547 cInfo.BufSize = Max - 1;
\r
1548 ConvSJIStoUTF8N(&cInfo);
\r
1549 *(Buf + cInfo.OutLen) = NUL;
\r
1550 strcpy(Fname, Buf);
\r
1551 Pos = strchr(Fname, NUL);
\r
1552 FlushRestData(&cInfo);
\r
1553 *(Buf + cInfo.OutLen) = NUL;
\r
1557 case KANJI_SMB_HEX :
\r
1558 case KANJI_SMB_CAP :
\r
1559 ConvSMBtoSJIS(&cInfo);
\r
1560 *(Buf + cInfo.OutLen) = NUL;
\r
1561 strcpy(Fname, Buf);
\r
1562 Pos = strchr(Fname, NUL);
\r
1563 FlushRestData(&cInfo);
\r
1564 *(Buf + cInfo.OutLen) = NUL;
\r
1567 InitCodeConvInfo(&cInfo);
\r
1568 cInfo.KanaCnv = NO;
\r
1569 cInfo.Str = Fname;
\r
1570 cInfo.StrLen = strlen(Fname);
\r
1572 cInfo.BufSize = Max - 1;
\r
1573 ConvSJIStoUTF8N(&cInfo);
\r
1574 *(Buf + cInfo.OutLen) = NUL;
\r
1575 strcpy(Fname, Buf);
\r
1576 Pos = strchr(Fname, NUL);
\r
1577 FlushRestData(&cInfo);
\r
1578 *(Buf + cInfo.OutLen) = NUL;
\r
1582 // case KANJI_UTF8N :
\r
1583 // ConvUTF8NtoSJIS(&cInfo);
\r
1584 // *(Buf + cInfo.OutLen) = NUL;
\r
1585 // strcpy(Fname, Buf);
\r
1586 // Pos = strchr(Fname, NUL);
\r
1587 // FlushRestData(&cInfo);
\r
1588 // *(Buf + cInfo.OutLen) = NUL;
\r
1589 // strcpy(Pos, Buf);
\r
1594 Sts = FFFTP_SUCCESS;
\r
1598 // Sts = FFFTP_SUCCESS;
\r
1604 /*----- ファイル名をリモート側で扱えるように変換する --------------------------
\r
1607 * char *Fname : ファイル名
\r
1612 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1613 *----------------------------------------------------------------------------*/
\r
1615 int ChangeFnameLocal2Remote(char *Fname, int Max)
\r
1620 CODECONVINFO cInfo;
\r
1625 if((Buf = malloc(Max)) != NULL)
\r
1628 if((Buf2 = malloc(strlen(Fname) + 1)) != NULL)
\r
1630 InitCodeConvInfo(&cInfo);
\r
1631 cInfo.KanaCnv = AskHostNameKana();
\r
1633 // cInfo.Str = Fname;
\r
1634 strcpy(Buf2, Fname);
\r
1636 cInfo.StrLen = strlen(Fname);
\r
1638 cInfo.BufSize = Max - 1;
\r
1640 // ここで全てUTF-8から変換する
\r
1641 // TODO: SJIS以外も直接UTF-8から変換
\r
1642 switch(AskHostNameKanji())
\r
1645 ConvUTF8NtoSJIS(&cInfo);
\r
1646 *(Buf + cInfo.OutLen) = NUL;
\r
1647 strcpy(Fname, Buf);
\r
1648 Pos = strchr(Fname, NUL);
\r
1649 FlushRestData(&cInfo);
\r
1650 *(Buf + cInfo.OutLen) = NUL;
\r
1655 ConvUTF8NtoSJIS(&cInfo);
\r
1656 *(Buf + cInfo.OutLen) = NUL;
\r
1657 strcpy(Fname, Buf);
\r
1658 Pos = strchr(Fname, NUL);
\r
1659 FlushRestData(&cInfo);
\r
1660 *(Buf + cInfo.OutLen) = NUL;
\r
1663 InitCodeConvInfo(&cInfo);
\r
1664 cInfo.KanaCnv = NO;
\r
1665 cInfo.Str = Fname;
\r
1666 cInfo.StrLen = strlen(Fname);
\r
1668 cInfo.BufSize = Max - 1;
\r
1669 ConvSJIStoJIS(&cInfo);
\r
1670 *(Buf + cInfo.OutLen) = NUL;
\r
1671 strcpy(Fname, Buf);
\r
1672 Pos = strchr(Fname, NUL);
\r
1673 FlushRestData(&cInfo);
\r
1674 *(Buf + cInfo.OutLen) = NUL;
\r
1679 ConvUTF8NtoSJIS(&cInfo);
\r
1680 *(Buf + cInfo.OutLen) = NUL;
\r
1681 strcpy(Fname, Buf);
\r
1682 Pos = strchr(Fname, NUL);
\r
1683 FlushRestData(&cInfo);
\r
1684 *(Buf + cInfo.OutLen) = NUL;
\r
1687 InitCodeConvInfo(&cInfo);
\r
1688 cInfo.KanaCnv = NO;
\r
1689 cInfo.Str = Fname;
\r
1690 cInfo.StrLen = strlen(Fname);
\r
1692 cInfo.BufSize = Max - 1;
\r
1693 ConvSJIStoEUC(&cInfo);
\r
1694 *(Buf + cInfo.OutLen) = NUL;
\r
1695 strcpy(Fname, Buf);
\r
1696 Pos = strchr(Fname, NUL);
\r
1697 FlushRestData(&cInfo);
\r
1698 *(Buf + cInfo.OutLen) = NUL;
\r
1702 case KANJI_SMB_HEX :
\r
1703 ConvUTF8NtoSJIS(&cInfo);
\r
1704 *(Buf + cInfo.OutLen) = NUL;
\r
1705 strcpy(Fname, Buf);
\r
1706 Pos = strchr(Fname, NUL);
\r
1707 FlushRestData(&cInfo);
\r
1708 *(Buf + cInfo.OutLen) = NUL;
\r
1711 InitCodeConvInfo(&cInfo);
\r
1712 cInfo.KanaCnv = NO;
\r
1713 cInfo.Str = Fname;
\r
1714 cInfo.StrLen = strlen(Fname);
\r
1716 cInfo.BufSize = Max - 1;
\r
1717 ConvSJIStoSMB_HEX(&cInfo);
\r
1718 *(Buf + cInfo.OutLen) = NUL;
\r
1719 strcpy(Fname, Buf);
\r
1720 Pos = strchr(Fname, NUL);
\r
1721 FlushRestData(&cInfo);
\r
1722 *(Buf + cInfo.OutLen) = NUL;
\r
1726 case KANJI_SMB_CAP :
\r
1727 ConvUTF8NtoSJIS(&cInfo);
\r
1728 *(Buf + cInfo.OutLen) = NUL;
\r
1729 strcpy(Fname, Buf);
\r
1730 Pos = strchr(Fname, NUL);
\r
1731 FlushRestData(&cInfo);
\r
1732 *(Buf + cInfo.OutLen) = NUL;
\r
1735 InitCodeConvInfo(&cInfo);
\r
1736 cInfo.KanaCnv = NO;
\r
1737 cInfo.Str = Fname;
\r
1738 cInfo.StrLen = strlen(Fname);
\r
1740 cInfo.BufSize = Max - 1;
\r
1741 ConvSJIStoSMB_CAP(&cInfo);
\r
1742 *(Buf + cInfo.OutLen) = NUL;
\r
1743 strcpy(Fname, Buf);
\r
1744 Pos = strchr(Fname, NUL);
\r
1745 FlushRestData(&cInfo);
\r
1746 *(Buf + cInfo.OutLen) = NUL;
\r
1750 // case KANJI_UTF8N :
\r
1751 // ConvSJIStoUTF8N(&cInfo);
\r
1752 // *(Buf + cInfo.OutLen) = NUL;
\r
1753 // strcpy(Fname, Buf);
\r
1754 // Pos = strchr(Fname, NUL);
\r
1755 // FlushRestData(&cInfo);
\r
1756 // *(Buf + cInfo.OutLen) = NUL;
\r
1757 // strcpy(Pos, Buf);
\r
1762 Sts = FFFTP_SUCCESS;
\r
1766 // Sts = FFFTP_SUCCESS;
\r
1772 /*----- パスの区切り文字をホストに合わせて変更する ----------------------------
\r
1775 * char *Fname : ファイル名
\r
1779 *----------------------------------------------------------------------------*/
\r
1780 static void ChangeSepaLocal2Remote(char *Fname)
\r
1782 if(AskHostType() == HTYPE_STRATUS)
\r
1784 ReplaceAll(Fname, '/', '>');
\r
1790 /*----- パスの区切り文字をローカルに合わせて変更する --------------------------
\r
1793 * char *Fname : ファイル名
\r
1797 *----------------------------------------------------------------------------*/
\r
1798 static void ChangeSepaRemote2Local(char *Fname)
\r
1800 if(AskHostType() == HTYPE_STRATUS)
\r
1802 ReplaceAll(Fname, '>', '/');
\r