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 // VC 8.0(2005)以上でのみ rand_s を利用可能
\r
31 #if 1400 <= _MSC_VER
\r
32 //#define _CRT_RAND_S
\r
36 #include <windows.h>
\r
41 #include <windowsx.h>
\r
42 #include <process.h>
\r
46 #include "resource.h"
\r
52 /*===== プロトタイプ =====*/
\r
54 static void SaveStr(HKEY hKey, char *Key, char *Str, char *DefaultStr);
\r
55 static void SaveIntNum(HKEY hKey, char *Key, int Num, int DefaultNum);
\r
56 static void MakeFontData(LOGFONT Font, HFONT hFont, char *Buf);
\r
57 static int RestoreFontData(char *Str, LOGFONT *Font);
\r
59 static void EncodePassword(char *Str, char *Buf);
\r
60 static void EncodePasswordOriginal(char *Str, char *Buf);
\r
61 static void EncodePassword2(char *Str, char *Buf, const char *Key);
\r
62 static void EncodePassword3(char *Str, char *Buf, const char *Key);
\r
64 static void DecodePassword(char *Str, char *Buf);
\r
65 static void DecodePasswordOriginal(char *Str, char *Buf);
\r
66 static void DecodePassword2(char *Str, char *Buf, const char *Key);
\r
67 static void DecodePassword3(char *Str, char *Buf, const char *Key);
\r
68 static int CreateAesKey(unsigned char *AesKey, const char* Key);
\r
70 static void SetRegType(int Type);
\r
71 static int OpenReg(char *Name, void **Handle);
\r
72 static int CreateReg(char *Name, void **Handle);
\r
73 static int CloseReg(void *Handle);
\r
74 static int OpenSubKey(void *Parent, char *Name, void **Handle);
\r
75 static int CreateSubKey(void *Parent, char *Name, void **Handle);
\r
76 static int CloseSubKey(void *Handle);
\r
77 static int DeleteSubKey(void *Handle, char *Name);
\r
78 static int DeleteValue(void *Handle, char *Name);
\r
79 static int ReadIntValueFromReg(void *Handle, char *Name, int *Value);
\r
80 static int WriteIntValueToReg(void *Handle, char *Name, int Value);
\r
81 static int ReadStringFromReg(void *Handle, char *Name, char *Str, DWORD Size);
\r
82 static int WriteStringToReg(void *Handle, char *Name, char *Str);
\r
83 static int ReadMultiStringFromReg(void *Handle, char *Name, char *Str, DWORD Size);
\r
84 static int WriteMultiStringToReg(void *Handle, char *Name, char *Str);
\r
85 static int ReadBinaryFromReg(void *Handle, char *Name, void *Bin, DWORD Size);
\r
86 static int WriteBinaryToReg(void *Handle, char *Name, void *Bin, int Len);
\r
88 int CheckPasswordValidity( char* Password, int length, const char* HashStr );
\r
89 void CreatePasswordHash( char* Password, int length, char* HashStr );
\r
90 void SetHashSalt( DWORD salt );
\r
92 DWORD GetRandamDWRODValue(void);
\r
94 /* 2010.01.30 genta 追加 */
\r
95 static char SecretKey[FMAX_PATH+1];
\r
96 static int SecretKeyLength;
\r
97 static int IsMasterPasswordError = PASSWORD_OK;
\r
99 static int IsRndSourceInit = 0;
\r
100 static ulong RndSource[9];
\r
102 /*===== 外部参照 =====*/
\r
105 extern int WinPosX;
\r
106 extern int WinPosY;
\r
107 extern int WinWidth;
\r
108 extern int WinHeight;
\r
109 extern int LocalWidth;
\r
110 extern int TaskHeight;
\r
111 extern int LocalTabWidth[4];
\r
112 extern int RemoteTabWidth[6];
\r
113 extern char UserMailAdrs[USER_MAIL_LEN+1];
\r
114 extern char ViewerName[VIEWERS][FMAX_PATH+1];
\r
115 extern HFONT ListFont;
\r
116 extern LOGFONT ListLogFont;
\r
117 extern int LocalFileSort;
\r
118 extern int LocalDirSort;
\r
119 extern int RemoteFileSort;
\r
120 extern int RemoteDirSort;
\r
121 extern int TransMode;
\r
122 extern int ConnectOnStart;
\r
123 extern int DebugConsole;
\r
124 extern int SaveWinPos;
\r
125 extern char AsciiExt[ASCII_EXT_LEN+1];
\r
126 extern int RecvMode;
\r
127 extern int SendMode;
\r
128 extern int MoveMode;
\r
129 extern int ListType;
\r
130 extern int CacheEntry;
\r
131 extern int CacheSave;
\r
132 extern char DefaultLocalPath[FMAX_PATH+1];
\r
133 extern int SaveTimeStamp;
\r
134 extern int FindMode;
\r
135 extern int DotFile;
\r
136 extern int DclickOpen;
\r
137 extern SOUNDFILE Sound[SOUND_TYPES];
\r
138 extern int FnameCnv;
\r
139 extern int ConnectAndSet;
\r
140 extern int TimeOut;
\r
142 extern int RegType;
\r
143 extern char FwallHost[HOST_ADRS_LEN+1];
\r
144 extern char FwallUser[USER_NAME_LEN+1];
\r
145 extern char FwallPass[PASSWORD_LEN+1];
\r
146 extern int FwallPort;
\r
147 extern int FwallType;
\r
148 extern int FwallDefault;
\r
149 extern int FwallSecurity;
\r
150 extern int FwallResolv;
\r
151 extern int FwallLower;
\r
152 extern int FwallDelimiter;
\r
153 extern int PasvDefault;
\r
154 extern char MirrorNoTrn[MIRROR_LEN+1];
\r
155 extern char MirrorNoDel[MIRROR_LEN+1];
\r
156 extern int MirrorFnameCnv;
\r
157 //extern int MirrorFolderCnv;
\r
158 extern int RasClose;
\r
159 extern int RasCloseNotify;
\r
160 extern int FileHist;
\r
161 extern char DefAttrList[DEFATTRLIST_LEN+1];
\r
162 extern SIZE HostDlgSize;
\r
163 extern SIZE BmarkDlgSize;
\r
164 extern SIZE MirrorDlgSize;
\r
166 extern int SortSave;
\r
167 extern char TmpPath[FMAX_PATH+1];
\r
168 extern int QuickAnonymous;
\r
169 extern int PassToHist;
\r
170 extern int VaxSemicolon;
\r
171 extern int SendQuit;
\r
172 extern int NoRasControl;
\r
173 extern int SuppressSave;
\r
175 extern int UpExistMode;
\r
176 extern int ExistMode;
\r
177 extern int DispIgnoreHide;
\r
178 extern int DispDrives;
\r
179 extern int MirUpDelNotify;
\r
180 extern int MirDownDelNotify;
\r
182 extern int FolderAttr;
\r
183 extern int FolderAttrNum;
\r
186 extern BYTE CertificateCacheHash[MAX_CERT_CACHE_HASH][20];
\r
188 /*----- マスタパスワードの設定 ----------------------------------------------
\r
191 * const char* Password : マスターパスワード
\r
195 *----------------------------------------------------------------------------*/
\r
196 void SetMasterPassword( const char* Password )
\r
198 ZeroMemory( SecretKey, MAX_PASSWORD_LEN + 12 );
\r
199 if( Password != NULL ){
\r
200 strncpy( SecretKey, Password, MAX_PASSWORD_LEN );
\r
203 strcpy( SecretKey, DEFAULT_PASSWORD );
\r
205 SecretKeyLength = strlen( SecretKey );
\r
207 /* 未検証なので,初期状態はOKにする (強制再設定→保存にを可能にする)*/
\r
208 IsMasterPasswordError = PASSWORD_OK;
\r
211 /*----- マスタパスワードの状態取得 ----------------------------------------------
\r
218 * PASSWORD_UNMATCH : パスワード不一致
\r
219 * BAD_PASSWORD_HASH : パスワード確認失敗
\r
220 *----------------------------------------------------------------------------*/
\r
221 int GetMasterPasswordStatus(void)
\r
223 return IsMasterPasswordError;
\r
226 /*----- レジストリ/INIファイルのマスターパスワードの検証を行う ------------
\r
233 *----------------------------------------------------------------------------*/
\r
235 int ValidateMasterPassword(void)
\r
240 SetRegType(REGTYPE_INI);
\r
241 if((i = OpenReg("FFFTP", &hKey3)) != FFFTP_SUCCESS)
\r
243 if(AskForceIni() == NO)
\r
245 SetRegType(REGTYPE_REG);
\r
246 i = OpenReg("FFFTP", &hKey3);
\r
249 if(i == FFFTP_SUCCESS){
\r
253 if( ReadIntValueFromReg(hKey3, "CredentialSalt", &salt)){
\r
254 SetHashSalt( salt );
\r
256 if( ReadStringFromReg(hKey3, "CredentialCheck", checkbuf, sizeof( checkbuf )) == FFFTP_SUCCESS ){
\r
257 switch( CheckPasswordValidity( SecretKey, SecretKeyLength, checkbuf ) ){
\r
258 case 0: /* not match */
\r
259 IsMasterPasswordError = PASSWORD_UNMATCH;
\r
261 case 1: /* match */
\r
262 IsMasterPasswordError = PASSWORD_OK;
\r
264 case 2: /* invalid hash */
\r
266 IsMasterPasswordError = BAD_PASSWORD_HASH;
\r
276 /*----- レジストリ/INIファイルに設定値を保存 ---------------------------------
\r
283 *----------------------------------------------------------------------------*/
\r
285 void SaveRegistory(void)
\r
291 // char Str[FMAX_PATH+1];
\r
292 char Str[PRIVATE_KEY_LEN*4+1];
\r
295 HOSTDATA DefaultHost;
\r
298 HISTORYDATA DefaultHist;
\r
300 if( GetMasterPasswordStatus() == PASSWORD_UNMATCH ){
\r
301 /* 2010.01.30 genta: マスターパスワードが不一致の場合は不用意に上書きしない */
\r
305 SetRegType(RegType);
\r
306 if(CreateReg("FFFTP", &hKey3) == FFFTP_SUCCESS)
\r
309 int salt = GetTickCount();
\r
311 WriteIntValueToReg(hKey3, "Version", VER_NUM);
\r
312 WriteIntValueToReg(hKey3, "CredentialSalt", salt);
\r
314 SetHashSalt( salt );
\r
315 /* save password hash */
\r
316 CreatePasswordHash( SecretKey, SecretKeyLength, buf );
\r
317 WriteStringToReg(hKey3, "CredentialCheck", buf);
\r
319 if(CreateSubKey(hKey3, "Options", &hKey4) == FFFTP_SUCCESS)
\r
321 WriteIntValueToReg(hKey4, "NoSave", SuppressSave);
\r
323 if(SuppressSave != YES)
\r
325 WriteIntValueToReg(hKey4, "WinPosX", WinPosX);
\r
326 WriteIntValueToReg(hKey4, "WinPosY", WinPosY);
\r
327 WriteIntValueToReg(hKey4, "WinWidth", WinWidth);
\r
328 WriteIntValueToReg(hKey4, "WinHeight", WinHeight);
\r
329 WriteIntValueToReg(hKey4, "LocalWidth", LocalWidth);
\r
330 WriteIntValueToReg(hKey4, "TaskHeight", TaskHeight);
\r
331 WriteBinaryToReg(hKey4, "LocalColm", LocalTabWidth, sizeof(LocalTabWidth));
\r
332 WriteBinaryToReg(hKey4, "RemoteColm", RemoteTabWidth, sizeof(RemoteTabWidth));
\r
333 WriteIntValueToReg(hKey4, "SwCmd", Sizing);
\r
335 WriteStringToReg(hKey4, "UserMail", UserMailAdrs);
\r
336 WriteStringToReg(hKey4, "Viewer", ViewerName[0]);
\r
337 WriteStringToReg(hKey4, "Viewer2", ViewerName[1]);
\r
338 WriteStringToReg(hKey4, "Viewer3", ViewerName[2]);
\r
340 WriteIntValueToReg(hKey4, "TrType", TransMode);
\r
341 WriteIntValueToReg(hKey4, "Recv", RecvMode);
\r
342 WriteIntValueToReg(hKey4, "Send", SendMode);
\r
343 WriteIntValueToReg(hKey4, "Move", MoveMode);
\r
344 WriteStringToReg(hKey4, "Path", DefaultLocalPath);
\r
345 WriteIntValueToReg(hKey4, "Time", SaveTimeStamp);
\r
346 WriteIntValueToReg(hKey4, "EOF", RmEOF);
\r
347 WriteIntValueToReg(hKey4, "Scolon", VaxSemicolon);
\r
349 WriteIntValueToReg(hKey4, "RecvEx", ExistMode);
\r
350 WriteIntValueToReg(hKey4, "SendEx", UpExistMode);
\r
352 WriteIntValueToReg(hKey4, "LFsort", LocalFileSort);
\r
353 WriteIntValueToReg(hKey4, "LDsort", LocalDirSort);
\r
354 WriteIntValueToReg(hKey4, "RFsort", RemoteFileSort);
\r
355 WriteIntValueToReg(hKey4, "RDsort", RemoteDirSort);
\r
356 WriteIntValueToReg(hKey4, "SortSave", SortSave);
\r
358 WriteIntValueToReg(hKey4, "ListType", ListType);
\r
359 WriteIntValueToReg(hKey4, "Cache", CacheEntry);
\r
360 WriteIntValueToReg(hKey4, "CacheSave", CacheSave);
\r
361 WriteIntValueToReg(hKey4, "DotFile", DotFile);
\r
362 WriteIntValueToReg(hKey4, "Dclick", DclickOpen);
\r
364 WriteIntValueToReg(hKey4, "ConS", ConnectOnStart);
\r
365 WriteIntValueToReg(hKey4, "OldDlg", ConnectAndSet);
\r
366 WriteIntValueToReg(hKey4, "RasClose", RasClose);
\r
367 WriteIntValueToReg(hKey4, "RasNotify", RasCloseNotify);
\r
368 WriteIntValueToReg(hKey4, "Qanony", QuickAnonymous);
\r
369 WriteIntValueToReg(hKey4, "PassHist", PassToHist);
\r
370 WriteIntValueToReg(hKey4, "SendQuit", SendQuit);
\r
371 WriteIntValueToReg(hKey4, "NoRas", NoRasControl);
\r
373 WriteIntValueToReg(hKey4, "Debug", DebugConsole);
\r
374 WriteIntValueToReg(hKey4, "WinPos", SaveWinPos);
\r
375 WriteIntValueToReg(hKey4, "RegExp", FindMode);
\r
376 WriteIntValueToReg(hKey4, "Reg", RegType);
\r
378 WriteMultiStringToReg(hKey4, "AsciiFile", AsciiExt);
\r
379 WriteIntValueToReg(hKey4, "LowUp", FnameCnv);
\r
380 WriteIntValueToReg(hKey4, "Tout", TimeOut);
\r
382 WriteMultiStringToReg(hKey4, "NoTrn", MirrorNoTrn);
\r
383 WriteMultiStringToReg(hKey4, "NoDel", MirrorNoDel);
\r
384 WriteIntValueToReg(hKey4, "MirFile", MirrorFnameCnv);
\r
385 WriteIntValueToReg(hKey4, "MirUNot", MirUpDelNotify);
\r
386 WriteIntValueToReg(hKey4, "MirDNot", MirDownDelNotify);
\r
388 MakeFontData(ListLogFont, ListFont, Str);
\r
389 WriteStringToReg(hKey4, "ListFont", Str);
\r
390 WriteIntValueToReg(hKey4, "ListHide", DispIgnoreHide);
\r
391 WriteIntValueToReg(hKey4, "ListDrv", DispDrives);
\r
393 WriteStringToReg(hKey4, "FwallHost", FwallHost);
\r
394 WriteStringToReg(hKey4, "FwallUser", FwallUser);
\r
395 EncodePassword(FwallPass, Str);
\r
396 WriteStringToReg(hKey4, "FwallPass", Str);
\r
397 WriteIntValueToReg(hKey4, "FwallPort", FwallPort);
\r
398 WriteIntValueToReg(hKey4, "FwallType", FwallType);
\r
399 WriteIntValueToReg(hKey4, "FwallDef", FwallDefault);
\r
400 WriteIntValueToReg(hKey4, "FwallSec", FwallSecurity);
\r
401 WriteIntValueToReg(hKey4, "PasvDef", PasvDefault);
\r
402 WriteIntValueToReg(hKey4, "FwallRes", FwallResolv);
\r
403 WriteIntValueToReg(hKey4, "FwallLow", FwallLower);
\r
404 WriteIntValueToReg(hKey4, "FwallDel", FwallDelimiter);
\r
406 WriteIntValueToReg(hKey4, "SndConSw", Sound[SND_CONNECT].On);
\r
407 WriteIntValueToReg(hKey4, "SndTrnSw", Sound[SND_TRANS].On);
\r
408 WriteIntValueToReg(hKey4, "SndErrSw", Sound[SND_ERROR].On);
\r
409 WriteStringToReg(hKey4, "SndCon", Sound[SND_CONNECT].Fname);
\r
410 WriteStringToReg(hKey4, "SndTrn", Sound[SND_TRANS].Fname);
\r
411 WriteStringToReg(hKey4, "SndErr", Sound[SND_ERROR].Fname);
\r
413 WriteMultiStringToReg(hKey4, "DefAttr", DefAttrList);
\r
415 GetTempPath(FMAX_PATH, Str);
\r
416 SaveStr(hKey4, "Tmp", TmpPath, Str);
\r
418 WriteBinaryToReg(hKey4, "Hdlg", &HostDlgSize, sizeof(SIZE));
\r
419 WriteBinaryToReg(hKey4, "Bdlg", &BmarkDlgSize, sizeof(SIZE));
\r
420 WriteBinaryToReg(hKey4, "Mdlg", &MirrorDlgSize, sizeof(SIZE));
\r
422 WriteIntValueToReg(hKey4, "FAttrSw", FolderAttr);
\r
423 WriteIntValueToReg(hKey4, "FAttr", FolderAttrNum);
\r
425 WriteIntValueToReg(hKey4, "HistNum", FileHist);
\r
427 /* Ver1.54a以前の形式のヒストリデータは削除 */
\r
428 DeleteValue(hKey4, "Hist");
\r
431 CopyDefaultHistory(&DefaultHist);
\r
433 for(i = AskHistoryNum(); i > 0; i--)
\r
435 if(GetHistoryByNum(i-1, &Hist) == FFFTP_SUCCESS)
\r
437 sprintf(Str, "History%d", n);
\r
438 if(CreateSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)
\r
440 SaveStr(hKey5, "HostAdrs", Hist.HostAdrs, DefaultHist.HostAdrs);
\r
441 SaveStr(hKey5, "UserName", Hist.UserName, DefaultHist.UserName);
\r
442 SaveStr(hKey5, "Account", Hist.Account, DefaultHist.Account);
\r
443 SaveStr(hKey5, "LocalDir", Hist.LocalInitDir, NULL);
\r
444 SaveStr(hKey5, "RemoteDir", Hist.RemoteInitDir, DefaultHist.RemoteInitDir);
\r
445 SaveStr(hKey5, "Chmod", Hist.ChmodCmd, DefaultHist.ChmodCmd);
\r
446 SaveStr(hKey5, "Nlst", Hist.LsName, DefaultHist.LsName);
\r
447 SaveStr(hKey5, "Init", Hist.InitCmd, DefaultHist.InitCmd);
\r
448 EncodePassword(Hist.PassWord, Str);
\r
449 SaveStr(hKey5, "Password", Str, DefaultHist.PassWord);
\r
450 SaveIntNum(hKey5, "Port", Hist.Port, DefaultHist.Port);
\r
451 SaveIntNum(hKey5, "Kanji", Hist.KanjiCode, DefaultHist.KanjiCode);
\r
452 SaveIntNum(hKey5, "KanaCnv", Hist.KanaCnv, DefaultHist.KanaCnv);
\r
453 SaveIntNum(hKey5, "NameKanji", Hist.NameKanjiCode, DefaultHist.NameKanjiCode);
\r
454 SaveIntNum(hKey5, "NameKana", Hist.NameKanaCnv, DefaultHist.NameKanaCnv);
\r
455 SaveIntNum(hKey5, "Pasv", Hist.Pasv, DefaultHist.Pasv);
\r
456 SaveIntNum(hKey5, "Fwall", Hist.FireWall, DefaultHist.FireWall);
\r
457 SaveIntNum(hKey5, "List", Hist.ListCmdOnly, DefaultHist.ListCmdOnly);
\r
458 SaveIntNum(hKey5, "NLST-R", Hist.UseNLST_R, DefaultHist.UseNLST_R);
\r
459 SaveIntNum(hKey5, "Tzone", Hist.TimeZone, DefaultHist.TimeZone);
\r
460 SaveIntNum(hKey5, "Type", Hist.HostType, DefaultHist.HostType);
\r
461 SaveIntNum(hKey5, "Sync", Hist.SyncMove, DefaultHist.SyncMove);
\r
462 SaveIntNum(hKey5, "Fpath", Hist.NoFullPath, DefaultHist.NoFullPath);
\r
463 WriteBinaryToReg(hKey5, "Sort", &Hist.Sort, sizeof(Hist.Sort));
\r
464 SaveIntNum(hKey5, "Secu", Hist.Security, DefaultHist.Security);
\r
465 WriteIntValueToReg(hKey5, "TrType", Hist.Type);
\r
466 SaveIntNum(hKey5, "Dial", Hist.Dialup, DefaultHist.Dialup);
\r
467 SaveIntNum(hKey5, "UseIt", Hist.DialupAlways, DefaultHist.DialupAlways);
\r
468 SaveIntNum(hKey5, "Notify", Hist.DialupNotify, DefaultHist.DialupNotify);
\r
469 SaveStr(hKey5, "DialTo", Hist.DialEntry, DefaultHist.DialEntry);
\r
471 SaveIntNum(hKey5, "NoEncryption", Hist.UseNoEncryption, DefaultHist.UseNoEncryption);
\r
472 SaveIntNum(hKey5, "FTPES", Hist.UseFTPES, DefaultHist.UseFTPES);
\r
473 SaveIntNum(hKey5, "FTPIS", Hist.UseFTPIS, DefaultHist.UseFTPIS);
\r
474 SaveIntNum(hKey5, "SFTP", Hist.UseSFTP, DefaultHist.UseSFTP);
\r
475 EncodePassword(Hist.PrivateKey, Str);
\r
476 SaveStr(hKey5, "PKey", Str, DefaultHist.PrivateKey);
\r
478 SaveIntNum(hKey5, "ThreadCount", Hist.MaxThreadCount, DefaultHist.MaxThreadCount);
\r
480 SaveIntNum(hKey5, "MLSD", Hist.UseMLSD, DefaultHist.UseMLSD);
\r
482 SaveIntNum(hKey5, "IPv6", Hist.UseIPv6, DefaultHist.UseIPv6);
\r
484 CloseSubKey(hKey5);
\r
489 WriteIntValueToReg(hKey4, "SavedHist", n);
\r
491 /* 余分なヒストリがあったら削除 */
\r
492 for(; n < 999; n++)
\r
494 sprintf(Str, "History%d", n);
\r
495 if(DeleteSubKey(hKey4, Str) != FFFTP_SUCCESS)
\r
500 CopyDefaultHost(&DefaultHost);
\r
502 while(CopyHostFromList(i, &Host) == FFFTP_SUCCESS)
\r
504 sprintf(Str, "Host%d", i);
\r
505 if(CreateSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)
\r
507 // SaveIntNum(hKey5, "Set", Host.Level, DefaultHost.Level);
\r
508 WriteIntValueToReg(hKey5, "Set", Host.Level);
\r
509 SaveStr(hKey5, "HostName", Host.HostName, DefaultHost.HostName);
\r
510 if((Host.Level & SET_LEVEL_GROUP) == 0)
\r
512 SaveStr(hKey5, "HostAdrs", Host.HostAdrs, DefaultHost.HostAdrs);
\r
513 SaveStr(hKey5, "UserName", Host.UserName, DefaultHost.UserName);
\r
514 SaveStr(hKey5, "Account", Host.Account, DefaultHost.Account);
\r
515 SaveStr(hKey5, "LocalDir", Host.LocalInitDir, NULL);
\r
516 SaveStr(hKey5, "RemoteDir", Host.RemoteInitDir, DefaultHost.RemoteInitDir);
\r
517 SaveStr(hKey5, "Chmod", Host.ChmodCmd, DefaultHost.ChmodCmd);
\r
518 SaveStr(hKey5, "Nlst", Host.LsName, DefaultHost.LsName);
\r
519 SaveStr(hKey5, "Init", Host.InitCmd, DefaultHost.InitCmd);
\r
521 if(Host.Anonymous == NO)
\r
522 EncodePassword(Host.PassWord, Str);
\r
524 strcpy(Str, DefaultHost.PassWord);
\r
525 SaveStr(hKey5, "Password", Str, DefaultHost.PassWord);
\r
527 SaveIntNum(hKey5, "Port", Host.Port, DefaultHost.Port);
\r
528 SaveIntNum(hKey5, "Anonymous", Host.Anonymous, DefaultHost.Anonymous);
\r
529 SaveIntNum(hKey5, "Kanji", Host.KanjiCode, DefaultHost.KanjiCode);
\r
530 SaveIntNum(hKey5, "KanaCnv", Host.KanaCnv, DefaultHost.KanaCnv);
\r
531 SaveIntNum(hKey5, "NameKanji", Host.NameKanjiCode, DefaultHost.NameKanjiCode);
\r
532 SaveIntNum(hKey5, "NameKana", Host.NameKanaCnv, DefaultHost.NameKanaCnv);
\r
533 SaveIntNum(hKey5, "Pasv", Host.Pasv, DefaultHost.Pasv);
\r
534 SaveIntNum(hKey5, "Fwall", Host.FireWall, DefaultHost.FireWall);
\r
535 SaveIntNum(hKey5, "List", Host.ListCmdOnly, DefaultHost.ListCmdOnly);
\r
536 SaveIntNum(hKey5, "NLST-R", Host.UseNLST_R, DefaultHost.UseNLST_R);
\r
537 SaveIntNum(hKey5, "Last", Host.LastDir, DefaultHost.LastDir);
\r
538 SaveIntNum(hKey5, "Tzone", Host.TimeZone, DefaultHost.TimeZone);
\r
539 SaveIntNum(hKey5, "Type", Host.HostType, DefaultHost.HostType);
\r
540 SaveIntNum(hKey5, "Sync", Host.SyncMove, DefaultHost.SyncMove);
\r
541 SaveIntNum(hKey5, "Fpath", Host.NoFullPath, DefaultHost.NoFullPath);
\r
542 WriteBinaryToReg(hKey5, "Sort", &Host.Sort, sizeof(Host.Sort));
\r
543 SaveIntNum(hKey5, "Secu", Host.Security, DefaultHost.Security);
\r
545 WriteMultiStringToReg(hKey5, "Bmarks", Host.BookMark);
\r
547 SaveIntNum(hKey5, "Dial", Host.Dialup, DefaultHost.Dialup);
\r
548 SaveIntNum(hKey5, "UseIt", Host.DialupAlways, DefaultHost.DialupAlways);
\r
549 SaveIntNum(hKey5, "Notify", Host.DialupNotify, DefaultHost.DialupNotify);
\r
550 SaveStr(hKey5, "DialTo", Host.DialEntry, DefaultHost.DialEntry);
\r
552 SaveIntNum(hKey5, "NoEncryption", Host.UseNoEncryption, DefaultHost.UseNoEncryption);
\r
553 SaveIntNum(hKey5, "FTPES", Host.UseFTPES, DefaultHost.UseFTPES);
\r
554 SaveIntNum(hKey5, "FTPIS", Host.UseFTPIS, DefaultHost.UseFTPIS);
\r
555 SaveIntNum(hKey5, "SFTP", Host.UseSFTP, DefaultHost.UseSFTP);
\r
556 EncodePassword(Host.PrivateKey, Str);
\r
557 SaveStr(hKey5, "PKey", Str, DefaultHost.PrivateKey);
\r
559 SaveIntNum(hKey5, "ThreadCount", Host.MaxThreadCount, DefaultHost.MaxThreadCount);
\r
561 SaveIntNum(hKey5, "MLSD", Host.UseMLSD, DefaultHost.UseMLSD);
\r
563 SaveIntNum(hKey5, "IPv6", Host.UseIPv6, DefaultHost.UseIPv6);
\r
565 CloseSubKey(hKey5);
\r
569 WriteIntValueToReg(hKey4, "SetNum", i);
\r
571 /* 余分なホストの設定があったら削除 */
\r
572 for(; i < 998; i++)
\r
574 sprintf(Str, "Host%d", i);
\r
575 if(DeleteSubKey(hKey4, Str) != FFFTP_SUCCESS)
\r
579 if((i = AskCurrentHost()) == HOSTNUM_NOENTRY)
\r
581 WriteIntValueToReg(hKey4, "CurSet", i);
\r
584 WriteBinaryToReg(hKey4, "CertCacheHash", &CertificateCacheHash, sizeof(CertificateCacheHash));
\r
586 CloseSubKey(hKey4);
\r
593 /*----- レジストリ/INIファイルから設定値を呼び出す ---------------------------
\r
595 * この関数を複数回呼び出すと,ホスト設定が追加される.
\r
603 *----------------------------------------------------------------------------*/
\r
605 int LoadRegistory(void)
\r
613 // char Str[256]; /* ASCII_EXT_LENより大きい事 */
\r
614 char Str[PRIVATE_KEY_LEN*4+1];
\r
624 SetRegType(REGTYPE_INI);
\r
625 if((i = OpenReg("FFFTP", &hKey3)) != FFFTP_SUCCESS)
\r
627 if(AskForceIni() == NO)
\r
629 SetRegType(REGTYPE_REG);
\r
630 i = OpenReg("FFFTP", &hKey3);
\r
634 if(i == FFFTP_SUCCESS)
\r
636 // char checkbuf[48];
\r
640 ReadIntValueFromReg(hKey3, "Version", &Version);
\r
642 if(OpenSubKey(hKey3, "Options", &hKey4) == FFFTP_SUCCESS)
\r
644 ReadIntValueFromReg(hKey4, "WinPosX", &WinPosX);
\r
645 ReadIntValueFromReg(hKey4, "WinPosY", &WinPosY);
\r
646 ReadIntValueFromReg(hKey4, "WinWidth", &WinWidth);
\r
647 ReadIntValueFromReg(hKey4, "WinHeight", &WinHeight);
\r
648 ReadIntValueFromReg(hKey4, "LocalWidth", &LocalWidth);
\r
650 LocalWidth = max1(0, LocalWidth);
\r
651 ReadIntValueFromReg(hKey4, "TaskHeight", &TaskHeight);
\r
653 TaskHeight = max1(0, TaskHeight);
\r
654 ReadBinaryFromReg(hKey4, "LocalColm", &LocalTabWidth, sizeof(LocalTabWidth));
\r
655 ReadBinaryFromReg(hKey4, "RemoteColm", &RemoteTabWidth, sizeof(RemoteTabWidth));
\r
656 ReadIntValueFromReg(hKey4, "SwCmd", &Sizing);
\r
658 ReadStringFromReg(hKey4, "UserMail", UserMailAdrs, USER_MAIL_LEN+1);
\r
659 ReadStringFromReg(hKey4, "Viewer", ViewerName[0], FMAX_PATH+1);
\r
660 ReadStringFromReg(hKey4, "Viewer2", ViewerName[1], FMAX_PATH+1);
\r
661 ReadStringFromReg(hKey4, "Viewer3", ViewerName[2], FMAX_PATH+1);
\r
663 ReadIntValueFromReg(hKey4, "TrType", &TransMode);
\r
664 ReadIntValueFromReg(hKey4, "Recv", &RecvMode);
\r
665 ReadIntValueFromReg(hKey4, "Send", &SendMode);
\r
666 ReadIntValueFromReg(hKey4, "Move", &MoveMode);
\r
667 ReadStringFromReg(hKey4, "Path", DefaultLocalPath, FMAX_PATH+1);
\r
668 ReadIntValueFromReg(hKey4, "Time", &SaveTimeStamp);
\r
669 ReadIntValueFromReg(hKey4, "EOF", &RmEOF);
\r
670 ReadIntValueFromReg(hKey4, "Scolon", &VaxSemicolon);
\r
672 ReadIntValueFromReg(hKey4, "RecvEx", &ExistMode);
\r
673 ReadIntValueFromReg(hKey4, "SendEx", &UpExistMode);
\r
675 ReadIntValueFromReg(hKey4, "LFsort", &LocalFileSort);
\r
676 ReadIntValueFromReg(hKey4, "LDsort", &LocalDirSort);
\r
677 ReadIntValueFromReg(hKey4, "RFsort", &RemoteFileSort);
\r
678 ReadIntValueFromReg(hKey4, "RDsort", &RemoteDirSort);
\r
679 ReadIntValueFromReg(hKey4, "SortSave", &SortSave);
\r
681 ReadIntValueFromReg(hKey4, "ListType", &ListType);
\r
682 ReadIntValueFromReg(hKey4, "Cache", &CacheEntry);
\r
683 ReadIntValueFromReg(hKey4, "CacheSave", &CacheSave);
\r
684 ReadIntValueFromReg(hKey4, "DotFile", &DotFile);
\r
685 ReadIntValueFromReg(hKey4, "Dclick", &DclickOpen);
\r
687 ReadIntValueFromReg(hKey4, "ConS", &ConnectOnStart);
\r
688 ReadIntValueFromReg(hKey4, "OldDlg", &ConnectAndSet);
\r
689 ReadIntValueFromReg(hKey4, "RasClose", &RasClose);
\r
690 ReadIntValueFromReg(hKey4, "RasNotify", &RasCloseNotify);
\r
691 ReadIntValueFromReg(hKey4, "Qanony", &QuickAnonymous);
\r
692 ReadIntValueFromReg(hKey4, "PassHist", &PassToHist);
\r
693 ReadIntValueFromReg(hKey4, "SendQuit", &SendQuit);
\r
694 ReadIntValueFromReg(hKey4, "NoRas", &NoRasControl);
\r
696 ReadIntValueFromReg(hKey4, "Debug", &DebugConsole);
\r
697 ReadIntValueFromReg(hKey4, "WinPos", &SaveWinPos);
\r
698 ReadIntValueFromReg(hKey4, "RegExp", &FindMode);
\r
699 ReadIntValueFromReg(hKey4, "Reg", &RegType);
\r
701 if(ReadMultiStringFromReg(hKey4, "AsciiFile", AsciiExt, ASCII_EXT_LEN+1) == FFFTP_FAIL)
\r
703 /* 旧ASCIIモードの拡張子の設定を新しいものに変換 */
\r
704 ReadStringFromReg(hKey4, "Ascii", Str, ASCII_EXT_LEN+1);
\r
705 memset(AsciiExt, NUL, ASCII_EXT_LEN+1);
\r
709 if((Pos2 = strchr(Pos, ';')) == NULL)
\r
710 Pos2 = strchr(Pos, NUL);
\r
711 if((Pos2 - Pos) > 0)
\r
713 if((StrMultiLen(AsciiExt) + (Pos2 - Pos) + 2) >= ASCII_EXT_LEN)
\r
715 strcpy(AsciiExt + StrMultiLen(AsciiExt), "*.");
\r
716 strncpy(AsciiExt + StrMultiLen(AsciiExt) - 1, Pos, (Pos2 - Pos));
\r
724 ReadIntValueFromReg(hKey4, "LowUp", &FnameCnv);
\r
725 ReadIntValueFromReg(hKey4, "Tout", &TimeOut);
\r
727 ReadMultiStringFromReg(hKey4, "NoTrn", MirrorNoTrn, MIRROR_LEN+1);
\r
728 ReadMultiStringFromReg(hKey4, "NoDel", MirrorNoDel, MIRROR_LEN+1);
\r
729 ReadIntValueFromReg(hKey4, "MirFile", &MirrorFnameCnv);
\r
730 ReadIntValueFromReg(hKey4, "MirUNot", &MirUpDelNotify);
\r
731 ReadIntValueFromReg(hKey4, "MirDNot", &MirDownDelNotify);
\r
733 if(ReadStringFromReg(hKey4, "ListFont", Str, 256) == FFFTP_SUCCESS)
\r
735 if(RestoreFontData(Str, &ListLogFont) == FFFTP_SUCCESS)
\r
736 ListFont = CreateFontIndirect(&ListLogFont);
\r
738 ReadIntValueFromReg(hKey4, "ListHide", &DispIgnoreHide);
\r
739 ReadIntValueFromReg(hKey4, "ListDrv", &DispDrives);
\r
741 ReadStringFromReg(hKey4, "FwallHost", FwallHost, HOST_ADRS_LEN+1);
\r
742 ReadStringFromReg(hKey4, "FwallUser", FwallUser, USER_NAME_LEN+1);
\r
743 ReadStringFromReg(hKey4, "FwallPass", Str, 255);
\r
744 DecodePassword(Str, FwallPass);
\r
745 ReadIntValueFromReg(hKey4, "FwallPort", &FwallPort);
\r
746 ReadIntValueFromReg(hKey4, "FwallType", &FwallType);
\r
747 ReadIntValueFromReg(hKey4, "FwallDef", &FwallDefault);
\r
748 ReadIntValueFromReg(hKey4, "FwallSec", &FwallSecurity);
\r
749 ReadIntValueFromReg(hKey4, "PasvDef", &PasvDefault);
\r
750 ReadIntValueFromReg(hKey4, "FwallRes", &FwallResolv);
\r
751 ReadIntValueFromReg(hKey4, "FwallLow", &FwallLower);
\r
752 ReadIntValueFromReg(hKey4, "FwallDel", &FwallDelimiter);
\r
754 ReadIntValueFromReg(hKey4, "SndConSw", &Sound[SND_CONNECT].On);
\r
755 ReadIntValueFromReg(hKey4, "SndTrnSw", &Sound[SND_TRANS].On);
\r
756 ReadIntValueFromReg(hKey4, "SndErrSw", &Sound[SND_ERROR].On);
\r
757 ReadStringFromReg(hKey4, "SndCon", Sound[SND_CONNECT].Fname, FMAX_PATH+1);
\r
758 ReadStringFromReg(hKey4, "SndTrn", Sound[SND_TRANS].Fname, FMAX_PATH+1);
\r
759 ReadStringFromReg(hKey4, "SndErr", Sound[SND_ERROR].Fname, FMAX_PATH+1);
\r
761 ReadMultiStringFromReg(hKey4, "DefAttr", DefAttrList, DEFATTRLIST_LEN+1);
\r
763 ReadStringFromReg(hKey4, "Tmp", TmpPath, FMAX_PATH+1);
\r
765 ReadBinaryFromReg(hKey4, "Hdlg", &HostDlgSize, sizeof(SIZE));
\r
766 ReadBinaryFromReg(hKey4, "Bdlg", &BmarkDlgSize, sizeof(SIZE));
\r
767 ReadBinaryFromReg(hKey4, "Mdlg", &MirrorDlgSize, sizeof(SIZE));
\r
769 ReadIntValueFromReg(hKey4, "FAttrSw", &FolderAttr);
\r
770 ReadIntValueFromReg(hKey4, "FAttr", &FolderAttrNum);
\r
772 ReadIntValueFromReg(hKey4, "NoSave", &SuppressSave);
\r
774 ReadIntValueFromReg(hKey4, "HistNum", &FileHist);
\r
775 // ReadMultiStringFromReg(hKey4, "Hist", Hist, (FMAX_PATH+1)*HISTORY_MAX+1);
\r
779 ReadIntValueFromReg(hKey4, "SavedHist", &Sets);
\r
781 for(i = 0; i < Sets; i++)
\r
783 sprintf(Str, "History%d", i);
\r
784 if(OpenSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)
\r
786 CopyDefaultHistory(&Hist);
\r
788 ReadStringFromReg(hKey5, "HostAdrs", Hist.HostAdrs, HOST_ADRS_LEN+1);
\r
789 ReadStringFromReg(hKey5, "UserName", Hist.UserName, USER_NAME_LEN+1);
\r
790 ReadStringFromReg(hKey5, "Account", Hist.Account, ACCOUNT_LEN+1);
\r
791 ReadStringFromReg(hKey5, "LocalDir", Hist.LocalInitDir, INIT_DIR_LEN+1);
\r
792 ReadStringFromReg(hKey5, "RemoteDir", Hist.RemoteInitDir, INIT_DIR_LEN+1);
\r
793 ReadStringFromReg(hKey5, "Chmod", Hist.ChmodCmd, CHMOD_CMD_LEN+1);
\r
794 ReadStringFromReg(hKey5, "Nlst", Hist.LsName, NLST_NAME_LEN+1);
\r
795 ReadStringFromReg(hKey5, "Init", Hist.InitCmd, INITCMD_LEN+1);
\r
796 ReadIntValueFromReg(hKey5, "Port", &Hist.Port);
\r
797 ReadIntValueFromReg(hKey5, "Kanji", &Hist.KanjiCode);
\r
798 ReadIntValueFromReg(hKey5, "KanaCnv", &Hist.KanaCnv);
\r
799 ReadIntValueFromReg(hKey5, "NameKanji", &Hist.NameKanjiCode);
\r
800 ReadIntValueFromReg(hKey5, "NameKana", &Hist.NameKanaCnv);
\r
801 ReadIntValueFromReg(hKey5, "Pasv", &Hist.Pasv);
\r
802 ReadIntValueFromReg(hKey5, "Fwall", &Hist.FireWall);
\r
803 ReadIntValueFromReg(hKey5, "List", &Hist.ListCmdOnly);
\r
804 ReadIntValueFromReg(hKey5, "NLST-R", &Hist.UseNLST_R);
\r
805 ReadIntValueFromReg(hKey5, "Tzone", &Hist.TimeZone);
\r
806 ReadIntValueFromReg(hKey5, "Type", &Hist.HostType);
\r
807 ReadIntValueFromReg(hKey5, "Sync", &Hist.SyncMove);
\r
808 ReadIntValueFromReg(hKey5, "Fpath", &Hist.NoFullPath);
\r
809 ReadBinaryFromReg(hKey5, "Sort", &Hist.Sort, sizeof(Hist.Sort));
\r
810 ReadIntValueFromReg(hKey5, "Secu", &Hist.Security);
\r
811 ReadIntValueFromReg(hKey5, "TrType", &Hist.Type);
\r
813 ReadStringFromReg(hKey5, "Password", Str, 255);
\r
814 DecodePassword(Str, Hist.PassWord);
\r
815 ReadIntValueFromReg(hKey5, "Dial", &Hist.Dialup);
\r
816 ReadIntValueFromReg(hKey5, "UseIt", &Hist.DialupAlways);
\r
817 ReadIntValueFromReg(hKey5, "Notify", &Hist.DialupNotify);
\r
818 ReadStringFromReg(hKey5, "DialTo", Hist.DialEntry, RAS_NAME_LEN+1);
\r
820 ReadIntValueFromReg(hKey5, "NoEncryption", &Hist.UseNoEncryption);
\r
821 ReadIntValueFromReg(hKey5, "FTPES", &Hist.UseFTPES);
\r
822 ReadIntValueFromReg(hKey5, "FTPIS", &Hist.UseFTPIS);
\r
823 ReadIntValueFromReg(hKey5, "SFTP", &Hist.UseSFTP);
\r
825 ReadStringFromReg(hKey5, "PKey", Str, PRIVATE_KEY_LEN*4+1);
\r
826 DecodePassword(Str, Hist.PrivateKey);
\r
828 ReadIntValueFromReg(hKey5, "ThreadCount", &Hist.MaxThreadCount);
\r
830 ReadIntValueFromReg(hKey5, "MLSD", &Hist.UseMLSD);
\r
832 ReadIntValueFromReg(hKey5, "IPv6", &Hist.UseIPv6);
\r
834 CloseSubKey(hKey5);
\r
835 AddHistoryToHistory(&Hist);
\r
841 ReadIntValueFromReg(hKey4, "SetNum", &Sets);
\r
843 for(i = 0; i < Sets; i++)
\r
845 sprintf(Str, "Host%d", i);
\r
846 if(OpenSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)
\r
848 CopyDefaultHost(&Host);
\r
850 // SourceForge.JPによるフォーク
\r
851 // if(Version < VER_NUM)
\r
855 Host.ListCmdOnly = NO;
\r
857 // 1.97b以前はデフォルトでShift_JIS
\r
859 Host.NameKanjiCode = KANJI_SJIS;
\r
860 ReadIntValueFromReg(hKey5, "Set", &Host.Level);
\r
862 ReadStringFromReg(hKey5, "HostName", Host.HostName, HOST_NAME_LEN+1);
\r
863 ReadStringFromReg(hKey5, "HostAdrs", Host.HostAdrs, HOST_ADRS_LEN+1);
\r
864 ReadStringFromReg(hKey5, "UserName", Host.UserName, USER_NAME_LEN+1);
\r
865 ReadStringFromReg(hKey5, "Account", Host.Account, ACCOUNT_LEN+1);
\r
866 ReadStringFromReg(hKey5, "LocalDir", Host.LocalInitDir, INIT_DIR_LEN+1);
\r
867 ReadStringFromReg(hKey5, "RemoteDir", Host.RemoteInitDir, INIT_DIR_LEN+1);
\r
868 ReadStringFromReg(hKey5, "Chmod", Host.ChmodCmd, CHMOD_CMD_LEN+1);
\r
869 ReadStringFromReg(hKey5, "Nlst", Host.LsName, NLST_NAME_LEN+1);
\r
870 ReadStringFromReg(hKey5, "Init", Host.InitCmd, INITCMD_LEN+1);
\r
871 ReadIntValueFromReg(hKey5, "Port", &Host.Port);
\r
872 ReadIntValueFromReg(hKey5, "Anonymous", &Host.Anonymous);
\r
873 ReadIntValueFromReg(hKey5, "Kanji", &Host.KanjiCode);
\r
874 ReadIntValueFromReg(hKey5, "KanaCnv", &Host.KanaCnv);
\r
875 ReadIntValueFromReg(hKey5, "NameKanji", &Host.NameKanjiCode);
\r
876 ReadIntValueFromReg(hKey5, "NameKana", &Host.NameKanaCnv);
\r
877 ReadIntValueFromReg(hKey5, "Pasv", &Host.Pasv);
\r
878 ReadIntValueFromReg(hKey5, "Fwall", &Host.FireWall);
\r
879 ReadIntValueFromReg(hKey5, "List", &Host.ListCmdOnly);
\r
880 ReadIntValueFromReg(hKey5, "NLST-R", &Host.UseNLST_R);
\r
881 ReadIntValueFromReg(hKey5, "Last", &Host.LastDir);
\r
882 ReadIntValueFromReg(hKey5, "Tzone", &Host.TimeZone);
\r
883 ReadIntValueFromReg(hKey5, "Type", &Host.HostType);
\r
884 ReadIntValueFromReg(hKey5, "Sync", &Host.SyncMove);
\r
885 ReadIntValueFromReg(hKey5, "Fpath", &Host.NoFullPath);
\r
886 ReadBinaryFromReg(hKey5, "Sort", &Host.Sort, sizeof(Host.Sort));
\r
887 ReadIntValueFromReg(hKey5, "Secu", &Host.Security);
\r
888 if(Host.Anonymous != YES)
\r
891 ReadStringFromReg(hKey5, "Password", Str, 255);
\r
892 DecodePassword(Str, Host.PassWord);
\r
895 strcpy(Host.PassWord, UserMailAdrs);
\r
897 ReadMultiStringFromReg(hKey5, "Bmarks", Host.BookMark, BOOKMARK_SIZE);
\r
899 ReadIntValueFromReg(hKey5, "Dial", &Host.Dialup);
\r
900 ReadIntValueFromReg(hKey5, "UseIt", &Host.DialupAlways);
\r
901 ReadIntValueFromReg(hKey5, "Notify", &Host.DialupNotify);
\r
902 ReadStringFromReg(hKey5, "DialTo", Host.DialEntry, RAS_NAME_LEN+1);
\r
904 ReadIntValueFromReg(hKey5, "NoEncryption", &Host.UseNoEncryption);
\r
905 ReadIntValueFromReg(hKey5, "FTPES", &Host.UseFTPES);
\r
906 ReadIntValueFromReg(hKey5, "FTPIS", &Host.UseFTPIS);
\r
907 ReadIntValueFromReg(hKey5, "SFTP", &Host.UseSFTP);
\r
909 ReadStringFromReg(hKey5, "PKey", Str, PRIVATE_KEY_LEN*4+1);
\r
910 DecodePassword(Str, Host.PrivateKey);
\r
912 ReadIntValueFromReg(hKey5, "ThreadCount", &Host.MaxThreadCount);
\r
914 ReadIntValueFromReg(hKey5, "MLSD", &Host.UseMLSD);
\r
916 ReadIntValueFromReg(hKey5, "IPv6", &Host.UseIPv6);
\r
918 CloseSubKey(hKey5);
\r
920 AddHostToList(&Host, -1, Host.Level);
\r
924 ReadIntValueFromReg(hKey4, "CurSet", &Sets);
\r
925 SetCurrentHost(Sets);
\r
928 ReadBinaryFromReg(hKey4, "CertCacheHash", &CertificateCacheHash, sizeof(CertificateCacheHash));
\r
930 CloseSubKey(hKey4);
\r
936 /*===== 最初の起動時(設定が無い) =====*/
\r
939 strcpy(UserMailAdrs, "");
\r
941 if(InputDialogBox(mailadrs_dlg, HWND_DESKTOP, NULL, Str, USER_MAIL_LEN+1, &i, IDH_HELP_TOPIC_0000001) == YES)
\r
942 strcpy(UserMailAdrs, Str);
\r
944 for(i = 0; i < SAMPLE_HOSTS; i++)
\r
946 CopyDefaultHost(&Host);
\r
947 Host.Level = Sample[i].Level;
\r
948 strcpy(Host.PassWord, UserMailAdrs);
\r
949 strcpy(Host.HostName, Sample[i].HostName);
\r
950 strcpy(Host.HostAdrs, Sample[i].HostAdrs);
\r
951 strcpy(Host.UserName, "anonymous");
\r
952 AddHostToList(&Host, -1, Host.Level);
\r
960 /*----- 隠しドライブ情報を取得 ------------------------------------------------
\r
968 *----------------------------------------------------------------------------*/
\r
970 DWORD LoadHideDriveListRegistory(void)
\r
983 if(RegOpenKeyEx(HKEY_CURRENT_USER, "Software", 0, KEY_READ, &hKey1) == ERROR_SUCCESS)
\r
985 if(RegOpenKeyEx(hKey1, "Microsoft", 0, KEY_READ, &hKey2) == ERROR_SUCCESS)
\r
987 if(RegOpenKeyEx(hKey2, "Windows", 0, KEY_READ, &hKey3) == ERROR_SUCCESS)
\r
989 if(RegOpenKeyEx(hKey3, "CurrentVersion", 0, KEY_READ, &hKey4) == ERROR_SUCCESS)
\r
991 if(RegOpenKeyEx(hKey4, "Policies", 0, KEY_READ, &hKey5) == ERROR_SUCCESS)
\r
993 if(RegOpenKeyEx(hKey5, "Explorer", 0, KEY_READ, &hKey6) == ERROR_SUCCESS)
\r
995 Size = sizeof(DWORD);
\r
996 RegQueryValueEx(hKey6, "NoDrives", NULL, &Type, (BYTE *)&Ret, &Size);
\r
997 RegCloseKey(hKey6);
\r
999 RegCloseKey(hKey5);
\r
1001 RegCloseKey(hKey4);
\r
1003 RegCloseKey(hKey3);
\r
1005 RegCloseKey(hKey2);
\r
1007 RegCloseKey(hKey1);
\r
1013 /*----- レジストリの設定値をクリア --------------------------------------------
\r
1020 *----------------------------------------------------------------------------*/
\r
1022 void ClearRegistory(void)
\r
1031 if(RegCreateKeyEx(HKEY_CURRENT_USER, "Software\\Sota", 0, "", REG_OPTION_NON_VOLATILE, KEY_CREATE_SUB_KEY, NULL, &hKey2, &Dispos) == ERROR_SUCCESS)
\r
1033 if(RegCreateKeyEx(hKey2, "FFFTP", 0, "", REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL, &hKey3, &Dispos) == ERROR_SUCCESS)
\r
1035 if(RegCreateKeyEx(hKey3, "Options", 0, "", REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL, &hKey4, &Dispos) == ERROR_SUCCESS)
\r
1039 sprintf(Str, "Host%d", i);
\r
1040 if(RegDeleteKey(hKey4, Str) != ERROR_SUCCESS)
\r
1045 sprintf(Str, "History%d", i);
\r
1046 if(RegDeleteKey(hKey4, Str) != ERROR_SUCCESS)
\r
1049 RegCloseKey(hKey4);
\r
1051 RegDeleteKey(hKey3, "Options");
\r
1052 RegCloseKey(hKey3);
\r
1054 RegDeleteKey(hKey2, "FFFTP");
\r
1055 RegCloseKey(hKey2);
\r
1061 /*----- 設定をファイルに保存 --------------------------------------------------
\r
1068 *----------------------------------------------------------------------------*/
\r
1070 void SaveSettingsToFile(void)
\r
1072 char Tmp[FMAX_PATH*2];
\r
1073 char Fname[FMAX_PATH+1];
\r
1075 if(RegType == REGTYPE_REG)
\r
1077 strcpy(Fname, "FFFTP.reg");
\r
1078 if(SelectFile(GetMainHwnd(), Fname, MSGJPN286, MSGJPN287, "reg", OFN_EXTENSIONDIFFERENT | OFN_OVERWRITEPROMPT, 1) == TRUE)
\r
1080 sprintf(Tmp, "/e \x22%s\x22 HKEY_CURRENT_USER\\Software\\sota\\FFFTP", Fname);
\r
1081 if(ShellExecute(NULL, "open", "regedit", Tmp, ".", SW_SHOW) <= (HINSTANCE)32)
\r
1083 MessageBox(NULL, MSGJPN285, "FFFTP", MB_OK);
\r
1089 strcpy(Fname, "FFFTP-Backup.ini");
\r
1090 if(SelectFile(GetMainHwnd(), Fname, MSGJPN286, MSGJPN288, "ini", OFN_EXTENSIONDIFFERENT | OFN_OVERWRITEPROMPT, 1) == TRUE)
\r
1092 CopyFile(AskIniFilePath(), Fname, FALSE);
\r
1099 /*----- 設定をファイルから復元 ------------------------------------------------
\r
1105 * int ロードしたかどうか (YES/NO)
\r
1106 *----------------------------------------------------------------------------*/
\r
1108 int LoadSettingsFromFile(void)
\r
1111 char Tmp[FMAX_PATH*2];
\r
1112 char Fname[FMAX_PATH+1];
\r
1115 strcpy(Fname, "");
\r
1116 if(SelectFile(GetMainHwnd(), Fname, MSGJPN291, MSGJPN290, "", OFN_FILEMUSTEXIST, 0) == TRUE)
\r
1118 if((strlen(Fname) >= 5) && (_stricmp(&Fname[strlen(Fname)-4], ".reg") == 0))
\r
1120 sprintf(Tmp, "\x22%s\x22", Fname);
\r
1121 if(ShellExecute(NULL, "open", "regedit", Tmp, ".", SW_SHOW) <= (HINSTANCE)32)
\r
1123 MessageBox(NULL, MSGJPN285, "FFFTP", MB_OK);
\r
1128 /* レジストリエディタが終了するのを待つ */
\r
1129 // WaitForSingleObject(Info.hProcess, INFINITE);
\r
1132 else if((strlen(Fname) >= 5) && (_stricmp(&Fname[strlen(Fname)-4], ".ini") == 0))
\r
1134 CopyFile(Fname, AskIniFilePath(), FALSE);
\r
1138 MessageBox(NULL, MSGJPN293, "FFFTP", MB_OK);
\r
1146 /*----- レジストリ/INIファイルに文字列をセーブ --------------------------------
\r
1149 * HKEY hKey : レジストリキー
\r
1151 * char *Str : セーブする文字列
\r
1152 * char *DefaultStr : デフォルトの文字列
\r
1158 * 文字列がデフォルトの文字列と同じならセーブしない
\r
1159 *----------------------------------------------------------------------------*/
\r
1161 static void SaveStr(HKEY hKey, char *Key, char *Str, char *DefaultStr)
\r
1163 if((DefaultStr != NULL) && (strcmp(Str, DefaultStr) == 0))
\r
1164 DeleteValue(hKey, Key);
\r
1166 WriteStringToReg(hKey, Key, Str);
\r
1172 /*----- レジストリ/INIファイルに数値(INT)をセーブ -----------------------------
\r
1175 * HKEY hKey : レジストリキー
\r
1177 * int Num : セーブする値
\r
1178 * int DefaultNum : デフォルトの値
\r
1184 * 数値がデフォルトの値と同じならセーブしない
\r
1185 *----------------------------------------------------------------------------*/
\r
1187 static void SaveIntNum(HKEY hKey, char *Key, int Num, int DefaultNum)
\r
1189 if(Num == DefaultNum)
\r
1190 DeleteValue(hKey, Key);
\r
1192 WriteIntValueToReg(hKey, Key, Num);
\r
1198 /*----- LOGFONTデータを文字列に変換する ---------------------------------------
\r
1201 * LOGFONT Font : フォントデータ
\r
1202 * HFONT hFont : フォントのハンドル
\r
1203 * NULL = デフォルトのフォント
\r
1204 * char *Buf : バッファ
\r
1208 *----------------------------------------------------------------------------*/
\r
1210 static void MakeFontData(LOGFONT Font, HFONT hFont, char *Buf)
\r
1214 sprintf(Buf, "%d %d %d %d %d %d %d %d %d %d %d %d %d %s",
\r
1215 Font.lfHeight, Font.lfWidth, Font.lfEscapement, Font.lfOrientation,
\r
1216 Font.lfWeight, Font.lfItalic, Font.lfUnderline, Font.lfStrikeOut,
\r
1217 Font.lfCharSet, Font.lfOutPrecision, Font.lfClipPrecision,
\r
1218 Font.lfQuality, Font.lfPitchAndFamily, Font.lfFaceName);
\r
1223 /*----- 文字列をLOGFONTデータに変換する ---------------------------------------
\r
1227 * LOGFONT *Font : フォントデータ
\r
1231 * FFFTP_SUCCESS/FFFTP_FAIL=変換できない
\r
1232 *----------------------------------------------------------------------------*/
\r
1234 static int RestoreFontData(char *Str, LOGFONT *Font)
\r
1240 if(sscanf(Str, "%d %d %d %d %d %d %d %d %d %d %d %d %d",
\r
1241 &(Font->lfHeight), &(Font->lfWidth), &(Font->lfEscapement), &(Font->lfOrientation),
\r
1242 &(Font->lfWeight), &(Font->lfItalic), &(Font->lfUnderline), &(Font->lfStrikeOut),
\r
1243 &(Font->lfCharSet), &(Font->lfOutPrecision), &(Font->lfClipPrecision),
\r
1244 &(Font->lfQuality), &(Font->lfPitchAndFamily)) == 13)
\r
1246 for(i = 13; i > 0; i--)
\r
1248 if((Str = strchr(Str, ' ')) == NULL)
\r
1254 strcpy(Font->lfFaceName, Str);
\r
1255 Sts = FFFTP_SUCCESS;
\r
1259 if(Sts == FFFTP_FAIL)
\r
1260 memset(Font, NUL, sizeof(LOGFONT));
\r
1265 /*----- パスワードを暗号化する ------------------------------------------------
\r
1268 * char *Str : パスワード
\r
1269 * char *Buf : 暗号化したパスワードを格納するバッファ
\r
1273 *----------------------------------------------------------------------------*/
\r
1274 static void EncodePassword(char *Str, char *Buf)
\r
1276 EncodePassword3( Str, Buf, SecretKey );
\r
1279 /*----- パスワードを暗号化する(オリジナルアルゴリズム) ------------------
\r
1282 * char *Str : パスワード
\r
1283 * char *Buf : 暗号化したパスワードを格納するバッファ
\r
1287 *----------------------------------------------------------------------------*/
\r
1289 static void EncodePasswordOriginal(char *Str, char *Buf)
\r
1291 unsigned char *Get;
\r
1292 unsigned char *Put;
\r
1296 srand((unsigned)time(NULL));
\r
1298 Get = (unsigned char *)Str;
\r
1299 Put = (unsigned char *)Buf;
\r
1301 if( *Get == NUL ){
\r
1311 while(*Get != NUL)
\r
1314 Ch = ((int)*Get++) << Rnd;
\r
1315 Ch = (unsigned char)Ch | (unsigned char)(Ch >> 8);
\r
1316 *Put++ = 0x40 | ((Rnd & 0x3) << 4) | (Ch & 0xF);
\r
1317 *Put++ = 0x40 | ((Ch >> 4) & 0xF);
\r
1318 if((*(Put-2) & 0x1) != 0)
\r
1319 *Put++ = (rand() % 62) + 0x40;
\r
1325 /*----- パスワードを暗号化する(オリジナルアルゴリズム^Key) ----------------
\r
1328 * char *Str : パスワード
\r
1329 * char *Buf : 暗号化したパスワードを格納するバッファ
\r
1330 * const char *Key : 暗号化キー
\r
1334 *----------------------------------------------------------------------------*/
\r
1336 static void EncodePassword2(char *Str, char *Buf, const char* Key)
\r
1338 unsigned char *Get;
\r
1339 unsigned char *Put;
\r
1343 /* 2010.01.31 genta Key */
\r
1344 unsigned char *KeyHead = (unsigned char *)Key;
\r
1345 unsigned char *KeyEnd = KeyHead + strlen(KeyHead);
\r
1346 unsigned char *KeyCurrent = KeyHead;
\r
1348 srand((unsigned)time(NULL));
\r
1350 Get = (unsigned char *)Str;
\r
1351 Put = (unsigned char *)Buf;
\r
1353 if( *Get == NUL ){
\r
1363 while(*Get != NUL)
\r
1366 Ch = ((int)(*Get++ ^ *KeyCurrent)) << Rnd;
\r
1367 Ch = (unsigned char)Ch | (unsigned char)(Ch >> 8);
\r
1368 *Put++ = 0x40 | ((Rnd & 0x3) << 4) | (Ch & 0xF);
\r
1369 *Put++ = 0x40 | ((Ch >> 4) & 0xF);
\r
1370 if((*(Put-2) & 0x1) != 0)
\r
1371 *Put++ = (rand() % 62) + 0x40;
\r
1373 /* 2010.01.31 genta Key */
\r
1374 if( ++KeyCurrent == KeyEnd ){
\r
1375 KeyCurrent = KeyHead;
\r
1382 /*----- パスワードを暗号化する(AES) ------------------------------------------
\r
1385 * char *Str : パスワード
\r
1386 * char *Buf : 暗号化したパスワードを格納するバッファ
\r
1387 * const char *Key : 暗号化キー
\r
1391 *----------------------------------------------------------------------------*/
\r
1393 static void EncodePassword3(char *Str, char *Buf, const char *Key)
\r
1395 unsigned char *Put;
\r
1396 unsigned char *AesEncBuf;
\r
1397 unsigned char *StrPadBuf;
\r
1400 size_t StrPadIndex;
\r
1402 size_t EncBufIndex;
\r
1404 int RandByteCount;
\r
1405 unsigned char AesKey[32];
\r
1406 unsigned char AesCbcIv[AES_BLOCK_SIZE];
\r
1407 aes_encrypt_ctx Ctx;
\r
1411 Put = (unsigned char *)Buf;
\r
1412 StrLen = strlen(Str);
\r
1413 StrPadLen = ((StrLen + AES_BLOCK_SIZE - 1) / AES_BLOCK_SIZE) * AES_BLOCK_SIZE;
\r
1416 // StrPadLen = min1(StrPadLen, AES_BLOCK_SIZE * 2);
\r
1417 StrPadLen = max1(StrPadLen, AES_BLOCK_SIZE * 2);
\r
1419 if((StrPadBuf = malloc(StrPadLen)) != NULL)
\r
1421 if((AesEncBuf = malloc(StrPadLen)) != NULL)
\r
1426 strncpy(StrPadBuf, Str, StrPadLen);
\r
1428 /* PAD部分を乱数で埋める StrPad[StrLen](が有効な場合) は NUL */
\r
1429 for(StrPadIndex = StrLen + 1; StrPadIndex < StrPadLen;)
\r
1431 RandValue = GetRandamDWRODValue();
\r
1432 for(RandByteCount = 0; RandByteCount < 4; RandByteCount++)
\r
1434 if(StrPadIndex < StrPadLen)
\r
1436 StrPadBuf[StrPadIndex++] = (unsigned char)(RandValue & 0xff);
\r
1443 for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE;)
\r
1445 RandValue = GetRandamDWRODValue();
\r
1446 for(RandByteCount = 0; RandByteCount < 4; RandByteCount++)
\r
1448 if(IvIndex < AES_BLOCK_SIZE)
\r
1450 AesCbcIv[IvIndex++] = (unsigned char)(RandValue & 0xff);
\r
1458 for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE; IvIndex++)
\r
1460 sprintf(Put, "%02x", AesCbcIv[IvIndex]);
\r
1465 if(CreateAesKey(AesKey, Key) == FFFTP_SUCCESS)
\r
1467 aes_encrypt_key(AesKey, 32, &Ctx);
\r
1469 if(aes_cbc_encrypt(StrPadBuf, AesEncBuf, StrPadLen, AesCbcIv, &Ctx) == EXIT_SUCCESS)
\r
1471 for(EncBufIndex = 0; EncBufIndex < StrPadLen; EncBufIndex++)
\r
1473 sprintf(Put, "%02x", AesEncBuf[EncBufIndex]);
\r
1480 if(FALSE == PutState)
\r
1492 /*----- パスワードの暗号化を解く ----------------------------------------------
\r
1495 * char *Str : 暗号化したパスワード
\r
1496 * char *Buf : パスワードを格納するバッファ
\r
1500 *----------------------------------------------------------------------------*/
\r
1502 static void DecodePassword(char *Str, char *Buf)
\r
1504 unsigned char *Get;
\r
1505 unsigned char *Put;
\r
1507 Get = (unsigned char *)Str;
\r
1508 Put = (unsigned char *)Buf;
\r
1510 if( *Get == NUL ){
\r
1513 else if( 0x40 <= *Get && *Get < 0x80 ){
\r
1514 /* Original algorithm */
\r
1515 DecodePasswordOriginal( Str, Buf );
\r
1517 else if( strncmp( Get, "0A", 2 ) == 0 ){
\r
1518 DecodePasswordOriginal( Str + 2, Buf );
\r
1520 else if( strncmp( Get, "0B", 2 ) == 0 ){
\r
1521 DecodePassword2( Str + 2, Buf, SecretKey );
\r
1523 else if( strncmp( Get, "0C", 2 ) == 0 ){
\r
1524 DecodePassword3( Str + 2, Buf, SecretKey );
\r
1527 // unknown encoding
\r
1533 /*----- パスワードの暗号化を解く(オリジナルアルゴリズム) -------------------
\r
1536 * char *Str : 暗号化したパスワード
\r
1537 * char *Buf : パスワードを格納するバッファ
\r
1541 *----------------------------------------------------------------------------*/
\r
1542 static void DecodePasswordOriginal(char *Str, char *Buf)
\r
1544 unsigned char *Get;
\r
1545 unsigned char *Put;
\r
1549 Get = (unsigned char *)Str;
\r
1550 Put = (unsigned char *)Buf;
\r
1552 while(*Get != NUL)
\r
1554 Rnd = ((unsigned int)*Get >> 4) & 0x3;
\r
1555 Ch = (*Get & 0xF) | ((*(Get+1) & 0xF) << 4);
\r
1557 if((*Get & 0x1) != 0)
\r
1561 Ch = (Ch & 0xFF) | ((Ch >> 8) & 0xFF);
\r
1568 /*----- パスワードの暗号化を解く(オリジナルアルゴリズム^Key) -------------------
\r
1571 * char *Str : 暗号化したパスワード
\r
1572 * char *Buf : パスワードを格納するバッファ
\r
1573 * const char *Key : 暗号化キー
\r
1577 *----------------------------------------------------------------------------*/
\r
1578 static void DecodePassword2(char *Str, char *Buf, const char* Key)
\r
1582 unsigned char *Get = (unsigned char *)Str;
\r
1583 unsigned char *Put = (unsigned char *)Buf;
\r
1585 /* 2010.01.31 genta Key */
\r
1586 unsigned char *KeyHead = (unsigned char *)Key;
\r
1587 unsigned char *KeyEnd = KeyHead + strlen(KeyHead);
\r
1588 unsigned char *KeyCurrent = KeyHead;
\r
1590 while(*Get != NUL)
\r
1592 Rnd = ((unsigned int)*Get >> 4) & 0x3;
\r
1593 Ch = (*Get & 0xF) | ((*(Get+1) & 0xF) << 4);
\r
1595 if((*Get & 0x1) != 0)
\r
1599 Ch = (Ch & 0xFF) | ((Ch >> 8) & 0xFF);
\r
1600 *Put++ = Ch ^ *KeyCurrent;
\r
1602 /* 2010.01.31 genta Key */
\r
1603 if( ++KeyCurrent == KeyEnd ){
\r
1604 KeyCurrent = KeyHead;
\r
1611 /*----- パスワードの暗号化を解く(AES) ---------------------------------------
\r
1614 * char *Str : 暗号化したパスワード
\r
1615 * char *Buf : パスワードを格納するバッファ
\r
1616 * const char *Key : 暗号化キー
\r
1620 *----------------------------------------------------------------------------*/
\r
1622 static void DecodePassword3(char *Str, char *Buf, const char *Key)
\r
1625 unsigned char *EncBuf;
\r
1628 size_t EncBufIndex;
\r
1630 unsigned char AesKey[32];
\r
1631 unsigned char AesCbcIv[AES_BLOCK_SIZE];
\r
1632 aes_decrypt_ctx Ctx;
\r
1637 StrLen = strlen(Str);
\r
1639 if(AES_BLOCK_SIZE * 2 + 1 < StrLen)
\r
1642 EncBufLen = (StrLen - 1 ) / 2 - AES_BLOCK_SIZE;
\r
1643 if((EncBuf = malloc(EncBufLen)) != NULL)
\r
1645 for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE; IvIndex++)
\r
1647 AesCbcIv[IvIndex] = hex2bin(*Get++) << 4;
\r
1648 AesCbcIv[IvIndex] |= hex2bin(*Get++);
\r
1653 if(CreateAesKey(AesKey, Key) == FFFTP_SUCCESS)
\r
1655 aes_decrypt_key(AesKey, 32, &Ctx);
\r
1657 for(EncBufIndex = 0; EncBufIndex < EncBufLen; EncBufIndex++)
\r
1659 EncBuf[EncBufIndex] = hex2bin(*Get++) << 4;
\r
1660 EncBuf[EncBufIndex] |= hex2bin(*Get++);
\r
1662 if(aes_cbc_decrypt(EncBuf, Buf, EncBufLen, AesCbcIv, &Ctx) == EXIT_SUCCESS)
\r
1664 Buf[EncBufLen] = NUL;
\r
1674 /*----- AES用固定長キーを作成 ----------------------------------------------
\r
1677 * unsigned char *AesKey : AES暗号鍵
\r
1678 * const char *Key : 暗号化キー
\r
1681 * int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)
\r
1683 * SHA-1をもちいて32Byte鍵を生成する
\r
1684 *----------------------------------------------------------------------------*/
\r
1686 static int CreateAesKey(unsigned char *AesKey, const char* Key)
\r
1689 uint32 HashKeyLen;
\r
1690 uint32 results[10];
\r
1695 HashKeyLen = strlen(Key) + 16;
\r
1696 if((HashKey = malloc(HashKeyLen + 1)) == NULL){
\r
1697 return (FFFTP_FAIL);
\r
1700 strcpy(HashKey, Key);
\r
1701 strcat(HashKey, ">g^r=@N7=//z<[`:");
\r
1702 sha_memory((uchar *)HashKey, HashKeyLen, results);
\r
1704 strcpy(HashKey, Key);
\r
1705 strcat(HashKey, "VG77dO1#EyC]$|C@");
\r
1706 sha_memory((uchar *)HashKey, HashKeyLen, results + 5);
\r
1710 while(ResIndex < 8){
\r
1711 for(ByteOffset = 0; ByteOffset < 4; ByteOffset++){
\r
1712 AesKey[KeyIndex++] = (results[ResIndex] >> ByteOffset * 8) & 0xff;
\r
1718 return (FFFTP_SUCCESS);
\r
1722 /*===== レジストリとINIファイルのアクセス処理 ============*/
\r
1725 /*===== INIファイル用のレジストリデータ =====*/
\r
1727 typedef struct regdatatbl {
\r
1728 char KeyName[80+1]; /* キー名 */
\r
1729 char ValTbl[REG_SECT_MAX]; /* 値のテーブル */
\r
1730 int ValLen; /* 値データのバイト数 */
\r
1731 int Mode; /* キーのモード */
\r
1732 struct regdatatbl *Next;
\r
1735 /*===== プロトタイプ =====*/
\r
1737 static BOOL WriteOutRegToFile(REGDATATBL *Pos);
\r
1738 static int ReadInReg(char *Name, REGDATATBL **Handle);
\r
1739 static int StrCatOut(char *Src, int Len, char *Dst);
\r
1740 static int StrReadIn(char *Src, int Max, char *Dst);
\r
1741 static char *ScanValue(void *Handle, char *Name);
\r
1744 /*===== ローカルなワーク =====*/
\r
1746 static int TmpRegType;
\r
1750 /*----- レジストリのタイプを設定する ------------------------------------------
\r
1753 * int Type : タイプ (REGTYPE_xxx)
\r
1757 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1758 *----------------------------------------------------------------------------*/
\r
1760 static void SetRegType(int Type)
\r
1762 TmpRegType = Type;
\r
1767 /*----- レジストリ/INIファイルをオープンする(読み込み)-----------------------
\r
1770 * char *Name : レジストリ名
\r
1771 * void **Handle : ハンドルを返すワーク
\r
1775 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1776 *----------------------------------------------------------------------------*/
\r
1778 static int OpenReg(char *Name, void **Handle)
\r
1781 char Tmp[FMAX_PATH+1];
\r
1784 if(TmpRegType == REGTYPE_REG)
\r
1786 strcpy(Tmp, "Software\\Sota\\");
\r
1787 strcat(Tmp, Name);
\r
1788 if(RegOpenKeyEx(HKEY_CURRENT_USER, Tmp, 0, KEY_READ, (HKEY *)Handle) == ERROR_SUCCESS)
\r
1789 Sts = FFFTP_SUCCESS;
\r
1793 if((Sts = ReadInReg(Name, (REGDATATBL **)Handle)) == FFFTP_SUCCESS)
\r
1794 ((REGDATATBL *)(*Handle))->Mode = 0;
\r
1800 /*----- レジストリ/INIファイルを作成する(書き込み)---------------------------
\r
1803 * char *Name : レジストリ名
\r
1804 * void **Handle : ハンドルを返すワーク
\r
1808 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1809 *----------------------------------------------------------------------------*/
\r
1811 static int CreateReg(char *Name, void **Handle)
\r
1814 char Tmp[FMAX_PATH+1];
\r
1818 if(TmpRegType == REGTYPE_REG)
\r
1820 strcpy(Tmp, "Software\\Sota\\");
\r
1821 strcat(Tmp, Name);
\r
1822 if(RegCreateKeyEx(HKEY_CURRENT_USER, Tmp, 0, "", REG_OPTION_NON_VOLATILE, KEY_CREATE_SUB_KEY | KEY_SET_VALUE, NULL, (HKEY *)Handle, &Dispos) == ERROR_SUCCESS)
\r
1823 Sts = FFFTP_SUCCESS;
\r
1827 if((*Handle = malloc(sizeof(REGDATATBL))) != NULL)
\r
1829 strcpy(((REGDATATBL *)(*Handle))->KeyName, Name);
\r
1830 ((REGDATATBL *)(*Handle))->ValLen = 0;
\r
1831 ((REGDATATBL *)(*Handle))->Next = NULL;
\r
1832 ((REGDATATBL *)(*Handle))->Mode = 1;
\r
1833 Sts = FFFTP_SUCCESS;
\r
1840 /*----- レジストリ/INIファイルをクローズする ----------------------------------
\r
1843 * void *Handle : ハンドル
\r
1847 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1848 *----------------------------------------------------------------------------*/
\r
1850 static int CloseReg(void *Handle)
\r
1856 if(TmpRegType == REGTYPE_REG)
\r
1858 RegCloseKey(Handle);
\r
1861 if((Strm = fopen(AskIniFilePath(), "rt")) != NULL)
\r
1864 MoveFileToTrashCan(AskIniFilePath());
\r
1869 if(((REGDATATBL *)Handle)->Mode == 1)
\r
1871 if(WriteOutRegToFile(Handle) == TRUE)
\r
1873 // /* レジストリをクリア */
\r
1874 // ClearRegistory();
\r
1879 while(Pos != NULL)
\r
1886 return(FFFTP_SUCCESS);
\r
1890 /*----- レジストリ情報をINIファイルに書き込む ---------------------------------
\r
1893 * REGDATATBL *Pos : レジストリデータ
\r
1897 *----------------------------------------------------------------------------*/
\r
1899 static BOOL WriteOutRegToFile(REGDATATBL *Pos)
\r
1906 if((Strm = fopen(AskIniFilePath(), "wt")) != NULL)
\r
1908 fprintf(Strm, MSGJPN239);
\r
1909 while(Pos != NULL)
\r
1911 fprintf(Strm, "\n[%s]\n", Pos->KeyName);
\r
1913 Disp = Pos->ValTbl;
\r
1914 while(Disp < (Pos->ValTbl + Pos->ValLen))
\r
1916 fprintf(Strm, "%s\n", Disp);
\r
1917 Disp = Disp + strlen(Disp) + 1;
\r
1925 MessageBox(NULL, MSGJPN240, "FFFTP", MB_OK);
\r
1931 /*----- INIファイルからレジストリ情報を読み込む -------------------------------
\r
1935 * void *Handle : ハンドル
\r
1939 * FFFTP_SUCCESS/FFFTP_FAIL
\r
1940 *----------------------------------------------------------------------------*/
\r
1942 static int ReadInReg(char *Name, REGDATATBL **Handle)
\r
1955 if((Strm = fopen(AskIniFilePath(), "rt")) != NULL)
\r
1957 if((Buf = malloc(REG_SECT_MAX)) != NULL)
\r
1959 while(fgets(Buf, REG_SECT_MAX, Strm) != NULL)
\r
1963 if((Tmp = strchr(Buf, '\n')) != NULL)
\r
1968 if((New = malloc(sizeof(REGDATATBL))) != NULL)
\r
1970 if((Tmp = strchr(Buf, ']')) != NULL)
\r
1972 strcpy(New->KeyName, Buf+1);
\r
1975 Data = New->ValTbl;
\r
1977 if(*Handle == NULL)
\r
1982 while(Pos->Next != NULL)
\r
1987 else if(strlen(Buf) > 0)
\r
1989 strcpy(Data, Buf);
\r
1990 Data += strlen(Buf) + 1;
\r
1991 New->ValLen += strlen(Buf) + 1;
\r
1995 Sts = FFFTP_SUCCESS;
\r
2004 /*----- サブキーをオープンする ------------------------------------------------
\r
2007 * void *Parent : 親のハンドル
\r
2009 * void **Handle : ハンドルを返すワーク
\r
2013 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2014 *----------------------------------------------------------------------------*/
\r
2016 static int OpenSubKey(void *Parent, char *Name, void **Handle)
\r
2023 if(TmpRegType == REGTYPE_REG)
\r
2025 if(RegOpenKeyEx(Parent, Name, 0, KEY_READ, (HKEY *)Handle) == ERROR_SUCCESS)
\r
2026 Sts = FFFTP_SUCCESS;
\r
2030 strcpy(Key, ((REGDATATBL *)Parent)->KeyName);
\r
2031 strcat(Key, "\\");
\r
2032 strcat(Key, Name);
\r
2034 while(Pos != NULL)
\r
2036 if(strcmp(Pos->KeyName, Key) == 0)
\r
2039 Sts = FFFTP_SUCCESS;
\r
2049 /*----- サブキーを作成する ----------------------------------------------------
\r
2052 * void *Parent : 親のハンドル
\r
2054 * void **Handle : ハンドルを返すワーク
\r
2058 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2059 *----------------------------------------------------------------------------*/
\r
2061 static int CreateSubKey(void *Parent, char *Name, void **Handle)
\r
2068 if(TmpRegType == REGTYPE_REG)
\r
2070 if(RegCreateKeyEx(Parent, Name, 0, "", REG_OPTION_NON_VOLATILE, KEY_SET_VALUE, NULL, (HKEY *)Handle, &Dispos) == ERROR_SUCCESS)
\r
2071 Sts = FFFTP_SUCCESS;
\r
2075 if((*Handle = malloc(sizeof(REGDATATBL))) != NULL)
\r
2077 strcpy(((REGDATATBL *)(*Handle))->KeyName, ((REGDATATBL *)Parent)->KeyName);
\r
2078 strcat(((REGDATATBL *)(*Handle))->KeyName, "\\");
\r
2079 strcat(((REGDATATBL *)(*Handle))->KeyName, Name);
\r
2081 ((REGDATATBL *)(*Handle))->ValLen = 0;
\r
2082 ((REGDATATBL *)(*Handle))->Next = NULL;
\r
2084 Pos = (REGDATATBL *)Parent;
\r
2085 while(Pos->Next != NULL)
\r
2087 Pos->Next = *Handle;
\r
2088 Sts = FFFTP_SUCCESS;
\r
2095 /*----- サブキーをクローズする ------------------------------------------------
\r
2098 * void *Handle : ハンドル
\r
2102 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2103 *----------------------------------------------------------------------------*/
\r
2105 static int CloseSubKey(void *Handle)
\r
2107 if(TmpRegType == REGTYPE_REG)
\r
2108 RegCloseKey(Handle);
\r
2113 return(FFFTP_SUCCESS);
\r
2117 /*----- サブキーを削除する ----------------------------------------------------
\r
2120 * void *Handle : ハンドル
\r
2125 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2126 *----------------------------------------------------------------------------*/
\r
2128 static int DeleteSubKey(void *Handle, char *Name)
\r
2133 if(TmpRegType == REGTYPE_REG)
\r
2135 if(RegDeleteKey(Handle, Name) == ERROR_SUCCESS)
\r
2136 Sts = FFFTP_SUCCESS;
\r
2146 /*----- 値を削除する ----------------------------------------------------------
\r
2149 * void *Handle : ハンドル
\r
2154 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2155 *----------------------------------------------------------------------------*/
\r
2157 static int DeleteValue(void *Handle, char *Name)
\r
2162 if(TmpRegType == REGTYPE_REG)
\r
2164 if(RegDeleteValue(Handle, Name) == ERROR_SUCCESS)
\r
2165 Sts = FFFTP_SUCCESS;
\r
2175 /*----- INT値を読み込む -------------------------------------------------------
\r
2178 * void *Handle : ハンドル
\r
2180 * int *Value : INT値を返すワーク
\r
2184 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2185 *----------------------------------------------------------------------------*/
\r
2187 static int ReadIntValueFromReg(void *Handle, char *Name, int *Value)
\r
2194 if(TmpRegType == REGTYPE_REG)
\r
2196 Size = sizeof(int);
\r
2197 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Value, &Size) == ERROR_SUCCESS)
\r
2198 Sts = FFFTP_SUCCESS;
\r
2202 if((Pos = ScanValue(Handle, Name)) != NULL)
\r
2204 *Value = atoi(Pos);
\r
2205 Sts = FFFTP_SUCCESS;
\r
2212 /*----- INT値を書き込む -------------------------------------------------------
\r
2215 * void *Handle : ハンドル
\r
2217 * int Value : INT値
\r
2221 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2222 *----------------------------------------------------------------------------*/
\r
2224 static int WriteIntValueToReg(void *Handle, char *Name, int Value)
\r
2230 if(TmpRegType == REGTYPE_REG)
\r
2231 RegSetValueEx(Handle, Name, 0, REG_DWORD, (CONST BYTE *)&Value, sizeof(int));
\r
2234 Pos = (REGDATATBL *)Handle;
\r
2235 Data = Pos->ValTbl + Pos->ValLen;
\r
2236 strcpy(Data, Name);
\r
2237 strcat(Data, "=");
\r
2238 sprintf(Tmp, "%d", Value);
\r
2239 strcat(Data, Tmp);
\r
2240 Pos->ValLen += strlen(Data) + 1;
\r
2242 return(FFFTP_SUCCESS);
\r
2246 /*----- 文字列を読み込む ------------------------------------------------------
\r
2249 * void *Handle : ハンドル
\r
2251 * char *Str : 文字列を返すワーク
\r
2252 * DWORD Size : 最大サイズ
\r
2256 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2257 *----------------------------------------------------------------------------*/
\r
2259 static int ReadStringFromReg(void *Handle, char *Name, char *Str, DWORD Size)
\r
2265 if(TmpRegType == REGTYPE_REG)
\r
2267 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Str, &Size) == ERROR_SUCCESS)
\r
2269 if(*(Str + Size - 1) != NUL)
\r
2270 *(Str + Size) = NUL;
\r
2271 Sts = FFFTP_SUCCESS;
\r
2276 if((Pos = ScanValue(Handle, Name)) != NULL)
\r
2278 Size = min1(Size-1, strlen(Pos));
\r
2279 Size = StrReadIn(Pos, Size, Str);
\r
2280 *(Str + Size) = NUL;
\r
2281 Sts = FFFTP_SUCCESS;
\r
2288 /*----- 文字列を書き込む ------------------------------------------------------
\r
2291 * void *Handle : ハンドル
\r
2297 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2298 *----------------------------------------------------------------------------*/
\r
2300 static int WriteStringToReg(void *Handle, char *Name, char *Str)
\r
2305 if(TmpRegType == REGTYPE_REG)
\r
2306 RegSetValueEx(Handle, Name, 0, REG_SZ, (CONST BYTE *)Str, strlen(Str)+1);
\r
2309 Pos = (REGDATATBL *)Handle;
\r
2310 Data = Pos->ValTbl + Pos->ValLen;
\r
2311 strcpy(Data, Name);
\r
2312 strcat(Data, "=");
\r
2313 Pos->ValLen += strlen(Data);
\r
2314 Data = Pos->ValTbl + Pos->ValLen;
\r
2315 Pos->ValLen += StrCatOut(Str, strlen(Str), Data) + 1;
\r
2317 return(FFFTP_SUCCESS);
\r
2321 /*----- マルチ文字列を読み込む ------------------------------------------------
\r
2324 * void *Handle : ハンドル
\r
2326 * char *Str : 文字列を返すワーク
\r
2327 * DWORD Size : 最大サイズ
\r
2331 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2332 *----------------------------------------------------------------------------*/
\r
2334 static int ReadMultiStringFromReg(void *Handle, char *Name, char *Str, DWORD Size)
\r
2340 if(TmpRegType == REGTYPE_REG)
\r
2342 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Str, &Size) == ERROR_SUCCESS)
\r
2344 if(*(Str + Size - 1) != NUL)
\r
2345 *(Str + Size) = NUL;
\r
2346 Sts = FFFTP_SUCCESS;
\r
2351 if((Pos = ScanValue(Handle, Name)) != NULL)
\r
2353 Size = min1(Size-1, strlen(Pos));
\r
2354 Size = StrReadIn(Pos, Size, Str);
\r
2355 *(Str + Size) = NUL;
\r
2356 Sts = FFFTP_SUCCESS;
\r
2363 /*----- マルチ文字列を書き込む ------------------------------------------------
\r
2366 * void *Handle : ハンドル
\r
2372 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2373 *----------------------------------------------------------------------------*/
\r
2375 static int WriteMultiStringToReg(void *Handle, char *Name, char *Str)
\r
2380 if(TmpRegType == REGTYPE_REG)
\r
2381 RegSetValueEx(Handle, Name, 0, REG_MULTI_SZ, (CONST BYTE *)Str, StrMultiLen(Str)+1);
\r
2384 Pos = (REGDATATBL *)Handle;
\r
2385 Data = Pos->ValTbl + Pos->ValLen;
\r
2386 strcpy(Data, Name);
\r
2387 strcat(Data, "=");
\r
2388 Pos->ValLen += strlen(Data);
\r
2389 Data = Pos->ValTbl + Pos->ValLen;
\r
2390 Pos->ValLen += StrCatOut(Str, StrMultiLen(Str), Data) + 1;
\r
2392 return(FFFTP_SUCCESS);
\r
2396 /*----- バイナリを読み込む-----------------------------------------------------
\r
2399 * void *Handle : ハンドル
\r
2401 * void *Bin : バイナリを返すワーク
\r
2402 * DWORD Size : 最大サイズ
\r
2406 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2407 *----------------------------------------------------------------------------*/
\r
2409 static int ReadBinaryFromReg(void *Handle, char *Name, void *Bin, DWORD Size)
\r
2415 if(TmpRegType == REGTYPE_REG)
\r
2417 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Bin, &Size) == ERROR_SUCCESS)
\r
2418 Sts = FFFTP_SUCCESS;
\r
2422 if((Pos = ScanValue(Handle, Name)) != NULL)
\r
2424 Size = min1(Size, strlen(Pos));
\r
2425 Size = StrReadIn(Pos, Size, Bin);
\r
2426 Sts = FFFTP_SUCCESS;
\r
2433 /*----- バイナリを書き込む ----------------------------------------------------
\r
2436 * void *Handle : ハンドル
\r
2438 * void *Bin : バイナリ
\r
2443 * FFFTP_SUCCESS/FFFTP_FAIL
\r
2444 *----------------------------------------------------------------------------*/
\r
2446 static int WriteBinaryToReg(void *Handle, char *Name, void *Bin, int Len)
\r
2451 if(TmpRegType == REGTYPE_REG)
\r
2452 RegSetValueEx(Handle, Name, 0, REG_BINARY, (CONST BYTE *)Bin, Len);
\r
2455 Pos = (REGDATATBL *)Handle;
\r
2456 Data = Pos->ValTbl + Pos->ValLen;
\r
2457 strcpy(Data, Name);
\r
2458 strcat(Data, "=");
\r
2459 Pos->ValLen += strlen(Data);
\r
2460 Data = Pos->ValTbl + Pos->ValLen;
\r
2461 Pos->ValLen += StrCatOut(Bin, Len, Data) + 1;
\r
2463 return(FFFTP_SUCCESS);
\r
2467 /*----- 文字列をバッファに追加書き込みする ------------------------------------
\r
2471 * int len : 文字列の長さ
\r
2472 * char *Dst : 書き込みするバッファ
\r
2476 *----------------------------------------------------------------------------*/
\r
2478 static int StrCatOut(char *Src, int Len, char *Dst)
\r
2482 Dst += strlen(Dst);
\r
2484 for(; Len > 0; Len--)
\r
2492 else if((*Src >= 0x20) && (*Src <= 0x7E))
\r
2499 sprintf(Dst, "\\%02X", *(unsigned char *)Src);
\r
2510 /*----- 文字列をバッファに読み込む --------------------------------------------
\r
2515 * char *Dst : 書き込みするバッファ
\r
2519 *----------------------------------------------------------------------------*/
\r
2521 static int StrReadIn(char *Src, int Max, char *Dst)
\r
2527 while(*Src != NUL)
\r
2539 sscanf(Src, "%02x", &Tmp);
\r
2555 /*----- 値を検索する ----------------------------------------------------------
\r
2558 * char *Handle : ハンドル
\r
2563 * NULL=指定の名前の値が見つからない
\r
2564 *----------------------------------------------------------------------------*/
\r
2566 static char *ScanValue(void *Handle, char *Name)
\r
2574 Pos = Cur->ValTbl;
\r
2575 while(Pos < (Cur->ValTbl + Cur->ValLen))
\r
2577 if((strncmp(Name, Pos, strlen(Name)) == 0) &&
\r
2578 (*(Pos + strlen(Name)) == '='))
\r
2580 Ret = Pos + strlen(Name) + 1;
\r
2583 Pos += strlen(Pos) + 1;
\r
2589 /*----------- パスワードの妥当性を確認する ------------------------------------
\r
2592 * char *Password: パスワード文字列
\r
2593 * char *HashStr: SHA-1ハッシュ文字列
\r
2599 *----------------------------------------------------------------------------*/
\r
2600 int CheckPasswordValidity( char* Password, int length, const char* HashStr )
\r
2607 const char* p = HashStr;
\r
2609 /* 空文字列は一致したことにする */
\r
2610 if( HashStr[0] == NUL ) return 1;
\r
2612 /* Hashをチェックするする*/
\r
2613 if( strlen(HashStr) != 40 ) return 2;
\r
2616 for( i = 0; i < 5; i++ ){
\r
2618 for( j = 0; j < 8; j++ ){
\r
2619 if( *p < 0x40 || 0x40 + 15 < *p ){
\r
2622 decode = (decode << 4 ) + (*p - 0x40);
\r
2625 hash1[i] = decode;
\r
2628 /* Password をハッシュする */
\r
2629 sha_memory( Password, length, hash2 );
\r
2631 if( memcmp( (char*)hash1, (char*)hash2, sizeof( hash1 )) == 0 ){
\r
2637 /*----------- パスワードの妥当性チェックのための文字列を作成する ------------
\r
2640 * char *Password: パスワード文字列
\r
2641 * char *Str: SHA-1ハッシュ文字列格納場所 (41bytes以上)
\r
2645 *----------------------------------------------------------------------------*/
\r
2646 void CreatePasswordHash( char* Password, int length, char* HashStr )
\r
2650 unsigned char *p = (unsigned char *)HashStr;
\r
2652 sha_memory( Password, length, hash );
\r
2654 for( i = 0; i < 5; i++ ){
\r
2655 ulong rest = hash[i];
\r
2656 for( j = 0; j < 8; j++ ){
\r
2657 *p++ = (unsigned char)((rest & 0xf0000000) >> 28) + '@';
\r
2664 void SetHashSalt( DWORD salt )
\r
2666 unsigned char* pos = &SecretKey[strlen(SecretKey) + 1];
\r
2667 *pos++ = ( salt >> 24 ) & 0xff;
\r
2668 *pos++ = ( salt >> 16 ) & 0xff;
\r
2669 *pos++ = ( salt >> 8 ) & 0xff;
\r
2670 *pos++ = ( salt ) & 0xff;
\r
2672 SecretKeyLength = strlen( SecretKey ) + 5;
\r
2675 /*----------- 乱数生成をする -------------------------------------------------
\r
2680 * ランダムな値:コンパイラVS2005/動作環境WinXP以上では rand_s から取得する
\r
2681 *----------------------------------------------------------------------------*/
\r
2682 DWORD GetRandamDWRODValue(void)
\r
2686 #ifdef _CRT_RAND_S
\r
2687 errno_t errnoRand_s;
\r
2688 errnoRand_s = rand_s(&rndValue);
\r
2689 errorCode = (0 != errnoRand_s ? 1 : 0);
\r
2693 if(0 != errorCode){
\r
2694 #ifdef USE_RANDAM_C_RAND
\r
2695 rndValue = rand() | (rand() << 16);
\r
2697 /* rand() のかわりに、SHA-1とパフォーマンスカウンタを用いる */
\r
2698 ulong shaValue[5];
\r
2699 LARGE_INTEGER Counter;
\r
2701 if(0 == IsRndSourceInit){
\r
2703 HANDLE CurProcHandle;
\r
2704 HANDLE CurThreadHandle;
\r
2706 if(DuplicateHandle(GetCurrentProcess(), GetCurrentProcess(), GetCurrentProcess(),
\r
2707 &CurProcHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))
\r
2709 CloseHandle(CurProcHandle);
\r
2711 if(DuplicateHandle(GetCurrentProcess(), GetCurrentThread(), GetCurrentProcess(),
\r
2712 &CurThreadHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))
\r
2714 CloseHandle(CurThreadHandle);
\r
2717 /* _WIN64 では64bitだが、その場合はrand_sが大抵利用可能なのでここでは32bitのみ用いる */
\r
2718 RndSource[0] = (ulong)CurProcHandle;
\r
2719 RndSource[1] = (ulong)CurThreadHandle;
\r
2720 RndSource[2] = (ulong)GetTickCount();
\r
2721 RndSource[3] = (ulong)timeGetTime();
\r
2722 RndSource[4] = 0; /* カウントアップ */
\r
2723 RndSource[5] = RndSource[3] + 1;
\r
2724 IsRndSourceInit = 1;
\r
2727 RndSource[5] += 0x00010010;
\r
2728 if(QueryPerformanceCounter(&Counter)){
\r
2729 RndSource[6] = Counter.LowPart;
\r
2730 RndSource[7] = Counter.HighPart;
\r
2731 RndSource[8] = (ulong)rand();
\r
2733 RndSource[6] = (ulong)timeGetTime();
\r
2734 RndSource[7] = (ulong)rand();
\r
2735 RndSource[8] = (ulong)rand();
\r
2738 sha_memory((char *)RndSource, sizeof(RndSource), shaValue);
\r
2739 rndValue = shaValue[0] ^ shaValue[1] ^ shaValue[2] ^ shaValue[3] ^ shaValue[4];
\r