OSDN Git Service

Change behavior of confirming certificate.
[ffftp/ffftp.git] / registory.c
1 /*=============================================================================\r
2 *                                                               レジストリ関係\r
3 *\r
4 *\r
5 ===============================================================================\r
6 / Copyright (C) 1997-2007 Sota. All rights reserved.\r
7 /\r
8 / Redistribution and use in source and binary forms, with or without \r
9 / modification, are permitted provided that the following conditions \r
10 / are met:\r
11 /\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
17 /\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
29 \r
30 // VC 8.0(2005)以上でのみ rand_s を利用可能\r
31 #if 1400 <= _MSC_VER\r
32 //#define _CRT_RAND_S\r
33 #endif\r
34 \r
35 #define STRICT\r
36 #include <windows.h>\r
37 #include <stdio.h>\r
38 #include <stdlib.h>\r
39 #include <time.h>\r
40 #include <string.h>\r
41 #include <windowsx.h>\r
42 #include <process.h>\r
43 \r
44 \r
45 #include "common.h"\r
46 #include "resource.h"\r
47 #include "sample.h"\r
48 #include "sha.h"\r
49 #include "aes.h"\r
50 \r
51 \r
52 /*===== プロトタイプ =====*/\r
53 \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
58 \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
63 \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
69 \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
87 \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
91 \r
92 DWORD GetRandamDWRODValue(void);\r
93 \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
98 \r
99 static int IsRndSourceInit = 0;\r
100 static ulong RndSource[9];\r
101 \r
102 /*===== 外部参照 =====*/\r
103 \r
104 /* 設定値 */\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
141 extern int RmEOF;\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
165 extern int Sizing;\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
174 \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
181 \r
182 extern int FolderAttr;\r
183 extern int FolderAttrNum;\r
184 \r
185 // 暗号化通信対応\r
186 extern BYTE CertificateCacheHash[MAX_CERT_CACHE_HASH][20];\r
187 \r
188 /*----- マスタパスワードの設定 ----------------------------------------------\r
189 *\r
190 *       Parameter\r
191 *               const char* Password : マスターパスワード\r
192 *\r
193 *       Return Value\r
194 *               なし\r
195 *----------------------------------------------------------------------------*/\r
196 void SetMasterPassword( const char* Password )\r
197 {\r
198         ZeroMemory( SecretKey, MAX_PASSWORD_LEN + 12 );\r
199         if( Password != NULL ){\r
200                 strncpy( SecretKey, Password, MAX_PASSWORD_LEN );\r
201         }\r
202         else {\r
203                 strcpy( SecretKey, DEFAULT_PASSWORD );\r
204         }\r
205         SecretKeyLength = strlen( SecretKey );\r
206         \r
207         /* 未検証なので,初期状態はOKにする (強制再設定→保存にを可能にする)*/\r
208         IsMasterPasswordError = PASSWORD_OK;\r
209 }\r
210 \r
211 /*----- マスタパスワードの状態取得 ----------------------------------------------\r
212 *\r
213 *       Parameter\r
214 *               なし\r
215 *\r
216 *       Return Value\r
217 *               PASSWORD_OK : OK\r
218 *               PASSWORD_UNMATCH : パスワード不一致\r
219 *               BAD_PASSWORD_HASH : パスワード確認失敗\r
220 *----------------------------------------------------------------------------*/\r
221 int GetMasterPasswordStatus(void)\r
222 {\r
223         return IsMasterPasswordError;\r
224 }\r
225 \r
226 /*----- レジストリ/INIファイルのマスターパスワードの検証を行う ------------\r
227 *\r
228 *       Parameter\r
229 *               なし\r
230 *\r
231 *       Return Value\r
232 *               \r
233 *----------------------------------------------------------------------------*/\r
234 \r
235 int ValidateMasterPassword(void)\r
236 {\r
237         void *hKey3;\r
238         int i;\r
239 \r
240         SetRegType(REGTYPE_INI);\r
241         if((i = OpenReg("FFFTP", &hKey3)) != FFFTP_SUCCESS)\r
242         {\r
243                 if(AskForceIni() == NO)\r
244                 {\r
245                         SetRegType(REGTYPE_REG);\r
246                         i = OpenReg("FFFTP", &hKey3);\r
247                 }\r
248         }\r
249         if(i == FFFTP_SUCCESS){\r
250                 char checkbuf[48];\r
251                 int salt = 0;\r
252 \r
253                 if( ReadIntValueFromReg(hKey3, "CredentialSalt", &salt)){\r
254                         SetHashSalt( salt );\r
255                 }\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
260                                 break;\r
261                         case 1: /* match */\r
262                                 IsMasterPasswordError = PASSWORD_OK;\r
263                                 break;\r
264                         case 2: /* invalid hash */\r
265                         default:\r
266                                 IsMasterPasswordError = BAD_PASSWORD_HASH;\r
267                                 break;\r
268                         }\r
269                 }\r
270                 CloseReg(hKey3);\r
271                 return YES;\r
272         }\r
273         return NO;\r
274 }\r
275 \r
276 /*----- レジストリ/INIファイルに設定値を保存 ---------------------------------\r
277 *\r
278 *       Parameter\r
279 *               なし\r
280 *\r
281 *       Return Value\r
282 *               なし\r
283 *----------------------------------------------------------------------------*/\r
284 \r
285 void SaveRegistory(void)\r
286 {\r
287         void *hKey3;\r
288         void *hKey4;\r
289         void *hKey5;\r
290         // 暗号化通信対応\r
291 //      char Str[FMAX_PATH+1];\r
292         char Str[PRIVATE_KEY_LEN*4+1];\r
293         int i;\r
294         int n;\r
295         HOSTDATA DefaultHost;\r
296         HOSTDATA Host;\r
297         HISTORYDATA Hist;\r
298         HISTORYDATA DefaultHist;\r
299         \r
300         if( GetMasterPasswordStatus() == PASSWORD_UNMATCH ){\r
301                 /* 2010.01.30 genta: マスターパスワードが不一致の場合は不用意に上書きしない */\r
302                 return;\r
303         }\r
304 \r
305         SetRegType(RegType);\r
306         if(CreateReg("FFFTP", &hKey3) == FFFTP_SUCCESS)\r
307         {\r
308                 char buf[48];\r
309                 int salt = GetTickCount();\r
310         \r
311                 WriteIntValueToReg(hKey3, "Version", VER_NUM);\r
312                 WriteIntValueToReg(hKey3, "CredentialSalt", salt);\r
313                 \r
314                 SetHashSalt( salt );\r
315                 /* save password hash */\r
316                 CreatePasswordHash( SecretKey, SecretKeyLength, buf );\r
317                 WriteStringToReg(hKey3, "CredentialCheck", buf);\r
318 \r
319                 if(CreateSubKey(hKey3, "Options", &hKey4) == FFFTP_SUCCESS)\r
320                 {\r
321                         WriteIntValueToReg(hKey4, "NoSave", SuppressSave);\r
322 \r
323                         if(SuppressSave != YES)\r
324                         {\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
334 \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
339 \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
348 \r
349                                 WriteIntValueToReg(hKey4, "RecvEx", ExistMode);\r
350                                 WriteIntValueToReg(hKey4, "SendEx", UpExistMode);\r
351 \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
357 \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
363 \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
372 \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
377 \r
378                                 WriteMultiStringToReg(hKey4, "AsciiFile", AsciiExt);\r
379                                 WriteIntValueToReg(hKey4, "LowUp", FnameCnv);\r
380                                 WriteIntValueToReg(hKey4, "Tout", TimeOut);\r
381 \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
387 \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
392 \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
405 \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
412 \r
413                                 WriteMultiStringToReg(hKey4, "DefAttr", DefAttrList);\r
414 \r
415                                 GetTempPath(FMAX_PATH, Str);\r
416                                 SaveStr(hKey4, "Tmp", TmpPath, Str);\r
417 \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
421 \r
422                                 WriteIntValueToReg(hKey4, "FAttrSw", FolderAttr);\r
423                                 WriteIntValueToReg(hKey4, "FAttr", FolderAttrNum);\r
424 \r
425                                 WriteIntValueToReg(hKey4, "HistNum", FileHist);\r
426 \r
427                                 /* Ver1.54a以前の形式のヒストリデータは削除 */\r
428                                 DeleteValue(hKey4, "Hist");\r
429 \r
430                                 /* ヒストリの設定を保存 */\r
431                                 CopyDefaultHistory(&DefaultHist);\r
432                                 n = 0;\r
433                                 for(i = AskHistoryNum(); i > 0; i--)\r
434                                 {\r
435                                         if(GetHistoryByNum(i-1, &Hist) == FFFTP_SUCCESS)\r
436                                         {\r
437                                                 sprintf(Str, "History%d", n);\r
438                                                 if(CreateSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
439                                                 {\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
470                                                         // 暗号化通信対応\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
477                                                         // 同時接続対応\r
478                                                         SaveIntNum(hKey5, "ThreadCount", Hist.MaxThreadCount, DefaultHist.MaxThreadCount);\r
479                                                         // MLSD対応\r
480                                                         SaveIntNum(hKey5, "MLSD", Hist.UseMLSD, DefaultHist.UseMLSD);\r
481                                                         // IPv6対応\r
482                                                         SaveIntNum(hKey5, "IPv6", Hist.UseIPv6, DefaultHist.UseIPv6);\r
483 \r
484                                                         CloseSubKey(hKey5);\r
485                                                         n++;\r
486                                                 }\r
487                                         }\r
488                                 }\r
489                                 WriteIntValueToReg(hKey4, "SavedHist", n);\r
490 \r
491                                 /* 余分なヒストリがあったら削除 */\r
492                                 for(; n < 999; n++)\r
493                                 {\r
494                                         sprintf(Str, "History%d", n);\r
495                                         if(DeleteSubKey(hKey4, Str) != FFFTP_SUCCESS)\r
496                                                 break;\r
497                                 }\r
498 \r
499                                 /* ホストの設定を保存 */\r
500                                 CopyDefaultHost(&DefaultHost);\r
501                                 i = 0;\r
502                                 while(CopyHostFromList(i, &Host) == FFFTP_SUCCESS)\r
503                                 {\r
504                                         sprintf(Str, "Host%d", i);\r
505                                         if(CreateSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
506                                         {\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
511                                                 {\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
520 \r
521                                                         if(Host.Anonymous == NO)\r
522                                                                 EncodePassword(Host.PassWord, Str);\r
523                                                         else\r
524                                                                 strcpy(Str, DefaultHost.PassWord);\r
525                                                         SaveStr(hKey5, "Password", Str, DefaultHost.PassWord);\r
526 \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
544 \r
545                                                         WriteMultiStringToReg(hKey5, "Bmarks", Host.BookMark);\r
546 \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
551                                                         // 暗号化通信対応\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
558                                                         // 同時接続対応\r
559                                                         SaveIntNum(hKey5, "ThreadCount", Host.MaxThreadCount, DefaultHost.MaxThreadCount);\r
560                                                         // MLSD対応\r
561                                                         SaveIntNum(hKey5, "MLSD", Host.UseMLSD, DefaultHost.UseMLSD);\r
562                                                         // IPv6対応\r
563                                                         SaveIntNum(hKey5, "IPv6", Host.UseIPv6, DefaultHost.UseIPv6);\r
564                                                 }\r
565                                                 CloseSubKey(hKey5);\r
566                                         }\r
567                                         i++;\r
568                                 }\r
569                                 WriteIntValueToReg(hKey4, "SetNum", i);\r
570 \r
571                                 /* 余分なホストの設定があったら削除 */\r
572                                 for(; i < 998; i++)\r
573                                 {\r
574                                         sprintf(Str, "Host%d", i);\r
575                                         if(DeleteSubKey(hKey4, Str) != FFFTP_SUCCESS)\r
576                                                 break;\r
577                                 }\r
578 \r
579                                 if((i = AskCurrentHost()) == HOSTNUM_NOENTRY)\r
580                                         i = 0;\r
581                                 WriteIntValueToReg(hKey4, "CurSet", i);\r
582 \r
583                                 // 暗号化通信対応\r
584                                 WriteBinaryToReg(hKey4, "CertCacheHash", &CertificateCacheHash, sizeof(CertificateCacheHash));\r
585                         }\r
586                         CloseSubKey(hKey4);\r
587                 }\r
588                 CloseReg(hKey3);\r
589         }\r
590         return;\r
591 }\r
592 \r
593 /*----- レジストリ/INIファイルから設定値を呼び出す ---------------------------\r
594 *\r
595 *       この関数を複数回呼び出すと,ホスト設定が追加される.\r
596 *\r
597 *       Parameter\r
598 *               なし\r
599 *\r
600 *       Return Value\r
601 *               YES: 読み出し成功\r
602 *               NO:  読み出し失敗(設定無し)\r
603 *----------------------------------------------------------------------------*/\r
604 \r
605 int LoadRegistory(void)\r
606 {\r
607         void *hKey3;\r
608         void *hKey4;\r
609         void *hKey5;\r
610         int i;\r
611         int Sets;\r
612         // 暗号化通信対応\r
613 //      char Str[256];  /* ASCII_EXT_LENより大きい事 */\r
614         char Str[PRIVATE_KEY_LEN*4+1];\r
615         char *Pos;\r
616         char *Pos2;\r
617         HOSTDATA Host;\r
618         HISTORYDATA Hist;\r
619         int Sts;\r
620         int Version;\r
621 \r
622         Sts = NO;\r
623 \r
624         SetRegType(REGTYPE_INI);\r
625         if((i = OpenReg("FFFTP", &hKey3)) != FFFTP_SUCCESS)\r
626         {\r
627                 if(AskForceIni() == NO)\r
628                 {\r
629                         SetRegType(REGTYPE_REG);\r
630                         i = OpenReg("FFFTP", &hKey3);\r
631                 }\r
632         }\r
633 \r
634         if(i == FFFTP_SUCCESS)\r
635         {\r
636 //              char checkbuf[48];\r
637                 int salt = 0;\r
638                 Sts = YES;\r
639 \r
640                 ReadIntValueFromReg(hKey3, "Version", &Version);\r
641 \r
642                 if(OpenSubKey(hKey3, "Options", &hKey4) == FFFTP_SUCCESS)\r
643                 {\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
649                         /* ↓旧バージョンのバグ対策 */\r
650                         LocalWidth = max1(0, LocalWidth);\r
651                         ReadIntValueFromReg(hKey4, "TaskHeight", &TaskHeight);\r
652                         /* ↓旧バージョンのバグ対策 */\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
657 \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
662 \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
671 \r
672                         ReadIntValueFromReg(hKey4, "RecvEx", &ExistMode);\r
673                         ReadIntValueFromReg(hKey4, "SendEx", &UpExistMode);\r
674 \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
680 \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
686 \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
695 \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
700 \r
701                         if(ReadMultiStringFromReg(hKey4, "AsciiFile", AsciiExt, ASCII_EXT_LEN+1) == FFFTP_FAIL)\r
702                         {\r
703                                 /* 旧ASCIIモードの拡張子の設定を新しいものに変換 */\r
704                                 ReadStringFromReg(hKey4, "Ascii", Str, ASCII_EXT_LEN+1);\r
705                                 memset(AsciiExt, NUL, ASCII_EXT_LEN+1);\r
706                                 Pos = Str;\r
707                                 while(*Pos != NUL)\r
708                                 {\r
709                                         if((Pos2 = strchr(Pos, ';')) == NULL)\r
710                                                 Pos2 = strchr(Pos, NUL);\r
711                                         if((Pos2 - Pos) > 0)\r
712                                         {\r
713                                                 if((StrMultiLen(AsciiExt) + (Pos2 - Pos) + 2) >= ASCII_EXT_LEN)\r
714                                                         break;\r
715                                                 strcpy(AsciiExt + StrMultiLen(AsciiExt), "*.");\r
716                                                 strncpy(AsciiExt + StrMultiLen(AsciiExt) - 1, Pos, (Pos2 - Pos));\r
717                                         }\r
718                                         Pos = Pos2;\r
719                                         if(*Pos == ';')\r
720                                                 Pos++;\r
721                                 }\r
722                         }\r
723 \r
724                         ReadIntValueFromReg(hKey4, "LowUp", &FnameCnv);\r
725                         ReadIntValueFromReg(hKey4, "Tout", &TimeOut);\r
726 \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
732 \r
733                         if(ReadStringFromReg(hKey4, "ListFont", Str, 256) == FFFTP_SUCCESS)\r
734                         {\r
735                                 if(RestoreFontData(Str, &ListLogFont) == FFFTP_SUCCESS)\r
736                                         ListFont = CreateFontIndirect(&ListLogFont);\r
737                         }\r
738                         ReadIntValueFromReg(hKey4, "ListHide", &DispIgnoreHide);\r
739                         ReadIntValueFromReg(hKey4, "ListDrv", &DispDrives);\r
740 \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
753 \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
760 \r
761                         ReadMultiStringFromReg(hKey4, "DefAttr", DefAttrList, DEFATTRLIST_LEN+1);\r
762 \r
763                         ReadStringFromReg(hKey4, "Tmp", TmpPath, FMAX_PATH+1);\r
764 \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
768 \r
769                         ReadIntValueFromReg(hKey4, "FAttrSw", &FolderAttr);\r
770                         ReadIntValueFromReg(hKey4, "FAttr", &FolderAttrNum);\r
771 \r
772                         ReadIntValueFromReg(hKey4, "NoSave", &SuppressSave);\r
773 \r
774                         ReadIntValueFromReg(hKey4, "HistNum", &FileHist);\r
775 //                      ReadMultiStringFromReg(hKey4, "Hist", Hist, (FMAX_PATH+1)*HISTORY_MAX+1);\r
776 \r
777                         /* ヒストリの設定を読み込む */\r
778                         Sets = 0;\r
779                         ReadIntValueFromReg(hKey4, "SavedHist", &Sets);\r
780 \r
781                         for(i = 0; i < Sets; i++)\r
782                         {\r
783                                 sprintf(Str, "History%d", i);\r
784                                 if(OpenSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
785                                 {\r
786                                         CopyDefaultHistory(&Hist);\r
787 \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
812                                         strcpy(Str, "");\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
819                                         // 暗号化通信対応\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
824                                         strcpy(Str, "");\r
825                                         ReadStringFromReg(hKey5, "PKey", Str, PRIVATE_KEY_LEN*4+1);\r
826                                         DecodePassword(Str, Hist.PrivateKey);\r
827                                         // 同時接続対応\r
828                                         ReadIntValueFromReg(hKey5, "ThreadCount", &Hist.MaxThreadCount);\r
829                                         // MLSD対応\r
830                                         ReadIntValueFromReg(hKey5, "MLSD", &Hist.UseMLSD);\r
831                                         // IPv6対応\r
832                                         ReadIntValueFromReg(hKey5, "IPv6", &Hist.UseIPv6);\r
833 \r
834                                         CloseSubKey(hKey5);\r
835                                         AddHistoryToHistory(&Hist);\r
836                                 }\r
837                         }\r
838 \r
839                         /* ホストの設定を読み込む */\r
840                         Sets = 0;\r
841                         ReadIntValueFromReg(hKey4, "SetNum", &Sets);\r
842 \r
843                         for(i = 0; i < Sets; i++)\r
844                         {\r
845                                 sprintf(Str, "Host%d", i);\r
846                                 if(OpenSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
847                                 {\r
848                                         CopyDefaultHost(&Host);\r
849                                         /* 下位互換性のため */\r
850                                         // SourceForge.JPによるフォーク\r
851 //                                      if(Version < VER_NUM)\r
852                                         if(Version < 1921)\r
853                                         {\r
854                                                 Host.Pasv = NO;\r
855                                                 Host.ListCmdOnly = NO;\r
856                                         }\r
857                                         // 1.97b以前はデフォルトでShift_JIS\r
858                                         if(Version < 1980)\r
859                                                 Host.NameKanjiCode = KANJI_SJIS;\r
860                                         ReadIntValueFromReg(hKey5, "Set", &Host.Level);\r
861 \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
889                                         {\r
890                                                 strcpy(Str, "");\r
891                                                 ReadStringFromReg(hKey5, "Password", Str, 255);\r
892                                                 DecodePassword(Str, Host.PassWord);\r
893                                         }\r
894                                         else\r
895                                                 strcpy(Host.PassWord, UserMailAdrs);\r
896 \r
897                                         ReadMultiStringFromReg(hKey5, "Bmarks", Host.BookMark, BOOKMARK_SIZE);\r
898 \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
903                                         // 暗号化通信対応\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
908                                         strcpy(Str, "");\r
909                                         ReadStringFromReg(hKey5, "PKey", Str, PRIVATE_KEY_LEN*4+1);\r
910                                         DecodePassword(Str, Host.PrivateKey);\r
911                                         // 同時接続対応\r
912                                         ReadIntValueFromReg(hKey5, "ThreadCount", &Host.MaxThreadCount);\r
913                                         // MLSD対応\r
914                                         ReadIntValueFromReg(hKey5, "MLSD", &Host.UseMLSD);\r
915                                         // IPv6対応\r
916                                         ReadIntValueFromReg(hKey5, "IPv6", &Host.UseIPv6);\r
917 \r
918                                         CloseSubKey(hKey5);\r
919 \r
920                                         AddHostToList(&Host, -1, Host.Level);\r
921                                 }\r
922                         }\r
923 \r
924                         ReadIntValueFromReg(hKey4, "CurSet", &Sets);\r
925                         SetCurrentHost(Sets);\r
926 \r
927                         // 暗号化通信対応\r
928                         ReadBinaryFromReg(hKey4, "CertCacheHash", &CertificateCacheHash, sizeof(CertificateCacheHash));\r
929 \r
930                         CloseSubKey(hKey4);\r
931                 }\r
932                 CloseReg(hKey3);\r
933         }\r
934         else\r
935         {\r
936                 /*===== 最初の起動時(設定が無い) =====*/\r
937 \r
938 #if 0\r
939                 strcpy(UserMailAdrs, "");\r
940                 strcpy(Str, "");\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
943 \r
944                 for(i = 0; i < SAMPLE_HOSTS; i++)\r
945                 {\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
953                 }\r
954 #endif\r
955         }\r
956         return(Sts);\r
957 }\r
958 \r
959 \r
960 /*----- 隠しドライブ情報を取得 ------------------------------------------------\r
961 *\r
962 *       Parameter\r
963 *               なし\r
964 *\r
965 *       Return Value\r
966 *               DWORD \r
967 *                       YES/NO=設定無し\r
968 *----------------------------------------------------------------------------*/\r
969 \r
970 DWORD LoadHideDriveListRegistory(void)\r
971 {\r
972         HKEY hKey1;\r
973         HKEY hKey2;\r
974         HKEY hKey3;\r
975         HKEY hKey4;\r
976         HKEY hKey5;\r
977         HKEY hKey6;\r
978         DWORD Size;\r
979         DWORD Type;\r
980         DWORD Ret;\r
981 \r
982         Ret = 0;\r
983         if(RegOpenKeyEx(HKEY_CURRENT_USER, "Software", 0, KEY_READ, &hKey1) == ERROR_SUCCESS)\r
984         {\r
985                 if(RegOpenKeyEx(hKey1, "Microsoft", 0, KEY_READ, &hKey2) == ERROR_SUCCESS)\r
986                 {\r
987                         if(RegOpenKeyEx(hKey2, "Windows", 0, KEY_READ, &hKey3) == ERROR_SUCCESS)\r
988                         {\r
989                                 if(RegOpenKeyEx(hKey3, "CurrentVersion", 0, KEY_READ, &hKey4) == ERROR_SUCCESS)\r
990                                 {\r
991                                         if(RegOpenKeyEx(hKey4, "Policies", 0, KEY_READ, &hKey5) == ERROR_SUCCESS)\r
992                                         {\r
993                                                 if(RegOpenKeyEx(hKey5, "Explorer", 0, KEY_READ, &hKey6) == ERROR_SUCCESS)\r
994                                                 {\r
995                                                         Size = sizeof(DWORD);\r
996                                                         RegQueryValueEx(hKey6, "NoDrives", NULL, &Type, (BYTE *)&Ret, &Size);\r
997                                                         RegCloseKey(hKey6);\r
998                                                 }\r
999                                                 RegCloseKey(hKey5);\r
1000                                         }\r
1001                                         RegCloseKey(hKey4);\r
1002                                 }\r
1003                                 RegCloseKey(hKey3);\r
1004                         }\r
1005                         RegCloseKey(hKey2);\r
1006                 }\r
1007                 RegCloseKey(hKey1);\r
1008         }\r
1009         return(Ret);\r
1010 }\r
1011 \r
1012 \r
1013 /*----- レジストリの設定値をクリア --------------------------------------------\r
1014 *\r
1015 *       Parameter\r
1016 *               なし\r
1017 *\r
1018 *       Return Value\r
1019 *               なし\r
1020 *----------------------------------------------------------------------------*/\r
1021 \r
1022 void ClearRegistory(void)\r
1023 {\r
1024         HKEY hKey2;\r
1025         HKEY hKey3;\r
1026         HKEY hKey4;\r
1027         DWORD Dispos;\r
1028         char Str[20];\r
1029         int i;\r
1030 \r
1031         if(RegCreateKeyEx(HKEY_CURRENT_USER, "Software\\Sota", 0, "", REG_OPTION_NON_VOLATILE, KEY_CREATE_SUB_KEY, NULL, &hKey2, &Dispos) == ERROR_SUCCESS)\r
1032         {\r
1033                 if(RegCreateKeyEx(hKey2, "FFFTP", 0, "", REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL, &hKey3, &Dispos) == ERROR_SUCCESS)\r
1034                 {\r
1035                         if(RegCreateKeyEx(hKey3, "Options", 0, "", REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL, &hKey4, &Dispos) == ERROR_SUCCESS)\r
1036                         {\r
1037                                 for(i = 0; ; i++)\r
1038                                 {\r
1039                                         sprintf(Str, "Host%d", i);\r
1040                                         if(RegDeleteKey(hKey4, Str) != ERROR_SUCCESS)\r
1041                                                 break;\r
1042                                 }\r
1043                                 for(i = 0; ; i++)\r
1044                                 {\r
1045                                         sprintf(Str, "History%d", i);\r
1046                                         if(RegDeleteKey(hKey4, Str) != ERROR_SUCCESS)\r
1047                                                 break;\r
1048                                 }\r
1049                                 RegCloseKey(hKey4);\r
1050                         }\r
1051                         RegDeleteKey(hKey3, "Options");\r
1052                         RegCloseKey(hKey3);\r
1053                 }\r
1054                 RegDeleteKey(hKey2, "FFFTP");\r
1055                 RegCloseKey(hKey2);\r
1056         }\r
1057         return;\r
1058 }\r
1059 \r
1060 \r
1061 /*----- 設定をファイルに保存 --------------------------------------------------\r
1062 *\r
1063 *       Parameter\r
1064 *               なし\r
1065 *\r
1066 *       Return Value\r
1067 *               なし\r
1068 *----------------------------------------------------------------------------*/\r
1069 \r
1070 void SaveSettingsToFile(void)\r
1071 {\r
1072         char Tmp[FMAX_PATH*2];\r
1073         char Fname[FMAX_PATH+1];\r
1074 \r
1075         if(RegType == REGTYPE_REG)\r
1076         {\r
1077                 strcpy(Fname, "FFFTP.reg");\r
1078                 if(SelectFile(GetMainHwnd(), Fname, MSGJPN286, MSGJPN287, "reg", OFN_EXTENSIONDIFFERENT | OFN_OVERWRITEPROMPT, 1) == TRUE)\r
1079                 {\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
1082                         {\r
1083                                 MessageBox(NULL, MSGJPN285, "FFFTP", MB_OK);\r
1084                         }\r
1085                 }\r
1086         }\r
1087         else\r
1088         {\r
1089                 strcpy(Fname, "FFFTP-Backup.ini");\r
1090                 if(SelectFile(GetMainHwnd(), Fname, MSGJPN286, MSGJPN288, "ini", OFN_EXTENSIONDIFFERENT | OFN_OVERWRITEPROMPT, 1) == TRUE)\r
1091                 {\r
1092                         CopyFile(AskIniFilePath(), Fname, FALSE);\r
1093                 }\r
1094         }\r
1095         return;\r
1096 }\r
1097 \r
1098 \r
1099 /*----- 設定をファイルから復元 ------------------------------------------------\r
1100 *\r
1101 *       Parameter\r
1102 *               なし\r
1103 *\r
1104 *       Return Value\r
1105 *               int     ロードしたかどうか (YES/NO)\r
1106 *----------------------------------------------------------------------------*/\r
1107 \r
1108 int LoadSettingsFromFile(void)\r
1109 {\r
1110         int Ret;\r
1111         char Tmp[FMAX_PATH*2];\r
1112         char Fname[FMAX_PATH+1];\r
1113 \r
1114         Ret = NO;\r
1115         strcpy(Fname, "");\r
1116         if(SelectFile(GetMainHwnd(), Fname, MSGJPN291, MSGJPN290, "", OFN_FILEMUSTEXIST, 0) == TRUE)\r
1117         {\r
1118                 if((strlen(Fname) >= 5) && (_stricmp(&Fname[strlen(Fname)-4], ".reg") == 0))\r
1119                 {\r
1120                         sprintf(Tmp, "\x22%s\x22", Fname);\r
1121                         if(ShellExecute(NULL, "open", "regedit", Tmp, ".", SW_SHOW) <= (HINSTANCE)32)\r
1122                         {\r
1123                                 MessageBox(NULL, MSGJPN285, "FFFTP", MB_OK);\r
1124                         }\r
1125                         else\r
1126                         {\r
1127                                 Ret = YES;\r
1128                                 /* レジストリエディタが終了するのを待つ */\r
1129 //                              WaitForSingleObject(Info.hProcess, INFINITE);\r
1130                         }\r
1131                 }\r
1132                 else if((strlen(Fname) >= 5) && (_stricmp(&Fname[strlen(Fname)-4], ".ini") == 0))\r
1133                 {\r
1134                         CopyFile(Fname, AskIniFilePath(), FALSE);\r
1135                         Ret = YES;\r
1136                 }\r
1137                 else\r
1138                         MessageBox(NULL, MSGJPN293, "FFFTP", MB_OK);\r
1139         }\r
1140         return(Ret);\r
1141 }\r
1142 \r
1143 \r
1144 \r
1145 \r
1146 /*----- レジストリ/INIファイルに文字列をセーブ --------------------------------\r
1147 *\r
1148 *       Parameter\r
1149 *               HKEY hKey : レジストリキー\r
1150 *               char *Key : キー名\r
1151 *               char *Str : セーブする文字列\r
1152 *               char *DefaultStr : デフォルトの文字列\r
1153 *\r
1154 *       Return Value\r
1155 *               なし\r
1156 *\r
1157 *       Note\r
1158 *               文字列がデフォルトの文字列と同じならセーブしない\r
1159 *----------------------------------------------------------------------------*/\r
1160 \r
1161 static void SaveStr(HKEY hKey, char *Key, char *Str, char *DefaultStr)\r
1162 {\r
1163         if((DefaultStr != NULL) && (strcmp(Str, DefaultStr) == 0))\r
1164                 DeleteValue(hKey, Key);\r
1165         else\r
1166                 WriteStringToReg(hKey, Key, Str);\r
1167 \r
1168         return;\r
1169 }\r
1170 \r
1171 \r
1172 /*----- レジストリ/INIファイルに数値(INT)をセーブ -----------------------------\r
1173 *\r
1174 *       Parameter\r
1175 *               HKEY hKey : レジストリキー\r
1176 *               char *Key : キー名\r
1177 *               int Num : セーブする値\r
1178 *               int DefaultNum : デフォルトの値\r
1179 *\r
1180 *       Return Value\r
1181 *               なし\r
1182 *\r
1183 *       Note\r
1184 *               数値がデフォルトの値と同じならセーブしない\r
1185 *----------------------------------------------------------------------------*/\r
1186 \r
1187 static void SaveIntNum(HKEY hKey, char *Key, int Num, int DefaultNum)\r
1188 {\r
1189         if(Num == DefaultNum)\r
1190                 DeleteValue(hKey, Key);\r
1191         else\r
1192                 WriteIntValueToReg(hKey, Key, Num);\r
1193 \r
1194         return;\r
1195 }\r
1196 \r
1197 \r
1198 /*----- LOGFONTデータを文字列に変換する ---------------------------------------\r
1199 *\r
1200 *       Parameter\r
1201 *               LOGFONT Font : フォントデータ\r
1202 *               HFONT hFont : フォントのハンドル\r
1203 *                       NULL = デフォルトのフォント\r
1204 *               char *Buf : バッファ\r
1205 *\r
1206 *       Return Value\r
1207 *               なし\r
1208 *----------------------------------------------------------------------------*/\r
1209 \r
1210 static void MakeFontData(LOGFONT Font, HFONT hFont, char *Buf)\r
1211 {\r
1212         *Buf = NUL;\r
1213         if(hFont != NULL)\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
1219         return;\r
1220 }\r
1221 \r
1222 \r
1223 /*----- 文字列をLOGFONTデータに変換する ---------------------------------------\r
1224 *\r
1225 *       Parameter\r
1226 *               char *Str : 文字列\r
1227 *               LOGFONT *Font : フォントデータ\r
1228 *\r
1229 *       Return Value\r
1230 *               int ステータス\r
1231 *                       FFFTP_SUCCESS/FFFTP_FAIL=変換できない\r
1232 *----------------------------------------------------------------------------*/\r
1233 \r
1234 static int RestoreFontData(char *Str, LOGFONT *Font)\r
1235 {\r
1236         int i;\r
1237         int Sts;\r
1238 \r
1239         Sts = FFFTP_FAIL;\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
1245         {\r
1246                 for(i = 13; i > 0; i--)\r
1247                 {\r
1248                         if((Str = strchr(Str, ' ')) == NULL)\r
1249                                 break;\r
1250                         Str++;\r
1251                 }\r
1252                 if(i == 0)\r
1253                 {\r
1254                         strcpy(Font->lfFaceName, Str);\r
1255                         Sts = FFFTP_SUCCESS;\r
1256                 }\r
1257         }\r
1258 \r
1259         if(Sts == FFFTP_FAIL)\r
1260                 memset(Font, NUL, sizeof(LOGFONT));\r
1261 \r
1262         return(Sts);\r
1263 }\r
1264 \r
1265 /*----- パスワードを暗号化する ------------------------------------------------\r
1266 *\r
1267 *       Parameter\r
1268 *               char *Str : パスワード\r
1269 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1270 *\r
1271 *       Return Value\r
1272 *               なし\r
1273 *----------------------------------------------------------------------------*/\r
1274 static void EncodePassword(char *Str, char *Buf)\r
1275 {\r
1276         EncodePassword3( Str, Buf, SecretKey );\r
1277 }\r
1278 \r
1279 /*----- パスワードを暗号化する(オリジナルアルゴリズム)  ------------------\r
1280 *\r
1281 *       Parameter\r
1282 *               char *Str : パスワード\r
1283 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1284 *\r
1285 *       Return Value\r
1286 *               なし\r
1287 *----------------------------------------------------------------------------*/\r
1288 \r
1289 static void EncodePasswordOriginal(char *Str, char *Buf)\r
1290 {\r
1291         unsigned char *Get;\r
1292         unsigned char *Put;\r
1293         int Rnd;\r
1294         int Ch;\r
1295 \r
1296         srand((unsigned)time(NULL));\r
1297 \r
1298         Get = (unsigned char *)Str;\r
1299         Put = (unsigned char *)Buf;\r
1300         \r
1301         if( *Get == NUL ){\r
1302                 *Put = NUL;\r
1303                 return;\r
1304         }\r
1305 \r
1306         /* 識別子を先頭に置く */\r
1307         Put[0] = '0';\r
1308         Put[1] = 'A';\r
1309         Put += 2;\r
1310 \r
1311         while(*Get != NUL)\r
1312         {\r
1313                 Rnd = rand() % 3;\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
1320         }\r
1321         *Put = NUL;\r
1322         return;\r
1323 }\r
1324 \r
1325 /*----- パスワードを暗号化する(オリジナルアルゴリズム^Key)  ----------------\r
1326 *\r
1327 *       Parameter\r
1328 *               char *Str : パスワード\r
1329 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1330 *               const char *Key : 暗号化キー\r
1331 *\r
1332 *       Return Value\r
1333 *               なし\r
1334 *----------------------------------------------------------------------------*/\r
1335 \r
1336 static void EncodePassword2(char *Str, char *Buf, const char* Key)\r
1337 {\r
1338         unsigned char *Get;\r
1339         unsigned char *Put;\r
1340         int Rnd;\r
1341         int Ch;\r
1342 \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
1347 \r
1348         srand((unsigned)time(NULL));\r
1349 \r
1350         Get = (unsigned char *)Str;\r
1351         Put = (unsigned char *)Buf;\r
1352         \r
1353         if( *Get == NUL ){\r
1354                 *Put = NUL;\r
1355                 return;\r
1356         }\r
1357 \r
1358         /* 識別子を先頭に置く */\r
1359         Put[0] = '0';\r
1360         Put[1] = 'B';\r
1361         Put += 2;\r
1362 \r
1363         while(*Get != NUL)\r
1364         {\r
1365                 Rnd = rand() % 3;\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
1372 \r
1373                 /* 2010.01.31 genta Key */\r
1374                 if( ++KeyCurrent == KeyEnd ){\r
1375                         KeyCurrent = KeyHead;\r
1376                 }\r
1377         }\r
1378         *Put = NUL;\r
1379         return;\r
1380 }\r
1381 \r
1382 /*----- パスワードを暗号化する(AES) ------------------------------------------\r
1383 *\r
1384 *       Parameter\r
1385 *               char *Str : パスワード\r
1386 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1387 *               const char *Key : 暗号化キー\r
1388 *\r
1389 *       Return Value\r
1390 *               なし\r
1391 *----------------------------------------------------------------------------*/\r
1392 \r
1393 static void EncodePassword3(char *Str, char *Buf, const char *Key)\r
1394 {\r
1395         unsigned char *Put;\r
1396         unsigned char *AesEncBuf;\r
1397         unsigned char *StrPadBuf;\r
1398         size_t StrLen;\r
1399         size_t StrPadLen;\r
1400         size_t StrPadIndex;\r
1401         size_t IvIndex;\r
1402         size_t EncBufIndex;\r
1403         DWORD RandValue;\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
1408 \r
1409         Buf[0] = NUL;\r
1410 \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
1414 \r
1415         /* 最低長を32文字とする */\r
1416 //      StrPadLen = min1(StrPadLen, AES_BLOCK_SIZE * 2);\r
1417         StrPadLen = max1(StrPadLen, AES_BLOCK_SIZE * 2);\r
1418 \r
1419         if((StrPadBuf = malloc(StrPadLen)) != NULL)\r
1420         {\r
1421                 if((AesEncBuf = malloc(StrPadLen)) != NULL)\r
1422                 {\r
1423                         BOOL PutState;\r
1424 \r
1425                         PutState = FALSE;\r
1426                         strncpy(StrPadBuf, Str, StrPadLen);\r
1427                         \r
1428                         /* PAD部分を乱数で埋める StrPad[StrLen](が有効な場合) は NUL */\r
1429                         for(StrPadIndex = StrLen + 1; StrPadIndex < StrPadLen;)\r
1430                         {\r
1431                                 RandValue = GetRandamDWRODValue();\r
1432                                 for(RandByteCount = 0; RandByteCount < 4; RandByteCount++)\r
1433                                 {\r
1434                                         if(StrPadIndex < StrPadLen)\r
1435                                         {\r
1436                                                 StrPadBuf[StrPadIndex++] = (unsigned char)(RandValue & 0xff);\r
1437                                                 RandValue >>= 8;\r
1438                                         }\r
1439                                 }\r
1440                         }\r
1441                         \r
1442                         // IVの初期化\r
1443                         for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE;)\r
1444                         {\r
1445                                 RandValue = GetRandamDWRODValue();\r
1446                                 for(RandByteCount = 0; RandByteCount < 4; RandByteCount++)\r
1447                                 {\r
1448                                         if(IvIndex < AES_BLOCK_SIZE)\r
1449                                         {\r
1450                                                 AesCbcIv[IvIndex++] = (unsigned char)(RandValue & 0xff);\r
1451                                                 RandValue >>= 8;\r
1452                                         }\r
1453                                 }\r
1454                         }\r
1455                         Put[0] = '0';\r
1456                         Put[1] = 'C';\r
1457                         Put += 2;\r
1458                         for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE; IvIndex++)\r
1459                         {\r
1460                                 sprintf(Put, "%02x", AesCbcIv[IvIndex]);\r
1461                                 Put += 2;\r
1462                         }\r
1463                         *Put++ = ':';\r
1464 \r
1465                         if(CreateAesKey(AesKey, Key) == FFFTP_SUCCESS)\r
1466                         {\r
1467                                 aes_encrypt_key(AesKey, 32, &Ctx);\r
1468 \r
1469                                 if(aes_cbc_encrypt(StrPadBuf, AesEncBuf, StrPadLen, AesCbcIv, &Ctx) == EXIT_SUCCESS)\r
1470                                 {\r
1471                                         for(EncBufIndex = 0; EncBufIndex < StrPadLen; EncBufIndex++)\r
1472                                         {\r
1473                                                 sprintf(Put, "%02x", AesEncBuf[EncBufIndex]);\r
1474                                                 Put += 2;\r
1475                                         }\r
1476                                         *Put = NUL;\r
1477                                         PutState = TRUE;\r
1478                                 }\r
1479                         }\r
1480                         if(FALSE == PutState)\r
1481                         {\r
1482                                 Buf[0] = NUL;\r
1483                         }\r
1484                         free(StrPadBuf);\r
1485                 }\r
1486                 free(AesEncBuf);\r
1487         }\r
1488         return;\r
1489 }\r
1490 \r
1491 \r
1492 /*----- パスワードの暗号化を解く ----------------------------------------------\r
1493 *\r
1494 *       Parameter\r
1495 *               char *Str : 暗号化したパスワード\r
1496 *               char *Buf : パスワードを格納するバッファ\r
1497 *\r
1498 *       Return Value\r
1499 *               なし\r
1500 *----------------------------------------------------------------------------*/\r
1501 \r
1502 static void DecodePassword(char *Str, char *Buf)\r
1503 {\r
1504         unsigned char *Get;\r
1505         unsigned char *Put;\r
1506 \r
1507         Get = (unsigned char *)Str;\r
1508         Put = (unsigned char *)Buf;\r
1509         \r
1510         if( *Get == NUL ){\r
1511                 *Put = NUL;\r
1512         }\r
1513         else if( 0x40 <= *Get && *Get < 0x80 ){\r
1514                 /* Original algorithm */\r
1515                 DecodePasswordOriginal( Str, Buf );\r
1516         }\r
1517         else if( strncmp( Get, "0A", 2 ) == 0 ){\r
1518                 DecodePasswordOriginal( Str + 2, Buf );\r
1519         }\r
1520         else if( strncmp( Get, "0B", 2 ) == 0 ){\r
1521                 DecodePassword2( Str + 2, Buf, SecretKey );\r
1522         }\r
1523         else if( strncmp( Get, "0C", 2 ) == 0 ){\r
1524                 DecodePassword3( Str + 2, Buf, SecretKey );\r
1525         }\r
1526         else {\r
1527                 //      unknown encoding\r
1528                 *Put = NUL;\r
1529                 return;\r
1530         }\r
1531 }\r
1532 \r
1533 /*----- パスワードの暗号化を解く(オリジナルアルゴリズム) -------------------\r
1534 *\r
1535 *       Parameter\r
1536 *               char *Str : 暗号化したパスワード\r
1537 *               char *Buf : パスワードを格納するバッファ\r
1538 *\r
1539 *       Return Value\r
1540 *               なし\r
1541 *----------------------------------------------------------------------------*/\r
1542 static void DecodePasswordOriginal(char *Str, char *Buf)\r
1543 {\r
1544         unsigned char *Get;\r
1545         unsigned char *Put;\r
1546         int Rnd;\r
1547         int Ch;\r
1548 \r
1549         Get = (unsigned char *)Str;\r
1550         Put = (unsigned char *)Buf;\r
1551 \r
1552         while(*Get != NUL)\r
1553         {\r
1554                 Rnd = ((unsigned int)*Get >> 4) & 0x3;\r
1555                 Ch = (*Get & 0xF) | ((*(Get+1) & 0xF) << 4);\r
1556                 Ch <<= 8;\r
1557                 if((*Get & 0x1) != 0)\r
1558                         Get++;\r
1559                 Get += 2;\r
1560                 Ch >>= Rnd;\r
1561                 Ch = (Ch & 0xFF) | ((Ch >> 8) & 0xFF);\r
1562                 *Put++ = Ch;\r
1563         }\r
1564         *Put = NUL;\r
1565         return;\r
1566 }\r
1567 \r
1568 /*----- パスワードの暗号化を解く(オリジナルアルゴリズム^Key) -------------------\r
1569 *\r
1570 *       Parameter\r
1571 *               char *Str : 暗号化したパスワード\r
1572 *               char *Buf : パスワードを格納するバッファ\r
1573 *               const char *Key : 暗号化キー\r
1574 *\r
1575 *       Return Value\r
1576 *               なし\r
1577 *----------------------------------------------------------------------------*/\r
1578 static void DecodePassword2(char *Str, char *Buf, const char* Key)\r
1579 {\r
1580         int Rnd;\r
1581         int Ch;\r
1582         unsigned char *Get = (unsigned char *)Str;\r
1583         unsigned char *Put = (unsigned char *)Buf;\r
1584 \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
1589 \r
1590         while(*Get != NUL)\r
1591         {\r
1592                 Rnd = ((unsigned int)*Get >> 4) & 0x3;\r
1593                 Ch = (*Get & 0xF) | ((*(Get+1) & 0xF) << 4);\r
1594                 Ch <<= 8;\r
1595                 if((*Get & 0x1) != 0)\r
1596                         Get++;\r
1597                 Get += 2;\r
1598                 Ch >>= Rnd;\r
1599                 Ch = (Ch & 0xFF) | ((Ch >> 8) & 0xFF);\r
1600                 *Put++ = Ch ^ *KeyCurrent;\r
1601                 \r
1602                 /* 2010.01.31 genta Key */\r
1603                 if( ++KeyCurrent == KeyEnd ){\r
1604                         KeyCurrent = KeyHead;\r
1605                 }\r
1606         }\r
1607         *Put = NUL;\r
1608         return;\r
1609 }\r
1610 \r
1611 /*----- パスワードの暗号化を解く(AES) ---------------------------------------\r
1612 *\r
1613 *       Parameter\r
1614 *               char *Str : 暗号化したパスワード\r
1615 *               char *Buf : パスワードを格納するバッファ\r
1616 *               const char *Key : 暗号化キー\r
1617 *\r
1618 *       Return Value\r
1619 *               なし\r
1620 *----------------------------------------------------------------------------*/\r
1621 \r
1622 static void DecodePassword3(char *Str, char *Buf, const char *Key)\r
1623 {\r
1624         char *Get;\r
1625         unsigned char *EncBuf;\r
1626         size_t StrLen;\r
1627         size_t IvIndex;\r
1628         size_t EncBufIndex;\r
1629         size_t EncBufLen;\r
1630         unsigned char AesKey[32];\r
1631         unsigned char AesCbcIv[AES_BLOCK_SIZE];\r
1632         aes_decrypt_ctx Ctx;\r
1633 \r
1634         Buf[0] = NUL;\r
1635 \r
1636         Get = Str;\r
1637         StrLen = strlen(Str);\r
1638 \r
1639         if(AES_BLOCK_SIZE * 2 + 1 < StrLen)\r
1640         {\r
1641 \r
1642                 EncBufLen = (StrLen - 1 ) / 2 - AES_BLOCK_SIZE;\r
1643                 if((EncBuf = malloc(EncBufLen)) != NULL)\r
1644                 {\r
1645                         for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE; IvIndex++)\r
1646                         {\r
1647                                 AesCbcIv[IvIndex]  = hex2bin(*Get++) << 4;\r
1648                                 AesCbcIv[IvIndex] |= hex2bin(*Get++);\r
1649                         }\r
1650 \r
1651                         if(*Get++ == ':')\r
1652                         {\r
1653                                 if(CreateAesKey(AesKey, Key) == FFFTP_SUCCESS)\r
1654                                 {\r
1655                                         aes_decrypt_key(AesKey, 32, &Ctx);\r
1656 \r
1657                                         for(EncBufIndex = 0; EncBufIndex < EncBufLen; EncBufIndex++)\r
1658                                         {\r
1659                                                 EncBuf[EncBufIndex]  = hex2bin(*Get++) << 4;\r
1660                                                 EncBuf[EncBufIndex] |= hex2bin(*Get++);\r
1661                                         }\r
1662                                         if(aes_cbc_decrypt(EncBuf, Buf, EncBufLen, AesCbcIv, &Ctx) == EXIT_SUCCESS)\r
1663                                         {\r
1664                                                 Buf[EncBufLen] = NUL;\r
1665                                         }\r
1666                                 }\r
1667                         }\r
1668                         free(EncBuf);\r
1669                 }\r
1670         }\r
1671         return;\r
1672 }\r
1673 \r
1674 /*----- AES用固定長キーを作成 ----------------------------------------------\r
1675 *\r
1676 *       Parameter\r
1677 *               unsigned char *AesKey : AES暗号鍵\r
1678 *               const char *Key : 暗号化キー\r
1679 *\r
1680 *       Return Value\r
1681 *               int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)\r
1682 *       Note\r
1683 *               SHA-1をもちいて32Byte鍵を生成する\r
1684 *----------------------------------------------------------------------------*/\r
1685 \r
1686 static int CreateAesKey(unsigned char *AesKey, const char* Key)\r
1687 {\r
1688         char* HashKey;\r
1689         uint32 HashKeyLen;\r
1690         uint32 results[10];\r
1691         int ByteOffset;\r
1692         int KeyIndex;\r
1693         int ResIndex;\r
1694 \r
1695         HashKeyLen = strlen(Key) + 16;\r
1696         if((HashKey = malloc(HashKeyLen + 1)) == NULL){\r
1697                 return (FFFTP_FAIL);\r
1698         }\r
1699 \r
1700         strcpy(HashKey, Key);\r
1701         strcat(HashKey, ">g^r=@N7=//z<[`:");\r
1702     sha_memory((uchar *)HashKey, HashKeyLen, results);\r
1703 \r
1704         strcpy(HashKey, Key);\r
1705         strcat(HashKey, "VG77dO1#EyC]$|C@");\r
1706     sha_memory((uchar *)HashKey, HashKeyLen, results + 5);\r
1707 \r
1708         KeyIndex = 0;\r
1709         ResIndex = 0;\r
1710         while(ResIndex < 8){\r
1711                 for(ByteOffset = 0; ByteOffset < 4; ByteOffset++){\r
1712                         AesKey[KeyIndex++] = (results[ResIndex] >> ByteOffset * 8) & 0xff;\r
1713                 }\r
1714                 ResIndex++;\r
1715         }\r
1716         free(HashKey);\r
1717 \r
1718         return (FFFTP_SUCCESS);\r
1719 }\r
1720 \r
1721 \r
1722 /*===== レジストリとINIファイルのアクセス処理 ============*/\r
1723 \r
1724 \r
1725 /*===== INIファイル用のレジストリデータ =====*/\r
1726 \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
1733 } REGDATATBL;\r
1734 \r
1735 /*===== プロトタイプ =====*/\r
1736 \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
1742 \r
1743 \r
1744 /*===== ローカルなワーク =====*/\r
1745 \r
1746 static int TmpRegType;\r
1747 \r
1748 \r
1749 \r
1750 /*----- レジストリのタイプを設定する ------------------------------------------\r
1751 *\r
1752 *       Parameter\r
1753 *               int Type : タイプ (REGTYPE_xxx)\r
1754 *\r
1755 *       Return Value\r
1756 *               int ステータス\r
1757 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1758 *----------------------------------------------------------------------------*/\r
1759 \r
1760 static void SetRegType(int Type)\r
1761 {\r
1762         TmpRegType = Type;\r
1763         return;\r
1764 }\r
1765 \r
1766 \r
1767 /*----- レジストリ/INIファイルをオープンする(読み込み)-----------------------\r
1768 *\r
1769 *       Parameter\r
1770 *               char *Name : レジストリ名\r
1771 *               void **Handle : ハンドルを返すワーク\r
1772 *\r
1773 *       Return Value\r
1774 *               int ステータス\r
1775 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1776 *----------------------------------------------------------------------------*/\r
1777 \r
1778 static int OpenReg(char *Name, void **Handle)\r
1779 {\r
1780         int Sts;\r
1781         char Tmp[FMAX_PATH+1];\r
1782 \r
1783         Sts = FFFTP_FAIL;\r
1784         if(TmpRegType == REGTYPE_REG)\r
1785         {\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
1790         }\r
1791         else\r
1792         {\r
1793                 if((Sts = ReadInReg(Name, (REGDATATBL **)Handle)) == FFFTP_SUCCESS)\r
1794                         ((REGDATATBL *)(*Handle))->Mode = 0;\r
1795         }\r
1796         return(Sts);\r
1797 }\r
1798 \r
1799 \r
1800 /*----- レジストリ/INIファイルを作成する(書き込み)---------------------------\r
1801 *\r
1802 *       Parameter\r
1803 *               char *Name : レジストリ名\r
1804 *               void **Handle : ハンドルを返すワーク\r
1805 *\r
1806 *       Return Value\r
1807 *               int ステータス\r
1808 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1809 *----------------------------------------------------------------------------*/\r
1810 \r
1811 static int CreateReg(char *Name, void **Handle)\r
1812 {\r
1813         int Sts;\r
1814         char Tmp[FMAX_PATH+1];\r
1815         DWORD Dispos;\r
1816 \r
1817         Sts = FFFTP_FAIL;\r
1818         if(TmpRegType == REGTYPE_REG)\r
1819         {\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
1824         }\r
1825         else\r
1826         {\r
1827                 if((*Handle = malloc(sizeof(REGDATATBL))) != NULL)\r
1828                 {\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
1834                 }\r
1835         }\r
1836         return(Sts);\r
1837 }\r
1838 \r
1839 \r
1840 /*----- レジストリ/INIファイルをクローズする ----------------------------------\r
1841 *\r
1842 *       Parameter\r
1843 *               void *Handle : ハンドル\r
1844 *\r
1845 *       Return Value\r
1846 *               int ステータス\r
1847 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1848 *----------------------------------------------------------------------------*/\r
1849 \r
1850 static int CloseReg(void *Handle)\r
1851 {\r
1852         REGDATATBL *Pos;\r
1853         REGDATATBL *Next;\r
1854         FILE *Strm;\r
1855 \r
1856         if(TmpRegType == REGTYPE_REG)\r
1857         {\r
1858                 RegCloseKey(Handle);\r
1859 \r
1860                 /* INIファイルを削除 */\r
1861                 if((Strm = fopen(AskIniFilePath(), "rt")) != NULL)\r
1862                 {\r
1863                         fclose(Strm);\r
1864                         MoveFileToTrashCan(AskIniFilePath());\r
1865                 }\r
1866         }\r
1867         else\r
1868         {\r
1869                 if(((REGDATATBL *)Handle)->Mode == 1)\r
1870                 {\r
1871                         if(WriteOutRegToFile(Handle) == TRUE)\r
1872                         {\r
1873 //                              /* レジストリをクリア */\r
1874 //                              ClearRegistory();\r
1875                         }\r
1876                 }\r
1877                 /* テーブルを削除 */\r
1878                 Pos = Handle;\r
1879                 while(Pos != NULL)\r
1880                 {\r
1881                         Next = Pos->Next;\r
1882                         free(Pos);\r
1883                         Pos = Next;\r
1884                 }\r
1885         }\r
1886         return(FFFTP_SUCCESS);\r
1887 }\r
1888 \r
1889 \r
1890 /*----- レジストリ情報をINIファイルに書き込む ---------------------------------\r
1891 *\r
1892 *       Parameter\r
1893 *               REGDATATBL *Pos : レジストリデータ\r
1894 *\r
1895 *       Return Value\r
1896 *               なし\r
1897 *----------------------------------------------------------------------------*/\r
1898 \r
1899 static BOOL WriteOutRegToFile(REGDATATBL *Pos)\r
1900 {\r
1901         FILE *Strm;\r
1902         char *Disp;\r
1903         BOOL Ret;\r
1904 \r
1905         Ret = FALSE;\r
1906         if((Strm = fopen(AskIniFilePath(), "wt")) != NULL)\r
1907         {\r
1908                 fprintf(Strm, MSGJPN239);\r
1909                 while(Pos != NULL)\r
1910                 {\r
1911                         fprintf(Strm, "\n[%s]\n", Pos->KeyName);\r
1912 \r
1913                         Disp = Pos->ValTbl;\r
1914                         while(Disp < (Pos->ValTbl + Pos->ValLen))\r
1915                         {\r
1916                                 fprintf(Strm, "%s\n", Disp);\r
1917                                 Disp = Disp + strlen(Disp) + 1;\r
1918                         }\r
1919                         Pos = Pos->Next;\r
1920                 }\r
1921                 fclose(Strm);\r
1922                 Ret = TRUE;\r
1923         }\r
1924         else\r
1925                 MessageBox(NULL, MSGJPN240, "FFFTP", MB_OK);\r
1926 \r
1927         return(Ret);\r
1928 }\r
1929 \r
1930 \r
1931 /*----- INIファイルからレジストリ情報を読み込む -------------------------------\r
1932 *\r
1933 *       Parameter\r
1934 *               char *Name : 名前\r
1935 *               void *Handle : ハンドル\r
1936 *\r
1937 *       Return Value\r
1938 *               int ステータス\r
1939 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1940 *----------------------------------------------------------------------------*/\r
1941 \r
1942 static int ReadInReg(char *Name, REGDATATBL **Handle)\r
1943 {\r
1944         FILE *Strm;\r
1945         char *Buf;\r
1946         char *Tmp;\r
1947         char *Data;\r
1948         REGDATATBL *New;\r
1949         REGDATATBL *Pos;\r
1950         int Sts;\r
1951 \r
1952         Sts = FFFTP_FAIL;\r
1953         *Handle = NULL;\r
1954 \r
1955         if((Strm = fopen(AskIniFilePath(), "rt")) != NULL)\r
1956         {\r
1957                 if((Buf = malloc(REG_SECT_MAX)) != NULL)\r
1958                 {\r
1959                         while(fgets(Buf, REG_SECT_MAX, Strm) != NULL)\r
1960                         {\r
1961                                 if(*Buf != '#')\r
1962                                 {\r
1963                                         if((Tmp = strchr(Buf, '\n')) != NULL)\r
1964                                                 *Tmp = NUL;\r
1965 \r
1966                                         if(*Buf == '[')\r
1967                                         {\r
1968                                                 if((New = malloc(sizeof(REGDATATBL))) != NULL)\r
1969                                                 {\r
1970                                                         if((Tmp = strchr(Buf, ']')) != NULL)\r
1971                                                                 *Tmp = NUL;\r
1972                                                         strcpy(New->KeyName, Buf+1);\r
1973                                                         New->ValLen = 0;\r
1974                                                         New->Next = NULL;\r
1975                                                         Data = New->ValTbl;\r
1976                                                 }\r
1977                                                 if(*Handle == NULL)\r
1978                                                         *Handle = New;\r
1979                                                 else\r
1980                                                 {\r
1981                                                         Pos = *Handle;\r
1982                                                         while(Pos->Next != NULL)\r
1983                                                                 Pos = Pos->Next;\r
1984                                                         Pos->Next = New;\r
1985                                                 }\r
1986                                         }\r
1987                                         else if(strlen(Buf) > 0)\r
1988                                         {\r
1989                                                 strcpy(Data, Buf);\r
1990                                                 Data += strlen(Buf) + 1;\r
1991                                                 New->ValLen += strlen(Buf) + 1;\r
1992                                         }\r
1993                                 }\r
1994                         }\r
1995                         Sts = FFFTP_SUCCESS;\r
1996                         free(Buf);\r
1997                 }\r
1998                 fclose(Strm);\r
1999         }\r
2000         return(Sts);\r
2001 }\r
2002 \r
2003 \r
2004 /*----- サブキーをオープンする ------------------------------------------------\r
2005 *\r
2006 *       Parameter\r
2007 *               void *Parent : 親のハンドル\r
2008 *               char *Name : 名前\r
2009 *               void **Handle : ハンドルを返すワーク\r
2010 *\r
2011 *       Return Value\r
2012 *               int ステータス\r
2013 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2014 *----------------------------------------------------------------------------*/\r
2015 \r
2016 static int OpenSubKey(void *Parent, char *Name, void **Handle)\r
2017 {\r
2018         int Sts;\r
2019         char Key[80];\r
2020         REGDATATBL *Pos;\r
2021 \r
2022         Sts = FFFTP_FAIL;\r
2023         if(TmpRegType == REGTYPE_REG)\r
2024         {\r
2025                 if(RegOpenKeyEx(Parent, Name, 0, KEY_READ, (HKEY *)Handle) == ERROR_SUCCESS)\r
2026                         Sts = FFFTP_SUCCESS;\r
2027         }\r
2028         else\r
2029         {\r
2030                 strcpy(Key, ((REGDATATBL *)Parent)->KeyName);\r
2031                 strcat(Key, "\\");\r
2032                 strcat(Key, Name);\r
2033                 Pos = Parent;\r
2034                 while(Pos != NULL)\r
2035                 {\r
2036                         if(strcmp(Pos->KeyName, Key) == 0)\r
2037                         {\r
2038                                 *Handle = Pos;\r
2039                                 Sts = FFFTP_SUCCESS;\r
2040                                 break;\r
2041                         }\r
2042                         Pos = Pos->Next;\r
2043                 }\r
2044         }\r
2045         return(Sts);\r
2046 }\r
2047 \r
2048 \r
2049 /*----- サブキーを作成する ----------------------------------------------------\r
2050 *\r
2051 *       Parameter\r
2052 *               void *Parent : 親のハンドル\r
2053 *               char *Name : 名前\r
2054 *               void **Handle : ハンドルを返すワーク\r
2055 *\r
2056 *       Return Value\r
2057 *               int ステータス\r
2058 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2059 *----------------------------------------------------------------------------*/\r
2060 \r
2061 static int CreateSubKey(void *Parent, char *Name, void **Handle)\r
2062 {\r
2063         int Sts;\r
2064         DWORD Dispos;\r
2065         REGDATATBL *Pos;\r
2066 \r
2067         Sts = FFFTP_FAIL;\r
2068         if(TmpRegType == REGTYPE_REG)\r
2069         {\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
2072         }\r
2073         else\r
2074         {\r
2075                 if((*Handle = malloc(sizeof(REGDATATBL))) != NULL)\r
2076                 {\r
2077                         strcpy(((REGDATATBL *)(*Handle))->KeyName, ((REGDATATBL *)Parent)->KeyName);\r
2078                         strcat(((REGDATATBL *)(*Handle))->KeyName, "\\");\r
2079                         strcat(((REGDATATBL *)(*Handle))->KeyName, Name);\r
2080 \r
2081                         ((REGDATATBL *)(*Handle))->ValLen = 0;\r
2082                         ((REGDATATBL *)(*Handle))->Next = NULL;\r
2083 \r
2084                         Pos = (REGDATATBL *)Parent;\r
2085                         while(Pos->Next != NULL)\r
2086                                 Pos = Pos->Next;\r
2087                         Pos->Next = *Handle;\r
2088                         Sts = FFFTP_SUCCESS;\r
2089                 }\r
2090         }\r
2091         return(Sts);\r
2092 }\r
2093 \r
2094 \r
2095 /*----- サブキーをクローズする ------------------------------------------------\r
2096 *\r
2097 *       Parameter\r
2098 *               void *Handle : ハンドル\r
2099 *\r
2100 *       Return Value\r
2101 *               int ステータス\r
2102 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2103 *----------------------------------------------------------------------------*/\r
2104 \r
2105 static int CloseSubKey(void *Handle)\r
2106 {\r
2107         if(TmpRegType == REGTYPE_REG)\r
2108                 RegCloseKey(Handle);\r
2109         else\r
2110         {\r
2111                 /* Nothing */\r
2112         }\r
2113         return(FFFTP_SUCCESS);\r
2114 }\r
2115 \r
2116 \r
2117 /*----- サブキーを削除する ----------------------------------------------------\r
2118 *\r
2119 *       Parameter\r
2120 *               void *Handle : ハンドル\r
2121 *               char *Name : 名前\r
2122 *\r
2123 *       Return Value\r
2124 *               int ステータス\r
2125 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2126 *----------------------------------------------------------------------------*/\r
2127 \r
2128 static int DeleteSubKey(void *Handle, char *Name)\r
2129 {\r
2130         int Sts;\r
2131 \r
2132         Sts = FFFTP_FAIL;\r
2133         if(TmpRegType == REGTYPE_REG)\r
2134         {\r
2135                 if(RegDeleteKey(Handle, Name) == ERROR_SUCCESS)\r
2136                         Sts = FFFTP_SUCCESS;\r
2137         }\r
2138         else\r
2139         {\r
2140                 Sts = FFFTP_FAIL;\r
2141         }\r
2142         return(Sts);\r
2143 }\r
2144 \r
2145 \r
2146 /*----- 値を削除する ----------------------------------------------------------\r
2147 *\r
2148 *       Parameter\r
2149 *               void *Handle : ハンドル\r
2150 *               char *Name : 名前\r
2151 *\r
2152 *       Return Value\r
2153 *               int ステータス\r
2154 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2155 *----------------------------------------------------------------------------*/\r
2156 \r
2157 static int DeleteValue(void *Handle, char *Name)\r
2158 {\r
2159         int Sts;\r
2160 \r
2161         Sts = FFFTP_FAIL;\r
2162         if(TmpRegType == REGTYPE_REG)\r
2163         {\r
2164                 if(RegDeleteValue(Handle, Name) == ERROR_SUCCESS)\r
2165                         Sts = FFFTP_SUCCESS;\r
2166         }\r
2167         else\r
2168         {\r
2169                 Sts = FFFTP_FAIL;\r
2170         }\r
2171         return(Sts);\r
2172 }\r
2173 \r
2174 \r
2175 /*----- INT値を読み込む -------------------------------------------------------\r
2176 *\r
2177 *       Parameter\r
2178 *               void *Handle : ハンドル\r
2179 *               char *Name : 名前\r
2180 *               int *Value : INT値を返すワーク\r
2181 *\r
2182 *       Return Value\r
2183 *               int ステータス\r
2184 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2185 *----------------------------------------------------------------------------*/\r
2186 \r
2187 static int ReadIntValueFromReg(void *Handle, char *Name, int *Value)\r
2188 {\r
2189         int Sts;\r
2190         DWORD Size;\r
2191         char *Pos;\r
2192 \r
2193         Sts = FFFTP_FAIL;\r
2194         if(TmpRegType == REGTYPE_REG)\r
2195         {\r
2196                 Size = sizeof(int);\r
2197                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Value, &Size) == ERROR_SUCCESS)\r
2198                         Sts = FFFTP_SUCCESS;\r
2199         }\r
2200         else\r
2201         {\r
2202                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2203                 {\r
2204                         *Value = atoi(Pos);\r
2205                         Sts = FFFTP_SUCCESS;\r
2206                 }\r
2207         }\r
2208         return(Sts);\r
2209 }\r
2210 \r
2211 \r
2212 /*----- INT値を書き込む -------------------------------------------------------\r
2213 *\r
2214 *       Parameter\r
2215 *               void *Handle : ハンドル\r
2216 *               char *Name : 名前\r
2217 *               int Value : INT値\r
2218 *\r
2219 *       Return Value\r
2220 *               int ステータス\r
2221 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2222 *----------------------------------------------------------------------------*/\r
2223 \r
2224 static int WriteIntValueToReg(void *Handle, char *Name, int Value)\r
2225 {\r
2226         REGDATATBL *Pos;\r
2227         char *Data;\r
2228         char Tmp[20];\r
2229 \r
2230         if(TmpRegType == REGTYPE_REG)\r
2231                 RegSetValueEx(Handle, Name, 0, REG_DWORD, (CONST BYTE *)&Value, sizeof(int));\r
2232         else\r
2233         {\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
2241         }\r
2242         return(FFFTP_SUCCESS);\r
2243 }\r
2244 \r
2245 \r
2246 /*----- 文字列を読み込む ------------------------------------------------------\r
2247 *\r
2248 *       Parameter\r
2249 *               void *Handle : ハンドル\r
2250 *               char *Name : 名前\r
2251 *               char *Str : 文字列を返すワーク\r
2252 *               DWORD Size : 最大サイズ\r
2253 *\r
2254 *       Return Value\r
2255 *               int ステータス\r
2256 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2257 *----------------------------------------------------------------------------*/\r
2258 \r
2259 static int ReadStringFromReg(void *Handle, char *Name, char *Str, DWORD Size)\r
2260 {\r
2261         int Sts;\r
2262         char *Pos;\r
2263 \r
2264         Sts = FFFTP_FAIL;\r
2265         if(TmpRegType == REGTYPE_REG)\r
2266         {\r
2267                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Str, &Size) == ERROR_SUCCESS)\r
2268                 {\r
2269                         if(*(Str + Size - 1) != NUL)\r
2270                                 *(Str + Size) = NUL;\r
2271                         Sts = FFFTP_SUCCESS;\r
2272                 }\r
2273         }\r
2274         else\r
2275         {\r
2276                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2277                 {\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
2282                 }\r
2283         }\r
2284         return(Sts);\r
2285 }\r
2286 \r
2287 \r
2288 /*----- 文字列を書き込む ------------------------------------------------------\r
2289 *\r
2290 *       Parameter\r
2291 *               void *Handle : ハンドル\r
2292 *               char *Name : 名前\r
2293 *               char *Str :文字列\r
2294 *\r
2295 *       Return Value\r
2296 *               int ステータス\r
2297 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2298 *----------------------------------------------------------------------------*/\r
2299 \r
2300 static int WriteStringToReg(void *Handle, char *Name, char *Str)\r
2301 {\r
2302         REGDATATBL *Pos;\r
2303         char *Data;\r
2304 \r
2305         if(TmpRegType == REGTYPE_REG)\r
2306                 RegSetValueEx(Handle, Name, 0, REG_SZ, (CONST BYTE *)Str, strlen(Str)+1);\r
2307         else\r
2308         {\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
2316         }\r
2317         return(FFFTP_SUCCESS);\r
2318 }\r
2319 \r
2320 \r
2321 /*----- マルチ文字列を読み込む ------------------------------------------------\r
2322 *\r
2323 *       Parameter\r
2324 *               void *Handle : ハンドル\r
2325 *               char *Name : 名前\r
2326 *               char *Str : 文字列を返すワーク\r
2327 *               DWORD Size : 最大サイズ\r
2328 *\r
2329 *       Return Value\r
2330 *               int ステータス\r
2331 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2332 *----------------------------------------------------------------------------*/\r
2333 \r
2334 static int ReadMultiStringFromReg(void *Handle, char *Name, char *Str, DWORD Size)\r
2335 {\r
2336         int Sts;\r
2337         char *Pos;\r
2338 \r
2339         Sts = FFFTP_FAIL;\r
2340         if(TmpRegType == REGTYPE_REG)\r
2341         {\r
2342                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Str, &Size) == ERROR_SUCCESS)\r
2343                 {\r
2344                         if(*(Str + Size - 1) != NUL)\r
2345                                 *(Str + Size) = NUL;\r
2346                         Sts = FFFTP_SUCCESS;\r
2347                 }\r
2348         }\r
2349         else\r
2350         {\r
2351                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2352                 {\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
2357                 }\r
2358         }\r
2359         return(Sts);\r
2360 }\r
2361 \r
2362 \r
2363 /*----- マルチ文字列を書き込む ------------------------------------------------\r
2364 *\r
2365 *       Parameter\r
2366 *               void *Handle : ハンドル\r
2367 *               char *Name : 名前\r
2368 *               char *Str : 文字列\r
2369 *\r
2370 *       Return Value\r
2371 *               int ステータス\r
2372 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2373 *----------------------------------------------------------------------------*/\r
2374 \r
2375 static int WriteMultiStringToReg(void *Handle, char *Name, char *Str)\r
2376 {\r
2377         REGDATATBL *Pos;\r
2378         char *Data;\r
2379 \r
2380         if(TmpRegType == REGTYPE_REG)\r
2381                 RegSetValueEx(Handle, Name, 0, REG_MULTI_SZ, (CONST BYTE *)Str, StrMultiLen(Str)+1);\r
2382         else\r
2383         {\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
2391         }\r
2392         return(FFFTP_SUCCESS);\r
2393 }\r
2394 \r
2395 \r
2396 /*----- バイナリを読み込む-----------------------------------------------------\r
2397 *\r
2398 *       Parameter\r
2399 *               void *Handle : ハンドル\r
2400 *               char *Name : 名前\r
2401 *               void *Bin : バイナリを返すワーク\r
2402 *               DWORD Size : 最大サイズ\r
2403 *\r
2404 *       Return Value\r
2405 *               int ステータス\r
2406 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2407 *----------------------------------------------------------------------------*/\r
2408 \r
2409 static int ReadBinaryFromReg(void *Handle, char *Name, void *Bin, DWORD Size)\r
2410 {\r
2411         int Sts;\r
2412         char *Pos;\r
2413 \r
2414         Sts = FFFTP_FAIL;\r
2415         if(TmpRegType == REGTYPE_REG)\r
2416         {\r
2417                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Bin, &Size) == ERROR_SUCCESS)\r
2418                         Sts = FFFTP_SUCCESS;\r
2419         }\r
2420         else\r
2421         {\r
2422                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2423                 {\r
2424                         Size = min1(Size, strlen(Pos));\r
2425                         Size = StrReadIn(Pos, Size, Bin);\r
2426                         Sts = FFFTP_SUCCESS;\r
2427                 }\r
2428         }\r
2429         return(Sts);\r
2430 }\r
2431 \r
2432 \r
2433 /*----- バイナリを書き込む ----------------------------------------------------\r
2434 *\r
2435 *       Parameter\r
2436 *               void *Handle : ハンドル\r
2437 *               char *Name : 名前\r
2438 *               void *Bin : バイナリ\r
2439 *               int Len : 長さ\r
2440 *\r
2441 *       Return Value\r
2442 *               int ステータス\r
2443 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2444 *----------------------------------------------------------------------------*/\r
2445 \r
2446 static int WriteBinaryToReg(void *Handle, char *Name, void *Bin, int Len)\r
2447 {\r
2448         REGDATATBL *Pos;\r
2449         char *Data;\r
2450 \r
2451         if(TmpRegType == REGTYPE_REG)\r
2452                 RegSetValueEx(Handle, Name, 0, REG_BINARY, (CONST BYTE *)Bin, Len);\r
2453         else\r
2454         {\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
2462         }\r
2463         return(FFFTP_SUCCESS);\r
2464 }\r
2465 \r
2466 \r
2467 /*----- 文字列をバッファに追加書き込みする ------------------------------------\r
2468 *\r
2469 *       Parameter\r
2470 *               char *Src : 文字列\r
2471 *               int len : 文字列の長さ\r
2472 *               char *Dst : 書き込みするバッファ\r
2473 *\r
2474 *       Return Value\r
2475 *               int 追加したバイト数\r
2476 *----------------------------------------------------------------------------*/\r
2477 \r
2478 static int StrCatOut(char *Src, int Len, char *Dst)\r
2479 {\r
2480         int Count;\r
2481 \r
2482         Dst += strlen(Dst);\r
2483         Count = 0;\r
2484         for(; Len > 0; Len--)\r
2485         {\r
2486                 if(*Src == '\\')\r
2487                 {\r
2488                         *Dst++ = '\\';\r
2489                         *Dst++ = '\\';\r
2490                         Count += 2;\r
2491                 }\r
2492                 else if((*Src >= 0x20) && (*Src <= 0x7E))\r
2493                 {\r
2494                         *Dst++ = *Src;\r
2495                         Count++;\r
2496                 }\r
2497                 else\r
2498                 {\r
2499                         sprintf(Dst, "\\%02X", *(unsigned char *)Src);\r
2500                         Dst += 3;\r
2501                         Count += 3;\r
2502                 }\r
2503                 Src++;\r
2504         }\r
2505         *Dst = NUL;\r
2506         return(Count);\r
2507 }\r
2508 \r
2509 \r
2510 /*----- 文字列をバッファに読み込む --------------------------------------------\r
2511 *\r
2512 *       Parameter\r
2513 *               char *Src : 文字列\r
2514 *               int Max : 最大サイズ\r
2515 *               char *Dst : 書き込みするバッファ\r
2516 *\r
2517 *       Return Value\r
2518 *               int 読み込んだバイト数\r
2519 *----------------------------------------------------------------------------*/\r
2520 \r
2521 static int StrReadIn(char *Src, int Max, char *Dst)\r
2522 {\r
2523         int Count;\r
2524         int Tmp;\r
2525 \r
2526         Count = 0;\r
2527         while(*Src != NUL)\r
2528         {\r
2529                 if(Count >= Max)\r
2530                         break;\r
2531 \r
2532                 if(*Src == '\\')\r
2533                 {\r
2534                         Src++;\r
2535                         if(*Src == '\\')\r
2536                                 *Dst = '\\';\r
2537                         else\r
2538                         {\r
2539                                 sscanf(Src, "%02x", &Tmp);\r
2540                                 *Dst = Tmp;\r
2541                                 Src++;\r
2542                         }\r
2543                 }\r
2544                 else\r
2545                         *Dst = *Src;\r
2546 \r
2547                 Count++;\r
2548                 Dst++;\r
2549                 Src++;\r
2550         }\r
2551         return(Count);\r
2552 }\r
2553 \r
2554 \r
2555 /*----- 値を検索する ----------------------------------------------------------\r
2556 *\r
2557 *       Parameter\r
2558 *               char *Handle : ハンドル\r
2559 *               char *Name : 名前\r
2560 *\r
2561 *       Return Value\r
2562 *               char *値データの先頭\r
2563 *                       NULL=指定の名前の値が見つからない\r
2564 *----------------------------------------------------------------------------*/\r
2565 \r
2566 static char *ScanValue(void *Handle, char *Name)\r
2567 {\r
2568         REGDATATBL *Cur;\r
2569         char *Pos;\r
2570         char *Ret;\r
2571 \r
2572         Ret = NULL;\r
2573         Cur = Handle;\r
2574         Pos = Cur->ValTbl;\r
2575         while(Pos < (Cur->ValTbl + Cur->ValLen))\r
2576         {\r
2577                 if((strncmp(Name, Pos, strlen(Name)) == 0) &&\r
2578                    (*(Pos + strlen(Name)) == '='))\r
2579                 {\r
2580                         Ret = Pos + strlen(Name) + 1;\r
2581                         break;\r
2582                 }\r
2583                 Pos += strlen(Pos) + 1;\r
2584         }\r
2585         return(Ret);\r
2586 }\r
2587 \r
2588 \r
2589 /*----------- パスワードの妥当性を確認する ------------------------------------\r
2590 *\r
2591 *       Parameter\r
2592 *               char *Password: パスワード文字列\r
2593 *               char *HashStr: SHA-1ハッシュ文字列\r
2594 *\r
2595 *       Return Value\r
2596 *               int 0 不一致\r
2597 *                       1: 一致\r
2598 *                       2: 異常\r
2599 *----------------------------------------------------------------------------*/\r
2600 int CheckPasswordValidity( char* Password, int length, const char* HashStr )\r
2601 {\r
2602         ulong hash1[5];\r
2603         ulong hash2[5];\r
2604         \r
2605         int i, j;\r
2606         \r
2607         const char* p = HashStr;\r
2608         \r
2609         /* 空文字列は一致したことにする */\r
2610         if( HashStr[0] == NUL ) return 1;\r
2611 \r
2612         /* Hashをチェックするする*/\r
2613         if( strlen(HashStr) != 40 )     return 2;\r
2614 \r
2615         /* Hashをデコードする*/\r
2616         for( i = 0; i < 5; i++ ){\r
2617                 ulong decode = 0;\r
2618                 for( j = 0; j < 8; j++ ){\r
2619                         if( *p < 0x40 || 0x40 + 15 < *p ){\r
2620                                 return 2;\r
2621                         }\r
2622                         decode = (decode << 4 ) + (*p - 0x40);\r
2623                         ++p;\r
2624                 }\r
2625                 hash1[i] = decode;\r
2626         }\r
2627         \r
2628         /* Password をハッシュする */\r
2629         sha_memory( Password, length, hash2 );\r
2630         \r
2631         if( memcmp( (char*)hash1, (char*)hash2, sizeof( hash1 )) == 0 ){\r
2632                 return 1;\r
2633         }\r
2634         return 0;\r
2635 }\r
2636 \r
2637 /*----------- パスワードの妥当性チェックのための文字列を作成する ------------\r
2638 *\r
2639 *       Parameter\r
2640 *               char *Password: パスワード文字列\r
2641 *               char *Str: SHA-1ハッシュ文字列格納場所 (41bytes以上)\r
2642 *\r
2643 *       Return Value\r
2644 *               None\r
2645 *----------------------------------------------------------------------------*/\r
2646 void CreatePasswordHash( char* Password, int length, char* HashStr )\r
2647 {\r
2648         ulong hash[5];\r
2649         int i, j;\r
2650         unsigned char *p = (unsigned char *)HashStr;\r
2651 \r
2652         sha_memory( Password, length, hash );\r
2653 \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
2658                         rest <<= 4;\r
2659                 }\r
2660         }\r
2661         *p = NUL;\r
2662 }\r
2663 \r
2664 void SetHashSalt( DWORD salt )\r
2665 {\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
2671         \r
2672         SecretKeyLength = strlen( SecretKey ) + 5;\r
2673 }\r
2674 \r
2675 /*----------- 乱数生成をする -------------------------------------------------\r
2676 *\r
2677 *       Parameter\r
2678 *\r
2679 *       Return Value\r
2680 *               ランダムな値:コンパイラVS2005/動作環境WinXP以上では rand_s から取得する\r
2681 *----------------------------------------------------------------------------*/\r
2682 DWORD GetRandamDWRODValue(void)\r
2683 {\r
2684         DWORD rndValue;\r
2685         int errorCode;\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
2690 #else\r
2691         errorCode = 1;\r
2692 #endif\r
2693         if(0 != errorCode){\r
2694 #ifdef USE_RANDAM_C_RAND\r
2695                 rndValue = rand() | (rand() << 16);\r
2696 #else\r
2697                 /* rand() のかわりに、SHA-1とパフォーマンスカウンタを用いる */\r
2698                 ulong shaValue[5];\r
2699                 LARGE_INTEGER Counter;\r
2700                 \r
2701                 if(0 == IsRndSourceInit){\r
2702                         /* 初回取得時 */\r
2703                         HANDLE CurProcHandle;\r
2704                         HANDLE CurThreadHandle;\r
2705                         \r
2706                         if(DuplicateHandle(GetCurrentProcess(), GetCurrentProcess(), GetCurrentProcess(),\r
2707                                 &CurProcHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))\r
2708                         {\r
2709                                 CloseHandle(CurProcHandle);\r
2710                         }\r
2711                         if(DuplicateHandle(GetCurrentProcess(), GetCurrentThread(), GetCurrentProcess(),\r
2712                                 &CurThreadHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))\r
2713                         {\r
2714                                 CloseHandle(CurThreadHandle);\r
2715                         }\r
2716                         \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
2725                 }\r
2726                 RndSource[4]++;\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
2732                 }else{\r
2733                         RndSource[6] = (ulong)timeGetTime();\r
2734                         RndSource[7] = (ulong)rand();\r
2735                         RndSource[8] = (ulong)rand();\r
2736                 }\r
2737                 \r
2738                 sha_memory((char *)RndSource, sizeof(RndSource), shaValue);\r
2739                 rndValue = shaValue[0] ^ shaValue[1] ^ shaValue[2] ^ shaValue[3] ^ shaValue[4];\r
2740 #endif\r
2741         }\r
2742         return rndValue;\r
2743 }\r