OSDN Git Service

Modify documents for 1.98b.
[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 // UTF-8対応\r
103 static int IniKanjiCode = KANJI_NOCNV;\r
104 \r
105 /*===== 外部参照 =====*/\r
106 \r
107 /* 設定値 */\r
108 extern int WinPosX;\r
109 extern int WinPosY;\r
110 extern int WinWidth;\r
111 extern int WinHeight;\r
112 extern int LocalWidth;\r
113 extern int TaskHeight;\r
114 extern int LocalTabWidth[4];\r
115 extern int RemoteTabWidth[6];\r
116 extern char UserMailAdrs[USER_MAIL_LEN+1];\r
117 extern char ViewerName[VIEWERS][FMAX_PATH+1];\r
118 extern HFONT ListFont;\r
119 extern LOGFONT ListLogFont;\r
120 extern int LocalFileSort;\r
121 extern int LocalDirSort;\r
122 extern int RemoteFileSort;\r
123 extern int RemoteDirSort;\r
124 extern int TransMode;\r
125 extern int ConnectOnStart;\r
126 extern int DebugConsole;\r
127 extern int SaveWinPos;\r
128 extern char AsciiExt[ASCII_EXT_LEN+1];\r
129 extern int RecvMode;\r
130 extern int SendMode;\r
131 extern int MoveMode;\r
132 extern int ListType;\r
133 extern int CacheEntry;\r
134 extern int CacheSave;\r
135 extern char DefaultLocalPath[FMAX_PATH+1];\r
136 extern int SaveTimeStamp;\r
137 extern int FindMode;\r
138 extern int DotFile;\r
139 extern int DclickOpen;\r
140 extern SOUNDFILE Sound[SOUND_TYPES];\r
141 extern int FnameCnv;\r
142 extern int ConnectAndSet;\r
143 extern int TimeOut;\r
144 extern int RmEOF;\r
145 extern int RegType;\r
146 extern char FwallHost[HOST_ADRS_LEN+1];\r
147 extern char FwallUser[USER_NAME_LEN+1];\r
148 extern char FwallPass[PASSWORD_LEN+1];\r
149 extern int FwallPort;\r
150 extern int FwallType;\r
151 extern int FwallDefault;\r
152 extern int FwallSecurity;\r
153 extern int FwallResolv;\r
154 extern int FwallLower;\r
155 extern int FwallDelimiter;\r
156 extern int PasvDefault;\r
157 extern char MirrorNoTrn[MIRROR_LEN+1];\r
158 extern char MirrorNoDel[MIRROR_LEN+1];\r
159 extern int MirrorFnameCnv;\r
160 //extern int MirrorFolderCnv;\r
161 extern int RasClose;\r
162 extern int RasCloseNotify;\r
163 extern int FileHist;\r
164 extern char DefAttrList[DEFATTRLIST_LEN+1];\r
165 extern SIZE HostDlgSize;\r
166 extern SIZE BmarkDlgSize;\r
167 extern SIZE MirrorDlgSize;\r
168 extern int Sizing;\r
169 extern int SortSave;\r
170 extern char TmpPath[FMAX_PATH+1];\r
171 extern int QuickAnonymous;\r
172 extern int PassToHist;\r
173 extern int VaxSemicolon;\r
174 extern int SendQuit;\r
175 extern int NoRasControl;\r
176 extern int SuppressSave;\r
177 \r
178 extern int UpExistMode;\r
179 extern int ExistMode;\r
180 extern int DispIgnoreHide;\r
181 extern int DispDrives;\r
182 extern int MirUpDelNotify;\r
183 extern int MirDownDelNotify;\r
184 \r
185 extern int FolderAttr;\r
186 extern int FolderAttrNum;\r
187 \r
188 // 暗号化通信対応\r
189 extern BYTE CertificateCacheHash[MAX_CERT_CACHE_HASH][20];\r
190 \r
191 /*----- マスタパスワードの設定 ----------------------------------------------\r
192 *\r
193 *       Parameter\r
194 *               const char* Password : マスターパスワード\r
195 *\r
196 *       Return Value\r
197 *               なし\r
198 *----------------------------------------------------------------------------*/\r
199 void SetMasterPassword( const char* Password )\r
200 {\r
201         ZeroMemory( SecretKey, MAX_PASSWORD_LEN + 12 );\r
202         if( Password != NULL ){\r
203                 strncpy( SecretKey, Password, MAX_PASSWORD_LEN );\r
204         }\r
205         else {\r
206                 strcpy( SecretKey, DEFAULT_PASSWORD );\r
207         }\r
208         SecretKeyLength = strlen( SecretKey );\r
209         \r
210         /* 未検証なので,初期状態はOKにする (強制再設定→保存にを可能にする)*/\r
211         IsMasterPasswordError = PASSWORD_OK;\r
212 }\r
213 \r
214 /*----- マスタパスワードの状態取得 ----------------------------------------------\r
215 *\r
216 *       Parameter\r
217 *               なし\r
218 *\r
219 *       Return Value\r
220 *               PASSWORD_OK : OK\r
221 *               PASSWORD_UNMATCH : パスワード不一致\r
222 *               BAD_PASSWORD_HASH : パスワード確認失敗\r
223 *----------------------------------------------------------------------------*/\r
224 int GetMasterPasswordStatus(void)\r
225 {\r
226         return IsMasterPasswordError;\r
227 }\r
228 \r
229 /*----- レジストリ/INIファイルのマスターパスワードの検証を行う ------------\r
230 *\r
231 *       Parameter\r
232 *               なし\r
233 *\r
234 *       Return Value\r
235 *               \r
236 *----------------------------------------------------------------------------*/\r
237 \r
238 int ValidateMasterPassword(void)\r
239 {\r
240         void *hKey3;\r
241         int i;\r
242 \r
243         SetRegType(REGTYPE_INI);\r
244         if((i = OpenReg("FFFTP", &hKey3)) != FFFTP_SUCCESS)\r
245         {\r
246                 if(AskForceIni() == NO)\r
247                 {\r
248                         SetRegType(REGTYPE_REG);\r
249                         i = OpenReg("FFFTP", &hKey3);\r
250                 }\r
251         }\r
252         if(i == FFFTP_SUCCESS){\r
253                 char checkbuf[48];\r
254                 int salt = 0;\r
255 \r
256                 if( ReadIntValueFromReg(hKey3, "CredentialSalt", &salt)){\r
257                         SetHashSalt( salt );\r
258                 }\r
259                 if( ReadStringFromReg(hKey3, "CredentialCheck", checkbuf, sizeof( checkbuf )) == FFFTP_SUCCESS ){\r
260                         switch( CheckPasswordValidity( SecretKey, SecretKeyLength, checkbuf ) ){\r
261                         case 0: /* not match */\r
262                                 IsMasterPasswordError = PASSWORD_UNMATCH;\r
263                                 break;\r
264                         case 1: /* match */\r
265                                 IsMasterPasswordError = PASSWORD_OK;\r
266                                 break;\r
267                         case 2: /* invalid hash */\r
268                         default:\r
269                                 IsMasterPasswordError = BAD_PASSWORD_HASH;\r
270                                 break;\r
271                         }\r
272                 }\r
273                 CloseReg(hKey3);\r
274                 return YES;\r
275         }\r
276         return NO;\r
277 }\r
278 \r
279 /*----- レジストリ/INIファイルに設定値を保存 ---------------------------------\r
280 *\r
281 *       Parameter\r
282 *               なし\r
283 *\r
284 *       Return Value\r
285 *               なし\r
286 *----------------------------------------------------------------------------*/\r
287 \r
288 void SaveRegistory(void)\r
289 {\r
290         void *hKey3;\r
291         void *hKey4;\r
292         void *hKey5;\r
293         // 暗号化通信対応\r
294 //      char Str[FMAX_PATH+1];\r
295         char Str[PRIVATE_KEY_LEN*4+1];\r
296         int i;\r
297         int n;\r
298         HOSTDATA DefaultHost;\r
299         HOSTDATA Host;\r
300         HISTORYDATA Hist;\r
301         HISTORYDATA DefaultHist;\r
302         \r
303         if( GetMasterPasswordStatus() == PASSWORD_UNMATCH ){\r
304                 /* 2010.01.30 genta: マスターパスワードが不一致の場合は不用意に上書きしない */\r
305                 return;\r
306         }\r
307 \r
308         SetRegType(RegType);\r
309         if(CreateReg("FFFTP", &hKey3) == FFFTP_SUCCESS)\r
310         {\r
311                 char buf[48];\r
312                 int salt = GetTickCount();\r
313         \r
314                 WriteIntValueToReg(hKey3, "Version", VER_NUM);\r
315                 WriteIntValueToReg(hKey3, "CredentialSalt", salt);\r
316                 \r
317                 SetHashSalt( salt );\r
318                 /* save password hash */\r
319                 CreatePasswordHash( SecretKey, SecretKeyLength, buf );\r
320                 WriteStringToReg(hKey3, "CredentialCheck", buf);\r
321 \r
322                 if(CreateSubKey(hKey3, "Options", &hKey4) == FFFTP_SUCCESS)\r
323                 {\r
324                         WriteIntValueToReg(hKey4, "NoSave", SuppressSave);\r
325 \r
326                         if(SuppressSave != YES)\r
327                         {\r
328                                 WriteIntValueToReg(hKey4, "WinPosX", WinPosX);\r
329                                 WriteIntValueToReg(hKey4, "WinPosY", WinPosY);\r
330                                 WriteIntValueToReg(hKey4, "WinWidth", WinWidth);\r
331                                 WriteIntValueToReg(hKey4, "WinHeight", WinHeight);\r
332                                 WriteIntValueToReg(hKey4, "LocalWidth", LocalWidth);\r
333                                 WriteIntValueToReg(hKey4, "TaskHeight", TaskHeight);\r
334                                 WriteBinaryToReg(hKey4, "LocalColm", LocalTabWidth, sizeof(LocalTabWidth));\r
335                                 WriteBinaryToReg(hKey4, "RemoteColm", RemoteTabWidth, sizeof(RemoteTabWidth));\r
336                                 WriteIntValueToReg(hKey4, "SwCmd", Sizing);\r
337 \r
338                                 WriteStringToReg(hKey4, "UserMail", UserMailAdrs);\r
339                                 WriteStringToReg(hKey4, "Viewer", ViewerName[0]);\r
340                                 WriteStringToReg(hKey4, "Viewer2", ViewerName[1]);\r
341                                 WriteStringToReg(hKey4, "Viewer3", ViewerName[2]);\r
342 \r
343                                 WriteIntValueToReg(hKey4, "TrType", TransMode);\r
344                                 WriteIntValueToReg(hKey4, "Recv", RecvMode);\r
345                                 WriteIntValueToReg(hKey4, "Send", SendMode);\r
346                                 WriteIntValueToReg(hKey4, "Move", MoveMode);\r
347                                 WriteStringToReg(hKey4, "Path", DefaultLocalPath);\r
348                                 WriteIntValueToReg(hKey4, "Time", SaveTimeStamp);\r
349                                 WriteIntValueToReg(hKey4, "EOF", RmEOF);\r
350                                 WriteIntValueToReg(hKey4, "Scolon", VaxSemicolon);\r
351 \r
352                                 WriteIntValueToReg(hKey4, "RecvEx", ExistMode);\r
353                                 WriteIntValueToReg(hKey4, "SendEx", UpExistMode);\r
354 \r
355                                 WriteIntValueToReg(hKey4, "LFsort", LocalFileSort);\r
356                                 WriteIntValueToReg(hKey4, "LDsort", LocalDirSort);\r
357                                 WriteIntValueToReg(hKey4, "RFsort", RemoteFileSort);\r
358                                 WriteIntValueToReg(hKey4, "RDsort", RemoteDirSort);\r
359                                 WriteIntValueToReg(hKey4, "SortSave", SortSave);\r
360 \r
361                                 WriteIntValueToReg(hKey4, "ListType", ListType);\r
362                                 WriteIntValueToReg(hKey4, "Cache", CacheEntry);\r
363                                 WriteIntValueToReg(hKey4, "CacheSave", CacheSave);\r
364                                 WriteIntValueToReg(hKey4, "DotFile", DotFile);\r
365                                 WriteIntValueToReg(hKey4, "Dclick", DclickOpen);\r
366 \r
367                                 WriteIntValueToReg(hKey4, "ConS", ConnectOnStart);\r
368                                 WriteIntValueToReg(hKey4, "OldDlg", ConnectAndSet);\r
369                                 WriteIntValueToReg(hKey4, "RasClose", RasClose);\r
370                                 WriteIntValueToReg(hKey4, "RasNotify", RasCloseNotify);\r
371                                 WriteIntValueToReg(hKey4, "Qanony", QuickAnonymous);\r
372                                 WriteIntValueToReg(hKey4, "PassHist", PassToHist);\r
373                                 WriteIntValueToReg(hKey4, "SendQuit", SendQuit);\r
374                                 WriteIntValueToReg(hKey4, "NoRas", NoRasControl);\r
375 \r
376                                 WriteIntValueToReg(hKey4, "Debug", DebugConsole);\r
377                                 WriteIntValueToReg(hKey4, "WinPos", SaveWinPos);\r
378                                 WriteIntValueToReg(hKey4, "RegExp", FindMode);\r
379                                 WriteIntValueToReg(hKey4, "Reg", RegType);\r
380 \r
381                                 WriteMultiStringToReg(hKey4, "AsciiFile", AsciiExt);\r
382                                 WriteIntValueToReg(hKey4, "LowUp", FnameCnv);\r
383                                 WriteIntValueToReg(hKey4, "Tout", TimeOut);\r
384 \r
385                                 WriteMultiStringToReg(hKey4, "NoTrn", MirrorNoTrn);\r
386                                 WriteMultiStringToReg(hKey4, "NoDel", MirrorNoDel);\r
387                                 WriteIntValueToReg(hKey4, "MirFile", MirrorFnameCnv);\r
388                                 WriteIntValueToReg(hKey4, "MirUNot", MirUpDelNotify);\r
389                                 WriteIntValueToReg(hKey4, "MirDNot", MirDownDelNotify);\r
390 \r
391                                 MakeFontData(ListLogFont, ListFont, Str);\r
392                                 WriteStringToReg(hKey4, "ListFont", Str);\r
393                                 WriteIntValueToReg(hKey4, "ListHide", DispIgnoreHide);\r
394                                 WriteIntValueToReg(hKey4, "ListDrv", DispDrives);\r
395 \r
396                                 WriteStringToReg(hKey4, "FwallHost", FwallHost);\r
397                                 WriteStringToReg(hKey4, "FwallUser", FwallUser);\r
398                                 EncodePassword(FwallPass, Str);\r
399                                 WriteStringToReg(hKey4, "FwallPass", Str);\r
400                                 WriteIntValueToReg(hKey4, "FwallPort", FwallPort);\r
401                                 WriteIntValueToReg(hKey4, "FwallType", FwallType);\r
402                                 WriteIntValueToReg(hKey4, "FwallDef", FwallDefault);\r
403                                 WriteIntValueToReg(hKey4, "FwallSec", FwallSecurity);\r
404                                 WriteIntValueToReg(hKey4, "PasvDef", PasvDefault);\r
405                                 WriteIntValueToReg(hKey4, "FwallRes", FwallResolv);\r
406                                 WriteIntValueToReg(hKey4, "FwallLow", FwallLower);\r
407                                 WriteIntValueToReg(hKey4, "FwallDel", FwallDelimiter);\r
408 \r
409                                 WriteIntValueToReg(hKey4, "SndConSw", Sound[SND_CONNECT].On);\r
410                                 WriteIntValueToReg(hKey4, "SndTrnSw", Sound[SND_TRANS].On);\r
411                                 WriteIntValueToReg(hKey4, "SndErrSw", Sound[SND_ERROR].On);\r
412                                 WriteStringToReg(hKey4, "SndCon", Sound[SND_CONNECT].Fname);\r
413                                 WriteStringToReg(hKey4, "SndTrn", Sound[SND_TRANS].Fname);\r
414                                 WriteStringToReg(hKey4, "SndErr", Sound[SND_ERROR].Fname);\r
415 \r
416                                 WriteMultiStringToReg(hKey4, "DefAttr", DefAttrList);\r
417 \r
418                                 GetTempPath(FMAX_PATH, Str);\r
419                                 SaveStr(hKey4, "Tmp", TmpPath, Str);\r
420 \r
421                                 WriteBinaryToReg(hKey4, "Hdlg", &HostDlgSize, sizeof(SIZE));\r
422                                 WriteBinaryToReg(hKey4, "Bdlg", &BmarkDlgSize, sizeof(SIZE));\r
423                                 WriteBinaryToReg(hKey4, "Mdlg", &MirrorDlgSize, sizeof(SIZE));\r
424 \r
425                                 WriteIntValueToReg(hKey4, "FAttrSw", FolderAttr);\r
426                                 WriteIntValueToReg(hKey4, "FAttr", FolderAttrNum);\r
427 \r
428                                 WriteIntValueToReg(hKey4, "HistNum", FileHist);\r
429 \r
430                                 /* Ver1.54a以前の形式のヒストリデータは削除 */\r
431                                 DeleteValue(hKey4, "Hist");\r
432 \r
433                                 /* ヒストリの設定を保存 */\r
434                                 CopyDefaultHistory(&DefaultHist);\r
435                                 n = 0;\r
436                                 for(i = AskHistoryNum(); i > 0; i--)\r
437                                 {\r
438                                         if(GetHistoryByNum(i-1, &Hist) == FFFTP_SUCCESS)\r
439                                         {\r
440                                                 sprintf(Str, "History%d", n);\r
441                                                 if(CreateSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
442                                                 {\r
443                                                         SaveStr(hKey5, "HostAdrs", Hist.HostAdrs, DefaultHist.HostAdrs);\r
444                                                         SaveStr(hKey5, "UserName", Hist.UserName, DefaultHist.UserName);\r
445                                                         SaveStr(hKey5, "Account", Hist.Account, DefaultHist.Account);\r
446                                                         SaveStr(hKey5, "LocalDir", Hist.LocalInitDir, NULL);\r
447                                                         SaveStr(hKey5, "RemoteDir", Hist.RemoteInitDir, DefaultHist.RemoteInitDir);\r
448                                                         SaveStr(hKey5, "Chmod", Hist.ChmodCmd, DefaultHist.ChmodCmd);\r
449                                                         SaveStr(hKey5, "Nlst", Hist.LsName, DefaultHist.LsName);\r
450                                                         SaveStr(hKey5, "Init", Hist.InitCmd, DefaultHist.InitCmd);\r
451                                                         EncodePassword(Hist.PassWord, Str);\r
452                                                         SaveStr(hKey5, "Password", Str, DefaultHist.PassWord);\r
453                                                         SaveIntNum(hKey5, "Port", Hist.Port, DefaultHist.Port);\r
454                                                         SaveIntNum(hKey5, "Kanji", Hist.KanjiCode, DefaultHist.KanjiCode);\r
455                                                         SaveIntNum(hKey5, "KanaCnv", Hist.KanaCnv, DefaultHist.KanaCnv);\r
456                                                         SaveIntNum(hKey5, "NameKanji", Hist.NameKanjiCode, DefaultHist.NameKanjiCode);\r
457                                                         SaveIntNum(hKey5, "NameKana", Hist.NameKanaCnv, DefaultHist.NameKanaCnv);\r
458                                                         SaveIntNum(hKey5, "Pasv", Hist.Pasv, DefaultHist.Pasv);\r
459                                                         SaveIntNum(hKey5, "Fwall", Hist.FireWall, DefaultHist.FireWall);\r
460                                                         SaveIntNum(hKey5, "List", Hist.ListCmdOnly, DefaultHist.ListCmdOnly);\r
461                                                         SaveIntNum(hKey5, "NLST-R", Hist.UseNLST_R, DefaultHist.UseNLST_R);\r
462                                                         SaveIntNum(hKey5, "Tzone", Hist.TimeZone, DefaultHist.TimeZone);\r
463                                                         SaveIntNum(hKey5, "Type", Hist.HostType, DefaultHist.HostType);\r
464                                                         SaveIntNum(hKey5, "Sync", Hist.SyncMove, DefaultHist.SyncMove);\r
465                                                         SaveIntNum(hKey5, "Fpath", Hist.NoFullPath, DefaultHist.NoFullPath);\r
466                                                         WriteBinaryToReg(hKey5, "Sort", &Hist.Sort, sizeof(Hist.Sort));\r
467                                                         SaveIntNum(hKey5, "Secu", Hist.Security, DefaultHist.Security);\r
468                                                         WriteIntValueToReg(hKey5, "TrType", Hist.Type);\r
469                                                         SaveIntNum(hKey5, "Dial", Hist.Dialup, DefaultHist.Dialup);\r
470                                                         SaveIntNum(hKey5, "UseIt", Hist.DialupAlways, DefaultHist.DialupAlways);\r
471                                                         SaveIntNum(hKey5, "Notify", Hist.DialupNotify, DefaultHist.DialupNotify);\r
472                                                         SaveStr(hKey5, "DialTo", Hist.DialEntry, DefaultHist.DialEntry);\r
473                                                         // 暗号化通信対応\r
474                                                         SaveIntNum(hKey5, "NoEncryption", Hist.UseNoEncryption, DefaultHist.UseNoEncryption);\r
475                                                         SaveIntNum(hKey5, "FTPES", Hist.UseFTPES, DefaultHist.UseFTPES);\r
476                                                         SaveIntNum(hKey5, "FTPIS", Hist.UseFTPIS, DefaultHist.UseFTPIS);\r
477                                                         SaveIntNum(hKey5, "SFTP", Hist.UseSFTP, DefaultHist.UseSFTP);\r
478                                                         EncodePassword(Hist.PrivateKey, Str);\r
479                                                         SaveStr(hKey5, "PKey", Str, DefaultHist.PrivateKey);\r
480                                                         // 同時接続対応\r
481                                                         SaveIntNum(hKey5, "ThreadCount", Hist.MaxThreadCount, DefaultHist.MaxThreadCount);\r
482                                                         // MLSD対応\r
483                                                         SaveIntNum(hKey5, "MLSD", Hist.UseMLSD, DefaultHist.UseMLSD);\r
484                                                         // IPv6対応\r
485                                                         SaveIntNum(hKey5, "IPv6", Hist.UseIPv6, DefaultHist.UseIPv6);\r
486 \r
487                                                         CloseSubKey(hKey5);\r
488                                                         n++;\r
489                                                 }\r
490                                         }\r
491                                 }\r
492                                 WriteIntValueToReg(hKey4, "SavedHist", n);\r
493 \r
494                                 /* 余分なヒストリがあったら削除 */\r
495                                 for(; n < 999; n++)\r
496                                 {\r
497                                         sprintf(Str, "History%d", n);\r
498                                         if(DeleteSubKey(hKey4, Str) != FFFTP_SUCCESS)\r
499                                                 break;\r
500                                 }\r
501 \r
502                                 /* ホストの設定を保存 */\r
503                                 CopyDefaultHost(&DefaultHost);\r
504                                 i = 0;\r
505                                 while(CopyHostFromList(i, &Host) == FFFTP_SUCCESS)\r
506                                 {\r
507                                         sprintf(Str, "Host%d", i);\r
508                                         if(CreateSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
509                                         {\r
510 //                                              SaveIntNum(hKey5, "Set", Host.Level, DefaultHost.Level);\r
511                                                 WriteIntValueToReg(hKey5, "Set", Host.Level);\r
512                                                 SaveStr(hKey5, "HostName", Host.HostName, DefaultHost.HostName);\r
513                                                 if((Host.Level & SET_LEVEL_GROUP) == 0)\r
514                                                 {\r
515                                                         SaveStr(hKey5, "HostAdrs", Host.HostAdrs, DefaultHost.HostAdrs);\r
516                                                         SaveStr(hKey5, "UserName", Host.UserName, DefaultHost.UserName);\r
517                                                         SaveStr(hKey5, "Account", Host.Account, DefaultHost.Account);\r
518                                                         SaveStr(hKey5, "LocalDir", Host.LocalInitDir, NULL);\r
519                                                         SaveStr(hKey5, "RemoteDir", Host.RemoteInitDir, DefaultHost.RemoteInitDir);\r
520                                                         SaveStr(hKey5, "Chmod", Host.ChmodCmd, DefaultHost.ChmodCmd);\r
521                                                         SaveStr(hKey5, "Nlst", Host.LsName, DefaultHost.LsName);\r
522                                                         SaveStr(hKey5, "Init", Host.InitCmd, DefaultHost.InitCmd);\r
523 \r
524                                                         if(Host.Anonymous == NO)\r
525                                                                 EncodePassword(Host.PassWord, Str);\r
526                                                         else\r
527                                                                 strcpy(Str, DefaultHost.PassWord);\r
528                                                         SaveStr(hKey5, "Password", Str, DefaultHost.PassWord);\r
529 \r
530                                                         SaveIntNum(hKey5, "Port", Host.Port, DefaultHost.Port);\r
531                                                         SaveIntNum(hKey5, "Anonymous", Host.Anonymous, DefaultHost.Anonymous);\r
532                                                         SaveIntNum(hKey5, "Kanji", Host.KanjiCode, DefaultHost.KanjiCode);\r
533                                                         SaveIntNum(hKey5, "KanaCnv", Host.KanaCnv, DefaultHost.KanaCnv);\r
534                                                         SaveIntNum(hKey5, "NameKanji", Host.NameKanjiCode, DefaultHost.NameKanjiCode);\r
535                                                         SaveIntNum(hKey5, "NameKana", Host.NameKanaCnv, DefaultHost.NameKanaCnv);\r
536                                                         SaveIntNum(hKey5, "Pasv", Host.Pasv, DefaultHost.Pasv);\r
537                                                         SaveIntNum(hKey5, "Fwall", Host.FireWall, DefaultHost.FireWall);\r
538                                                         SaveIntNum(hKey5, "List", Host.ListCmdOnly, DefaultHost.ListCmdOnly);\r
539                                                         SaveIntNum(hKey5, "NLST-R", Host.UseNLST_R, DefaultHost.UseNLST_R);\r
540                                                         SaveIntNum(hKey5, "Last", Host.LastDir, DefaultHost.LastDir);\r
541                                                         SaveIntNum(hKey5, "Tzone", Host.TimeZone, DefaultHost.TimeZone);\r
542                                                         SaveIntNum(hKey5, "Type", Host.HostType, DefaultHost.HostType);\r
543                                                         SaveIntNum(hKey5, "Sync", Host.SyncMove, DefaultHost.SyncMove);\r
544                                                         SaveIntNum(hKey5, "Fpath", Host.NoFullPath, DefaultHost.NoFullPath);\r
545                                                         WriteBinaryToReg(hKey5, "Sort", &Host.Sort, sizeof(Host.Sort));\r
546                                                         SaveIntNum(hKey5, "Secu", Host.Security, DefaultHost.Security);\r
547 \r
548                                                         WriteMultiStringToReg(hKey5, "Bmarks", Host.BookMark);\r
549 \r
550                                                         SaveIntNum(hKey5, "Dial", Host.Dialup, DefaultHost.Dialup);\r
551                                                         SaveIntNum(hKey5, "UseIt", Host.DialupAlways, DefaultHost.DialupAlways);\r
552                                                         SaveIntNum(hKey5, "Notify", Host.DialupNotify, DefaultHost.DialupNotify);\r
553                                                         SaveStr(hKey5, "DialTo", Host.DialEntry, DefaultHost.DialEntry);\r
554                                                         // 暗号化通信対応\r
555                                                         SaveIntNum(hKey5, "NoEncryption", Host.UseNoEncryption, DefaultHost.UseNoEncryption);\r
556                                                         SaveIntNum(hKey5, "FTPES", Host.UseFTPES, DefaultHost.UseFTPES);\r
557                                                         SaveIntNum(hKey5, "FTPIS", Host.UseFTPIS, DefaultHost.UseFTPIS);\r
558                                                         SaveIntNum(hKey5, "SFTP", Host.UseSFTP, DefaultHost.UseSFTP);\r
559                                                         EncodePassword(Host.PrivateKey, Str);\r
560                                                         SaveStr(hKey5, "PKey", Str, DefaultHost.PrivateKey);\r
561                                                         // 同時接続対応\r
562                                                         SaveIntNum(hKey5, "ThreadCount", Host.MaxThreadCount, DefaultHost.MaxThreadCount);\r
563                                                         // MLSD対応\r
564                                                         SaveIntNum(hKey5, "MLSD", Host.UseMLSD, DefaultHost.UseMLSD);\r
565                                                         // IPv6対応\r
566                                                         SaveIntNum(hKey5, "IPv6", Host.UseIPv6, DefaultHost.UseIPv6);\r
567                                                 }\r
568                                                 CloseSubKey(hKey5);\r
569                                         }\r
570                                         i++;\r
571                                 }\r
572                                 WriteIntValueToReg(hKey4, "SetNum", i);\r
573 \r
574                                 /* 余分なホストの設定があったら削除 */\r
575                                 for(; i < 998; i++)\r
576                                 {\r
577                                         sprintf(Str, "Host%d", i);\r
578                                         if(DeleteSubKey(hKey4, Str) != FFFTP_SUCCESS)\r
579                                                 break;\r
580                                 }\r
581 \r
582                                 if((i = AskCurrentHost()) == HOSTNUM_NOENTRY)\r
583                                         i = 0;\r
584                                 WriteIntValueToReg(hKey4, "CurSet", i);\r
585 \r
586                                 // 暗号化通信対応\r
587                                 WriteBinaryToReg(hKey4, "CertCacheHash", &CertificateCacheHash, sizeof(CertificateCacheHash));\r
588                         }\r
589                         CloseSubKey(hKey4);\r
590                 }\r
591                 CloseReg(hKey3);\r
592         }\r
593         return;\r
594 }\r
595 \r
596 /*----- レジストリ/INIファイルから設定値を呼び出す ---------------------------\r
597 *\r
598 *       この関数を複数回呼び出すと,ホスト設定が追加される.\r
599 *\r
600 *       Parameter\r
601 *               なし\r
602 *\r
603 *       Return Value\r
604 *               YES: 読み出し成功\r
605 *               NO:  読み出し失敗(設定無し)\r
606 *----------------------------------------------------------------------------*/\r
607 \r
608 int LoadRegistory(void)\r
609 {\r
610         void *hKey3;\r
611         void *hKey4;\r
612         void *hKey5;\r
613         int i;\r
614         int Sets;\r
615         // 暗号化通信対応\r
616 //      char Str[256];  /* ASCII_EXT_LENより大きい事 */\r
617         char Str[PRIVATE_KEY_LEN*4+1];\r
618         char *Pos;\r
619         char *Pos2;\r
620         HOSTDATA Host;\r
621         HISTORYDATA Hist;\r
622         int Sts;\r
623         int Version;\r
624 \r
625         Sts = NO;\r
626 \r
627         SetRegType(REGTYPE_INI);\r
628         if((i = OpenReg("FFFTP", &hKey3)) != FFFTP_SUCCESS)\r
629         {\r
630                 if(AskForceIni() == NO)\r
631                 {\r
632                         SetRegType(REGTYPE_REG);\r
633                         i = OpenReg("FFFTP", &hKey3);\r
634                 }\r
635         }\r
636 \r
637         if(i == FFFTP_SUCCESS)\r
638         {\r
639 //              char checkbuf[48];\r
640                 int salt = 0;\r
641                 Sts = YES;\r
642 \r
643                 ReadIntValueFromReg(hKey3, "Version", &Version);\r
644                 // UTF-8対応\r
645                 if(Version < 1980)\r
646                         IniKanjiCode = KANJI_SJIS;\r
647 \r
648                 if(OpenSubKey(hKey3, "Options", &hKey4) == FFFTP_SUCCESS)\r
649                 {\r
650                         ReadIntValueFromReg(hKey4, "WinPosX", &WinPosX);\r
651                         ReadIntValueFromReg(hKey4, "WinPosY", &WinPosY);\r
652                         ReadIntValueFromReg(hKey4, "WinWidth", &WinWidth);\r
653                         ReadIntValueFromReg(hKey4, "WinHeight", &WinHeight);\r
654                         ReadIntValueFromReg(hKey4, "LocalWidth", &LocalWidth);\r
655                         /* ↓旧バージョンのバグ対策 */\r
656                         LocalWidth = max1(0, LocalWidth);\r
657                         ReadIntValueFromReg(hKey4, "TaskHeight", &TaskHeight);\r
658                         /* ↓旧バージョンのバグ対策 */\r
659                         TaskHeight = max1(0, TaskHeight);\r
660                         ReadBinaryFromReg(hKey4, "LocalColm", &LocalTabWidth, sizeof(LocalTabWidth));\r
661                         ReadBinaryFromReg(hKey4, "RemoteColm", &RemoteTabWidth, sizeof(RemoteTabWidth));\r
662                         ReadIntValueFromReg(hKey4, "SwCmd", &Sizing);\r
663 \r
664                         ReadStringFromReg(hKey4, "UserMail", UserMailAdrs, USER_MAIL_LEN+1);\r
665                         ReadStringFromReg(hKey4, "Viewer", ViewerName[0], FMAX_PATH+1);\r
666                         ReadStringFromReg(hKey4, "Viewer2", ViewerName[1], FMAX_PATH+1);\r
667                         ReadStringFromReg(hKey4, "Viewer3", ViewerName[2], FMAX_PATH+1);\r
668 \r
669                         ReadIntValueFromReg(hKey4, "TrType", &TransMode);\r
670                         ReadIntValueFromReg(hKey4, "Recv", &RecvMode);\r
671                         ReadIntValueFromReg(hKey4, "Send", &SendMode);\r
672                         ReadIntValueFromReg(hKey4, "Move", &MoveMode);\r
673                         ReadStringFromReg(hKey4, "Path", DefaultLocalPath, FMAX_PATH+1);\r
674                         ReadIntValueFromReg(hKey4, "Time", &SaveTimeStamp);\r
675                         ReadIntValueFromReg(hKey4, "EOF", &RmEOF);\r
676                         ReadIntValueFromReg(hKey4, "Scolon", &VaxSemicolon);\r
677 \r
678                         ReadIntValueFromReg(hKey4, "RecvEx", &ExistMode);\r
679                         ReadIntValueFromReg(hKey4, "SendEx", &UpExistMode);\r
680 \r
681                         ReadIntValueFromReg(hKey4, "LFsort", &LocalFileSort);\r
682                         ReadIntValueFromReg(hKey4, "LDsort", &LocalDirSort);\r
683                         ReadIntValueFromReg(hKey4, "RFsort", &RemoteFileSort);\r
684                         ReadIntValueFromReg(hKey4, "RDsort", &RemoteDirSort);\r
685                         ReadIntValueFromReg(hKey4, "SortSave", &SortSave);\r
686 \r
687                         ReadIntValueFromReg(hKey4, "ListType", &ListType);\r
688                         ReadIntValueFromReg(hKey4, "Cache", &CacheEntry);\r
689                         ReadIntValueFromReg(hKey4, "CacheSave", &CacheSave);\r
690                         ReadIntValueFromReg(hKey4, "DotFile", &DotFile);\r
691                         ReadIntValueFromReg(hKey4, "Dclick", &DclickOpen);\r
692 \r
693                         ReadIntValueFromReg(hKey4, "ConS", &ConnectOnStart);\r
694                         ReadIntValueFromReg(hKey4, "OldDlg", &ConnectAndSet);\r
695                         ReadIntValueFromReg(hKey4, "RasClose", &RasClose);\r
696                         ReadIntValueFromReg(hKey4, "RasNotify", &RasCloseNotify);\r
697                         ReadIntValueFromReg(hKey4, "Qanony", &QuickAnonymous);\r
698                         ReadIntValueFromReg(hKey4, "PassHist", &PassToHist);\r
699                         ReadIntValueFromReg(hKey4, "SendQuit", &SendQuit);\r
700                         ReadIntValueFromReg(hKey4, "NoRas", &NoRasControl);\r
701 \r
702                         ReadIntValueFromReg(hKey4, "Debug", &DebugConsole);\r
703                         ReadIntValueFromReg(hKey4, "WinPos", &SaveWinPos);\r
704                         ReadIntValueFromReg(hKey4, "RegExp", &FindMode);\r
705                         ReadIntValueFromReg(hKey4, "Reg", &RegType);\r
706 \r
707                         if(ReadMultiStringFromReg(hKey4, "AsciiFile", AsciiExt, ASCII_EXT_LEN+1) == FFFTP_FAIL)\r
708                         {\r
709                                 /* 旧ASCIIモードの拡張子の設定を新しいものに変換 */\r
710                                 ReadStringFromReg(hKey4, "Ascii", Str, ASCII_EXT_LEN+1);\r
711                                 memset(AsciiExt, NUL, ASCII_EXT_LEN+1);\r
712                                 Pos = Str;\r
713                                 while(*Pos != NUL)\r
714                                 {\r
715                                         if((Pos2 = strchr(Pos, ';')) == NULL)\r
716                                                 Pos2 = strchr(Pos, NUL);\r
717                                         if((Pos2 - Pos) > 0)\r
718                                         {\r
719                                                 if((StrMultiLen(AsciiExt) + (Pos2 - Pos) + 2) >= ASCII_EXT_LEN)\r
720                                                         break;\r
721                                                 strcpy(AsciiExt + StrMultiLen(AsciiExt), "*.");\r
722                                                 strncpy(AsciiExt + StrMultiLen(AsciiExt) - 1, Pos, (Pos2 - Pos));\r
723                                         }\r
724                                         Pos = Pos2;\r
725                                         if(*Pos == ';')\r
726                                                 Pos++;\r
727                                 }\r
728                         }\r
729 \r
730                         ReadIntValueFromReg(hKey4, "LowUp", &FnameCnv);\r
731                         ReadIntValueFromReg(hKey4, "Tout", &TimeOut);\r
732 \r
733                         ReadMultiStringFromReg(hKey4, "NoTrn", MirrorNoTrn, MIRROR_LEN+1);\r
734                         ReadMultiStringFromReg(hKey4, "NoDel", MirrorNoDel, MIRROR_LEN+1);\r
735                         ReadIntValueFromReg(hKey4, "MirFile", &MirrorFnameCnv);\r
736                         ReadIntValueFromReg(hKey4, "MirUNot", &MirUpDelNotify);\r
737                         ReadIntValueFromReg(hKey4, "MirDNot", &MirDownDelNotify);\r
738 \r
739                         if(ReadStringFromReg(hKey4, "ListFont", Str, 256) == FFFTP_SUCCESS)\r
740                         {\r
741                                 if(RestoreFontData(Str, &ListLogFont) == FFFTP_SUCCESS)\r
742                                         ListFont = CreateFontIndirect(&ListLogFont);\r
743                         }\r
744                         ReadIntValueFromReg(hKey4, "ListHide", &DispIgnoreHide);\r
745                         ReadIntValueFromReg(hKey4, "ListDrv", &DispDrives);\r
746 \r
747                         ReadStringFromReg(hKey4, "FwallHost", FwallHost, HOST_ADRS_LEN+1);\r
748                         ReadStringFromReg(hKey4, "FwallUser", FwallUser, USER_NAME_LEN+1);\r
749                         ReadStringFromReg(hKey4, "FwallPass", Str, 255);\r
750                         DecodePassword(Str, FwallPass);\r
751                         ReadIntValueFromReg(hKey4, "FwallPort", &FwallPort);\r
752                         ReadIntValueFromReg(hKey4, "FwallType", &FwallType);\r
753                         ReadIntValueFromReg(hKey4, "FwallDef", &FwallDefault);\r
754                         ReadIntValueFromReg(hKey4, "FwallSec", &FwallSecurity);\r
755                         ReadIntValueFromReg(hKey4, "PasvDef", &PasvDefault);\r
756                         ReadIntValueFromReg(hKey4, "FwallRes", &FwallResolv);\r
757                         ReadIntValueFromReg(hKey4, "FwallLow", &FwallLower);\r
758                         ReadIntValueFromReg(hKey4, "FwallDel", &FwallDelimiter);\r
759 \r
760                         ReadIntValueFromReg(hKey4, "SndConSw", &Sound[SND_CONNECT].On);\r
761                         ReadIntValueFromReg(hKey4, "SndTrnSw", &Sound[SND_TRANS].On);\r
762                         ReadIntValueFromReg(hKey4, "SndErrSw", &Sound[SND_ERROR].On);\r
763                         ReadStringFromReg(hKey4, "SndCon", Sound[SND_CONNECT].Fname, FMAX_PATH+1);\r
764                         ReadStringFromReg(hKey4, "SndTrn", Sound[SND_TRANS].Fname, FMAX_PATH+1);\r
765                         ReadStringFromReg(hKey4, "SndErr", Sound[SND_ERROR].Fname, FMAX_PATH+1);\r
766 \r
767                         ReadMultiStringFromReg(hKey4, "DefAttr", DefAttrList, DEFATTRLIST_LEN+1);\r
768 \r
769                         ReadStringFromReg(hKey4, "Tmp", TmpPath, FMAX_PATH+1);\r
770 \r
771                         ReadBinaryFromReg(hKey4, "Hdlg", &HostDlgSize, sizeof(SIZE));\r
772                         ReadBinaryFromReg(hKey4, "Bdlg", &BmarkDlgSize, sizeof(SIZE));\r
773                         ReadBinaryFromReg(hKey4, "Mdlg", &MirrorDlgSize, sizeof(SIZE));\r
774 \r
775                         ReadIntValueFromReg(hKey4, "FAttrSw", &FolderAttr);\r
776                         ReadIntValueFromReg(hKey4, "FAttr", &FolderAttrNum);\r
777 \r
778                         ReadIntValueFromReg(hKey4, "NoSave", &SuppressSave);\r
779 \r
780                         ReadIntValueFromReg(hKey4, "HistNum", &FileHist);\r
781 //                      ReadMultiStringFromReg(hKey4, "Hist", Hist, (FMAX_PATH+1)*HISTORY_MAX+1);\r
782 \r
783                         /* ヒストリの設定を読み込む */\r
784                         Sets = 0;\r
785                         ReadIntValueFromReg(hKey4, "SavedHist", &Sets);\r
786 \r
787                         for(i = 0; i < Sets; i++)\r
788                         {\r
789                                 sprintf(Str, "History%d", i);\r
790                                 if(OpenSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
791                                 {\r
792                                         CopyDefaultHistory(&Hist);\r
793 \r
794                                         ReadStringFromReg(hKey5, "HostAdrs", Hist.HostAdrs, HOST_ADRS_LEN+1);\r
795                                         ReadStringFromReg(hKey5, "UserName", Hist.UserName, USER_NAME_LEN+1);\r
796                                         ReadStringFromReg(hKey5, "Account", Hist.Account, ACCOUNT_LEN+1);\r
797                                         ReadStringFromReg(hKey5, "LocalDir", Hist.LocalInitDir, INIT_DIR_LEN+1);\r
798                                         ReadStringFromReg(hKey5, "RemoteDir", Hist.RemoteInitDir, INIT_DIR_LEN+1);\r
799                                         ReadStringFromReg(hKey5, "Chmod", Hist.ChmodCmd, CHMOD_CMD_LEN+1);\r
800                                         ReadStringFromReg(hKey5, "Nlst", Hist.LsName, NLST_NAME_LEN+1);\r
801                                         ReadStringFromReg(hKey5, "Init", Hist.InitCmd, INITCMD_LEN+1);\r
802                                         ReadIntValueFromReg(hKey5, "Port", &Hist.Port);\r
803                                         ReadIntValueFromReg(hKey5, "Kanji", &Hist.KanjiCode);\r
804                                         ReadIntValueFromReg(hKey5, "KanaCnv", &Hist.KanaCnv);\r
805                                         ReadIntValueFromReg(hKey5, "NameKanji", &Hist.NameKanjiCode);\r
806                                         ReadIntValueFromReg(hKey5, "NameKana", &Hist.NameKanaCnv);\r
807                                         ReadIntValueFromReg(hKey5, "Pasv", &Hist.Pasv);\r
808                                         ReadIntValueFromReg(hKey5, "Fwall", &Hist.FireWall);\r
809                                         ReadIntValueFromReg(hKey5, "List", &Hist.ListCmdOnly);\r
810                                         ReadIntValueFromReg(hKey5, "NLST-R", &Hist.UseNLST_R);\r
811                                         ReadIntValueFromReg(hKey5, "Tzone", &Hist.TimeZone);\r
812                                         ReadIntValueFromReg(hKey5, "Type", &Hist.HostType);\r
813                                         ReadIntValueFromReg(hKey5, "Sync", &Hist.SyncMove);\r
814                                         ReadIntValueFromReg(hKey5, "Fpath", &Hist.NoFullPath);\r
815                                         ReadBinaryFromReg(hKey5, "Sort", &Hist.Sort, sizeof(Hist.Sort));\r
816                                         ReadIntValueFromReg(hKey5, "Secu", &Hist.Security);\r
817                                         ReadIntValueFromReg(hKey5, "TrType", &Hist.Type);\r
818                                         strcpy(Str, "");\r
819                                         ReadStringFromReg(hKey5, "Password", Str, 255);\r
820                                         DecodePassword(Str, Hist.PassWord);\r
821                                         ReadIntValueFromReg(hKey5, "Dial", &Hist.Dialup);\r
822                                         ReadIntValueFromReg(hKey5, "UseIt", &Hist.DialupAlways);\r
823                                         ReadIntValueFromReg(hKey5, "Notify", &Hist.DialupNotify);\r
824                                         ReadStringFromReg(hKey5, "DialTo", Hist.DialEntry, RAS_NAME_LEN+1);\r
825                                         // 暗号化通信対応\r
826                                         ReadIntValueFromReg(hKey5, "NoEncryption", &Hist.UseNoEncryption);\r
827                                         ReadIntValueFromReg(hKey5, "FTPES", &Hist.UseFTPES);\r
828                                         ReadIntValueFromReg(hKey5, "FTPIS", &Hist.UseFTPIS);\r
829                                         ReadIntValueFromReg(hKey5, "SFTP", &Hist.UseSFTP);\r
830                                         strcpy(Str, "");\r
831                                         ReadStringFromReg(hKey5, "PKey", Str, PRIVATE_KEY_LEN*4+1);\r
832                                         DecodePassword(Str, Hist.PrivateKey);\r
833                                         // 同時接続対応\r
834                                         ReadIntValueFromReg(hKey5, "ThreadCount", &Hist.MaxThreadCount);\r
835                                         // MLSD対応\r
836                                         ReadIntValueFromReg(hKey5, "MLSD", &Hist.UseMLSD);\r
837                                         // IPv6対応\r
838                                         ReadIntValueFromReg(hKey5, "IPv6", &Hist.UseIPv6);\r
839 \r
840                                         CloseSubKey(hKey5);\r
841                                         AddHistoryToHistory(&Hist);\r
842                                 }\r
843                         }\r
844 \r
845                         /* ホストの設定を読み込む */\r
846                         Sets = 0;\r
847                         ReadIntValueFromReg(hKey4, "SetNum", &Sets);\r
848 \r
849                         for(i = 0; i < Sets; i++)\r
850                         {\r
851                                 sprintf(Str, "Host%d", i);\r
852                                 if(OpenSubKey(hKey4, Str, &hKey5) == FFFTP_SUCCESS)\r
853                                 {\r
854                                         CopyDefaultHost(&Host);\r
855                                         /* 下位互換性のため */\r
856                                         // SourceForge.JPによるフォーク\r
857 //                                      if(Version < VER_NUM)\r
858                                         if(Version < 1921)\r
859                                         {\r
860                                                 Host.Pasv = NO;\r
861                                                 Host.ListCmdOnly = NO;\r
862                                         }\r
863                                         // 1.97b以前はデフォルトでShift_JIS\r
864                                         if(Version < 1980)\r
865                                                 Host.NameKanjiCode = KANJI_SJIS;\r
866                                         ReadIntValueFromReg(hKey5, "Set", &Host.Level);\r
867 \r
868                                         ReadStringFromReg(hKey5, "HostName", Host.HostName, HOST_NAME_LEN+1);\r
869                                         ReadStringFromReg(hKey5, "HostAdrs", Host.HostAdrs, HOST_ADRS_LEN+1);\r
870                                         ReadStringFromReg(hKey5, "UserName", Host.UserName, USER_NAME_LEN+1);\r
871                                         ReadStringFromReg(hKey5, "Account", Host.Account, ACCOUNT_LEN+1);\r
872                                         ReadStringFromReg(hKey5, "LocalDir", Host.LocalInitDir, INIT_DIR_LEN+1);\r
873                                         ReadStringFromReg(hKey5, "RemoteDir", Host.RemoteInitDir, INIT_DIR_LEN+1);\r
874                                         ReadStringFromReg(hKey5, "Chmod", Host.ChmodCmd, CHMOD_CMD_LEN+1);\r
875                                         ReadStringFromReg(hKey5, "Nlst", Host.LsName, NLST_NAME_LEN+1);\r
876                                         ReadStringFromReg(hKey5, "Init", Host.InitCmd, INITCMD_LEN+1);\r
877                                         ReadIntValueFromReg(hKey5, "Port", &Host.Port);\r
878                                         ReadIntValueFromReg(hKey5, "Anonymous", &Host.Anonymous);\r
879                                         ReadIntValueFromReg(hKey5, "Kanji", &Host.KanjiCode);\r
880                                         ReadIntValueFromReg(hKey5, "KanaCnv", &Host.KanaCnv);\r
881                                         ReadIntValueFromReg(hKey5, "NameKanji", &Host.NameKanjiCode);\r
882                                         ReadIntValueFromReg(hKey5, "NameKana", &Host.NameKanaCnv);\r
883                                         ReadIntValueFromReg(hKey5, "Pasv", &Host.Pasv);\r
884                                         ReadIntValueFromReg(hKey5, "Fwall", &Host.FireWall);\r
885                                         ReadIntValueFromReg(hKey5, "List", &Host.ListCmdOnly);\r
886                                         ReadIntValueFromReg(hKey5, "NLST-R", &Host.UseNLST_R);\r
887                                         ReadIntValueFromReg(hKey5, "Last", &Host.LastDir);\r
888                                         ReadIntValueFromReg(hKey5, "Tzone", &Host.TimeZone);\r
889                                         ReadIntValueFromReg(hKey5, "Type", &Host.HostType);\r
890                                         ReadIntValueFromReg(hKey5, "Sync", &Host.SyncMove);\r
891                                         ReadIntValueFromReg(hKey5, "Fpath", &Host.NoFullPath);\r
892                                         ReadBinaryFromReg(hKey5, "Sort", &Host.Sort, sizeof(Host.Sort));\r
893                                         ReadIntValueFromReg(hKey5, "Secu", &Host.Security);\r
894                                         if(Host.Anonymous != YES)\r
895                                         {\r
896                                                 strcpy(Str, "");\r
897                                                 ReadStringFromReg(hKey5, "Password", Str, 255);\r
898                                                 DecodePassword(Str, Host.PassWord);\r
899                                         }\r
900                                         else\r
901                                                 strcpy(Host.PassWord, UserMailAdrs);\r
902 \r
903                                         ReadMultiStringFromReg(hKey5, "Bmarks", Host.BookMark, BOOKMARK_SIZE);\r
904 \r
905                                         ReadIntValueFromReg(hKey5, "Dial", &Host.Dialup);\r
906                                         ReadIntValueFromReg(hKey5, "UseIt", &Host.DialupAlways);\r
907                                         ReadIntValueFromReg(hKey5, "Notify", &Host.DialupNotify);\r
908                                         ReadStringFromReg(hKey5, "DialTo", Host.DialEntry, RAS_NAME_LEN+1);\r
909                                         // 暗号化通信対応\r
910                                         ReadIntValueFromReg(hKey5, "NoEncryption", &Host.UseNoEncryption);\r
911                                         ReadIntValueFromReg(hKey5, "FTPES", &Host.UseFTPES);\r
912                                         ReadIntValueFromReg(hKey5, "FTPIS", &Host.UseFTPIS);\r
913                                         ReadIntValueFromReg(hKey5, "SFTP", &Host.UseSFTP);\r
914                                         strcpy(Str, "");\r
915                                         ReadStringFromReg(hKey5, "PKey", Str, PRIVATE_KEY_LEN*4+1);\r
916                                         DecodePassword(Str, Host.PrivateKey);\r
917                                         // 同時接続対応\r
918                                         ReadIntValueFromReg(hKey5, "ThreadCount", &Host.MaxThreadCount);\r
919                                         // MLSD対応\r
920                                         ReadIntValueFromReg(hKey5, "MLSD", &Host.UseMLSD);\r
921                                         // IPv6対応\r
922                                         ReadIntValueFromReg(hKey5, "IPv6", &Host.UseIPv6);\r
923 \r
924                                         CloseSubKey(hKey5);\r
925 \r
926                                         AddHostToList(&Host, -1, Host.Level);\r
927                                 }\r
928                         }\r
929 \r
930                         ReadIntValueFromReg(hKey4, "CurSet", &Sets);\r
931                         SetCurrentHost(Sets);\r
932 \r
933                         // 暗号化通信対応\r
934                         ReadBinaryFromReg(hKey4, "CertCacheHash", &CertificateCacheHash, sizeof(CertificateCacheHash));\r
935 \r
936                         CloseSubKey(hKey4);\r
937                 }\r
938                 CloseReg(hKey3);\r
939         }\r
940         else\r
941         {\r
942                 /*===== 最初の起動時(設定が無い) =====*/\r
943 \r
944 #if 0\r
945                 strcpy(UserMailAdrs, "");\r
946                 strcpy(Str, "");\r
947                 if(InputDialogBox(mailadrs_dlg, HWND_DESKTOP, NULL, Str, USER_MAIL_LEN+1, &i, IDH_HELP_TOPIC_0000001) == YES)\r
948                         strcpy(UserMailAdrs, Str);\r
949 \r
950                 for(i = 0; i < SAMPLE_HOSTS; i++)\r
951                 {\r
952                         CopyDefaultHost(&Host);\r
953                         Host.Level = Sample[i].Level;\r
954                         strcpy(Host.PassWord, UserMailAdrs);\r
955                         strcpy(Host.HostName, Sample[i].HostName);\r
956                         strcpy(Host.HostAdrs, Sample[i].HostAdrs);\r
957                         strcpy(Host.UserName, "anonymous");\r
958                         AddHostToList(&Host, -1, Host.Level);\r
959                 }\r
960 #endif\r
961         }\r
962         return(Sts);\r
963 }\r
964 \r
965 \r
966 /*----- 隠しドライブ情報を取得 ------------------------------------------------\r
967 *\r
968 *       Parameter\r
969 *               なし\r
970 *\r
971 *       Return Value\r
972 *               DWORD \r
973 *                       YES/NO=設定無し\r
974 *----------------------------------------------------------------------------*/\r
975 \r
976 DWORD LoadHideDriveListRegistory(void)\r
977 {\r
978         HKEY hKey1;\r
979         HKEY hKey2;\r
980         HKEY hKey3;\r
981         HKEY hKey4;\r
982         HKEY hKey5;\r
983         HKEY hKey6;\r
984         DWORD Size;\r
985         DWORD Type;\r
986         DWORD Ret;\r
987 \r
988         Ret = 0;\r
989         if(RegOpenKeyEx(HKEY_CURRENT_USER, "Software", 0, KEY_READ, &hKey1) == ERROR_SUCCESS)\r
990         {\r
991                 if(RegOpenKeyEx(hKey1, "Microsoft", 0, KEY_READ, &hKey2) == ERROR_SUCCESS)\r
992                 {\r
993                         if(RegOpenKeyEx(hKey2, "Windows", 0, KEY_READ, &hKey3) == ERROR_SUCCESS)\r
994                         {\r
995                                 if(RegOpenKeyEx(hKey3, "CurrentVersion", 0, KEY_READ, &hKey4) == ERROR_SUCCESS)\r
996                                 {\r
997                                         if(RegOpenKeyEx(hKey4, "Policies", 0, KEY_READ, &hKey5) == ERROR_SUCCESS)\r
998                                         {\r
999                                                 if(RegOpenKeyEx(hKey5, "Explorer", 0, KEY_READ, &hKey6) == ERROR_SUCCESS)\r
1000                                                 {\r
1001                                                         Size = sizeof(DWORD);\r
1002                                                         RegQueryValueEx(hKey6, "NoDrives", NULL, &Type, (BYTE *)&Ret, &Size);\r
1003                                                         RegCloseKey(hKey6);\r
1004                                                 }\r
1005                                                 RegCloseKey(hKey5);\r
1006                                         }\r
1007                                         RegCloseKey(hKey4);\r
1008                                 }\r
1009                                 RegCloseKey(hKey3);\r
1010                         }\r
1011                         RegCloseKey(hKey2);\r
1012                 }\r
1013                 RegCloseKey(hKey1);\r
1014         }\r
1015         return(Ret);\r
1016 }\r
1017 \r
1018 \r
1019 /*----- レジストリの設定値をクリア --------------------------------------------\r
1020 *\r
1021 *       Parameter\r
1022 *               なし\r
1023 *\r
1024 *       Return Value\r
1025 *               なし\r
1026 *----------------------------------------------------------------------------*/\r
1027 \r
1028 void ClearRegistory(void)\r
1029 {\r
1030         HKEY hKey2;\r
1031         HKEY hKey3;\r
1032         HKEY hKey4;\r
1033         DWORD Dispos;\r
1034         char Str[20];\r
1035         int i;\r
1036 \r
1037         if(RegCreateKeyEx(HKEY_CURRENT_USER, "Software\\Sota", 0, "", REG_OPTION_NON_VOLATILE, KEY_CREATE_SUB_KEY, NULL, &hKey2, &Dispos) == ERROR_SUCCESS)\r
1038         {\r
1039                 if(RegCreateKeyEx(hKey2, "FFFTP", 0, "", REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL, &hKey3, &Dispos) == ERROR_SUCCESS)\r
1040                 {\r
1041                         if(RegCreateKeyEx(hKey3, "Options", 0, "", REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL, &hKey4, &Dispos) == ERROR_SUCCESS)\r
1042                         {\r
1043                                 for(i = 0; ; i++)\r
1044                                 {\r
1045                                         sprintf(Str, "Host%d", i);\r
1046                                         if(RegDeleteKey(hKey4, Str) != ERROR_SUCCESS)\r
1047                                                 break;\r
1048                                 }\r
1049                                 for(i = 0; ; i++)\r
1050                                 {\r
1051                                         sprintf(Str, "History%d", i);\r
1052                                         if(RegDeleteKey(hKey4, Str) != ERROR_SUCCESS)\r
1053                                                 break;\r
1054                                 }\r
1055                                 RegCloseKey(hKey4);\r
1056                         }\r
1057                         RegDeleteKey(hKey3, "Options");\r
1058                         RegCloseKey(hKey3);\r
1059                 }\r
1060                 RegDeleteKey(hKey2, "FFFTP");\r
1061                 RegCloseKey(hKey2);\r
1062         }\r
1063         return;\r
1064 }\r
1065 \r
1066 \r
1067 /*----- 設定をファイルに保存 --------------------------------------------------\r
1068 *\r
1069 *       Parameter\r
1070 *               なし\r
1071 *\r
1072 *       Return Value\r
1073 *               なし\r
1074 *----------------------------------------------------------------------------*/\r
1075 \r
1076 void SaveSettingsToFile(void)\r
1077 {\r
1078         char Tmp[FMAX_PATH*2];\r
1079         char Fname[FMAX_PATH+1];\r
1080 \r
1081         if(RegType == REGTYPE_REG)\r
1082         {\r
1083                 strcpy(Fname, "FFFTP.reg");\r
1084                 if(SelectFile(GetMainHwnd(), Fname, MSGJPN286, MSGJPN287, "reg", OFN_EXTENSIONDIFFERENT | OFN_OVERWRITEPROMPT, 1) == TRUE)\r
1085                 {\r
1086                         sprintf(Tmp, "/e \x22%s\x22 HKEY_CURRENT_USER\\Software\\sota\\FFFTP", Fname);\r
1087                         if(ShellExecute(NULL, "open", "regedit", Tmp, ".", SW_SHOW) <= (HINSTANCE)32)\r
1088                         {\r
1089                                 MessageBox(NULL, MSGJPN285, "FFFTP", MB_OK);\r
1090                         }\r
1091                 }\r
1092         }\r
1093         else\r
1094         {\r
1095                 strcpy(Fname, "FFFTP-Backup.ini");\r
1096                 if(SelectFile(GetMainHwnd(), Fname, MSGJPN286, MSGJPN288, "ini", OFN_EXTENSIONDIFFERENT | OFN_OVERWRITEPROMPT, 1) == TRUE)\r
1097                 {\r
1098                         CopyFile(AskIniFilePath(), Fname, FALSE);\r
1099                 }\r
1100         }\r
1101         return;\r
1102 }\r
1103 \r
1104 \r
1105 /*----- 設定をファイルから復元 ------------------------------------------------\r
1106 *\r
1107 *       Parameter\r
1108 *               なし\r
1109 *\r
1110 *       Return Value\r
1111 *               int     ロードしたかどうか (YES/NO)\r
1112 *----------------------------------------------------------------------------*/\r
1113 \r
1114 int LoadSettingsFromFile(void)\r
1115 {\r
1116         int Ret;\r
1117         char Tmp[FMAX_PATH*2];\r
1118         char Fname[FMAX_PATH+1];\r
1119 \r
1120         Ret = NO;\r
1121         strcpy(Fname, "");\r
1122         if(SelectFile(GetMainHwnd(), Fname, MSGJPN291, MSGJPN290, "", OFN_FILEMUSTEXIST, 0) == TRUE)\r
1123         {\r
1124                 if((strlen(Fname) >= 5) && (_stricmp(&Fname[strlen(Fname)-4], ".reg") == 0))\r
1125                 {\r
1126                         sprintf(Tmp, "\x22%s\x22", Fname);\r
1127                         if(ShellExecute(NULL, "open", "regedit", Tmp, ".", SW_SHOW) <= (HINSTANCE)32)\r
1128                         {\r
1129                                 MessageBox(NULL, MSGJPN285, "FFFTP", MB_OK);\r
1130                         }\r
1131                         else\r
1132                         {\r
1133                                 Ret = YES;\r
1134                                 /* レジストリエディタが終了するのを待つ */\r
1135 //                              WaitForSingleObject(Info.hProcess, INFINITE);\r
1136                         }\r
1137                 }\r
1138                 else if((strlen(Fname) >= 5) && (_stricmp(&Fname[strlen(Fname)-4], ".ini") == 0))\r
1139                 {\r
1140                         CopyFile(Fname, AskIniFilePath(), FALSE);\r
1141                         Ret = YES;\r
1142                 }\r
1143                 else\r
1144                         MessageBox(NULL, MSGJPN293, "FFFTP", MB_OK);\r
1145         }\r
1146         return(Ret);\r
1147 }\r
1148 \r
1149 \r
1150 \r
1151 \r
1152 /*----- レジストリ/INIファイルに文字列をセーブ --------------------------------\r
1153 *\r
1154 *       Parameter\r
1155 *               HKEY hKey : レジストリキー\r
1156 *               char *Key : キー名\r
1157 *               char *Str : セーブする文字列\r
1158 *               char *DefaultStr : デフォルトの文字列\r
1159 *\r
1160 *       Return Value\r
1161 *               なし\r
1162 *\r
1163 *       Note\r
1164 *               文字列がデフォルトの文字列と同じならセーブしない\r
1165 *----------------------------------------------------------------------------*/\r
1166 \r
1167 static void SaveStr(HKEY hKey, char *Key, char *Str, char *DefaultStr)\r
1168 {\r
1169         if((DefaultStr != NULL) && (strcmp(Str, DefaultStr) == 0))\r
1170                 DeleteValue(hKey, Key);\r
1171         else\r
1172                 WriteStringToReg(hKey, Key, Str);\r
1173 \r
1174         return;\r
1175 }\r
1176 \r
1177 \r
1178 /*----- レジストリ/INIファイルに数値(INT)をセーブ -----------------------------\r
1179 *\r
1180 *       Parameter\r
1181 *               HKEY hKey : レジストリキー\r
1182 *               char *Key : キー名\r
1183 *               int Num : セーブする値\r
1184 *               int DefaultNum : デフォルトの値\r
1185 *\r
1186 *       Return Value\r
1187 *               なし\r
1188 *\r
1189 *       Note\r
1190 *               数値がデフォルトの値と同じならセーブしない\r
1191 *----------------------------------------------------------------------------*/\r
1192 \r
1193 static void SaveIntNum(HKEY hKey, char *Key, int Num, int DefaultNum)\r
1194 {\r
1195         if(Num == DefaultNum)\r
1196                 DeleteValue(hKey, Key);\r
1197         else\r
1198                 WriteIntValueToReg(hKey, Key, Num);\r
1199 \r
1200         return;\r
1201 }\r
1202 \r
1203 \r
1204 /*----- LOGFONTデータを文字列に変換する ---------------------------------------\r
1205 *\r
1206 *       Parameter\r
1207 *               LOGFONT Font : フォントデータ\r
1208 *               HFONT hFont : フォントのハンドル\r
1209 *                       NULL = デフォルトのフォント\r
1210 *               char *Buf : バッファ\r
1211 *\r
1212 *       Return Value\r
1213 *               なし\r
1214 *----------------------------------------------------------------------------*/\r
1215 \r
1216 static void MakeFontData(LOGFONT Font, HFONT hFont, char *Buf)\r
1217 {\r
1218         *Buf = NUL;\r
1219         if(hFont != NULL)\r
1220                 sprintf(Buf, "%d %d %d %d %d %d %d %d %d %d %d %d %d %s",\r
1221                         Font.lfHeight, Font.lfWidth, Font.lfEscapement, Font.lfOrientation,\r
1222                         Font.lfWeight, Font.lfItalic, Font.lfUnderline, Font.lfStrikeOut,\r
1223                         Font.lfCharSet, Font.lfOutPrecision, Font.lfClipPrecision,\r
1224                         Font.lfQuality, Font.lfPitchAndFamily, Font.lfFaceName);\r
1225         return;\r
1226 }\r
1227 \r
1228 \r
1229 /*----- 文字列をLOGFONTデータに変換する ---------------------------------------\r
1230 *\r
1231 *       Parameter\r
1232 *               char *Str : 文字列\r
1233 *               LOGFONT *Font : フォントデータ\r
1234 *\r
1235 *       Return Value\r
1236 *               int ステータス\r
1237 *                       FFFTP_SUCCESS/FFFTP_FAIL=変換できない\r
1238 *----------------------------------------------------------------------------*/\r
1239 \r
1240 static int RestoreFontData(char *Str, LOGFONT *Font)\r
1241 {\r
1242         int i;\r
1243         int Sts;\r
1244 \r
1245         Sts = FFFTP_FAIL;\r
1246         if(sscanf(Str, "%d %d %d %d %d %d %d %d %d %d %d %d %d",\r
1247                         &(Font->lfHeight), &(Font->lfWidth), &(Font->lfEscapement), &(Font->lfOrientation),\r
1248                         &(Font->lfWeight), &(Font->lfItalic), &(Font->lfUnderline), &(Font->lfStrikeOut),\r
1249                         &(Font->lfCharSet), &(Font->lfOutPrecision), &(Font->lfClipPrecision),\r
1250                         &(Font->lfQuality), &(Font->lfPitchAndFamily)) == 13)\r
1251         {\r
1252                 for(i = 13; i > 0; i--)\r
1253                 {\r
1254                         if((Str = strchr(Str, ' ')) == NULL)\r
1255                                 break;\r
1256                         Str++;\r
1257                 }\r
1258                 if(i == 0)\r
1259                 {\r
1260                         strcpy(Font->lfFaceName, Str);\r
1261                         Sts = FFFTP_SUCCESS;\r
1262                 }\r
1263         }\r
1264 \r
1265         if(Sts == FFFTP_FAIL)\r
1266                 memset(Font, NUL, sizeof(LOGFONT));\r
1267 \r
1268         return(Sts);\r
1269 }\r
1270 \r
1271 /*----- パスワードを暗号化する ------------------------------------------------\r
1272 *\r
1273 *       Parameter\r
1274 *               char *Str : パスワード\r
1275 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1276 *\r
1277 *       Return Value\r
1278 *               なし\r
1279 *----------------------------------------------------------------------------*/\r
1280 static void EncodePassword(char *Str, char *Buf)\r
1281 {\r
1282         EncodePassword3( Str, Buf, SecretKey );\r
1283 }\r
1284 \r
1285 /*----- パスワードを暗号化する(オリジナルアルゴリズム)  ------------------\r
1286 *\r
1287 *       Parameter\r
1288 *               char *Str : パスワード\r
1289 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1290 *\r
1291 *       Return Value\r
1292 *               なし\r
1293 *----------------------------------------------------------------------------*/\r
1294 \r
1295 static void EncodePasswordOriginal(char *Str, char *Buf)\r
1296 {\r
1297         unsigned char *Get;\r
1298         unsigned char *Put;\r
1299         int Rnd;\r
1300         int Ch;\r
1301 \r
1302         srand((unsigned)time(NULL));\r
1303 \r
1304         Get = (unsigned char *)Str;\r
1305         Put = (unsigned char *)Buf;\r
1306         \r
1307         if( *Get == NUL ){\r
1308                 *Put = NUL;\r
1309                 return;\r
1310         }\r
1311 \r
1312         /* 識別子を先頭に置く */\r
1313         Put[0] = '0';\r
1314         Put[1] = 'A';\r
1315         Put += 2;\r
1316 \r
1317         while(*Get != NUL)\r
1318         {\r
1319                 Rnd = rand() % 3;\r
1320                 Ch = ((int)*Get++) << Rnd;\r
1321                 Ch = (unsigned char)Ch | (unsigned char)(Ch >> 8);\r
1322                 *Put++ = 0x40 | ((Rnd & 0x3) << 4) | (Ch & 0xF);\r
1323                 *Put++ = 0x40 | ((Ch >> 4) & 0xF);\r
1324                 if((*(Put-2) & 0x1) != 0)\r
1325                         *Put++ = (rand() % 62) + 0x40;\r
1326         }\r
1327         *Put = NUL;\r
1328         return;\r
1329 }\r
1330 \r
1331 /*----- パスワードを暗号化する(オリジナルアルゴリズム^Key)  ----------------\r
1332 *\r
1333 *       Parameter\r
1334 *               char *Str : パスワード\r
1335 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1336 *               const char *Key : 暗号化キー\r
1337 *\r
1338 *       Return Value\r
1339 *               なし\r
1340 *----------------------------------------------------------------------------*/\r
1341 \r
1342 static void EncodePassword2(char *Str, char *Buf, const char* Key)\r
1343 {\r
1344         unsigned char *Get;\r
1345         unsigned char *Put;\r
1346         int Rnd;\r
1347         int Ch;\r
1348 \r
1349         /* 2010.01.31 genta Key */\r
1350         unsigned char *KeyHead = (unsigned char *)Key;\r
1351         unsigned char *KeyEnd = KeyHead + strlen(KeyHead);\r
1352         unsigned char *KeyCurrent = KeyHead;\r
1353 \r
1354         srand((unsigned)time(NULL));\r
1355 \r
1356         Get = (unsigned char *)Str;\r
1357         Put = (unsigned char *)Buf;\r
1358         \r
1359         if( *Get == NUL ){\r
1360                 *Put = NUL;\r
1361                 return;\r
1362         }\r
1363 \r
1364         /* 識別子を先頭に置く */\r
1365         Put[0] = '0';\r
1366         Put[1] = 'B';\r
1367         Put += 2;\r
1368 \r
1369         while(*Get != NUL)\r
1370         {\r
1371                 Rnd = rand() % 3;\r
1372                 Ch = ((int)(*Get++ ^ *KeyCurrent)) << Rnd;\r
1373                 Ch = (unsigned char)Ch | (unsigned char)(Ch >> 8);\r
1374                 *Put++ = 0x40 | ((Rnd & 0x3) << 4) | (Ch & 0xF);\r
1375                 *Put++ = 0x40 | ((Ch >> 4) & 0xF);\r
1376                 if((*(Put-2) & 0x1) != 0)\r
1377                         *Put++ = (rand() % 62) + 0x40;\r
1378 \r
1379                 /* 2010.01.31 genta Key */\r
1380                 if( ++KeyCurrent == KeyEnd ){\r
1381                         KeyCurrent = KeyHead;\r
1382                 }\r
1383         }\r
1384         *Put = NUL;\r
1385         return;\r
1386 }\r
1387 \r
1388 /*----- パスワードを暗号化する(AES) ------------------------------------------\r
1389 *\r
1390 *       Parameter\r
1391 *               char *Str : パスワード\r
1392 *               char *Buf : 暗号化したパスワードを格納するバッファ\r
1393 *               const char *Key : 暗号化キー\r
1394 *\r
1395 *       Return Value\r
1396 *               なし\r
1397 *----------------------------------------------------------------------------*/\r
1398 \r
1399 static void EncodePassword3(char *Str, char *Buf, const char *Key)\r
1400 {\r
1401         unsigned char *Put;\r
1402         unsigned char *AesEncBuf;\r
1403         unsigned char *StrPadBuf;\r
1404         size_t StrLen;\r
1405         size_t StrPadLen;\r
1406         size_t StrPadIndex;\r
1407         size_t IvIndex;\r
1408         size_t EncBufIndex;\r
1409         DWORD RandValue;\r
1410         int RandByteCount;\r
1411         unsigned char AesKey[32];\r
1412         unsigned char AesCbcIv[AES_BLOCK_SIZE];\r
1413         aes_encrypt_ctx Ctx;\r
1414 \r
1415         Buf[0] = NUL;\r
1416 \r
1417         Put = (unsigned char *)Buf;\r
1418         StrLen = strlen(Str);\r
1419         StrPadLen = ((StrLen + AES_BLOCK_SIZE - 1) / AES_BLOCK_SIZE) * AES_BLOCK_SIZE;\r
1420 \r
1421         /* 最低長を32文字とする */\r
1422 //      StrPadLen = min1(StrPadLen, AES_BLOCK_SIZE * 2);\r
1423         StrPadLen = max1(StrPadLen, AES_BLOCK_SIZE * 2);\r
1424 \r
1425         if((StrPadBuf = malloc(StrPadLen)) != NULL)\r
1426         {\r
1427                 if((AesEncBuf = malloc(StrPadLen)) != NULL)\r
1428                 {\r
1429                         BOOL PutState;\r
1430 \r
1431                         PutState = FALSE;\r
1432                         strncpy(StrPadBuf, Str, StrPadLen);\r
1433                         \r
1434                         /* PAD部分を乱数で埋める StrPad[StrLen](が有効な場合) は NUL */\r
1435                         for(StrPadIndex = StrLen + 1; StrPadIndex < StrPadLen;)\r
1436                         {\r
1437                                 RandValue = GetRandamDWRODValue();\r
1438                                 for(RandByteCount = 0; RandByteCount < 4; RandByteCount++)\r
1439                                 {\r
1440                                         if(StrPadIndex < StrPadLen)\r
1441                                         {\r
1442                                                 StrPadBuf[StrPadIndex++] = (unsigned char)(RandValue & 0xff);\r
1443                                                 RandValue >>= 8;\r
1444                                         }\r
1445                                 }\r
1446                         }\r
1447                         \r
1448                         // IVの初期化\r
1449                         for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE;)\r
1450                         {\r
1451                                 RandValue = GetRandamDWRODValue();\r
1452                                 for(RandByteCount = 0; RandByteCount < 4; RandByteCount++)\r
1453                                 {\r
1454                                         if(IvIndex < AES_BLOCK_SIZE)\r
1455                                         {\r
1456                                                 AesCbcIv[IvIndex++] = (unsigned char)(RandValue & 0xff);\r
1457                                                 RandValue >>= 8;\r
1458                                         }\r
1459                                 }\r
1460                         }\r
1461                         Put[0] = '0';\r
1462                         Put[1] = 'C';\r
1463                         Put += 2;\r
1464                         for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE; IvIndex++)\r
1465                         {\r
1466                                 sprintf(Put, "%02x", AesCbcIv[IvIndex]);\r
1467                                 Put += 2;\r
1468                         }\r
1469                         *Put++ = ':';\r
1470 \r
1471                         if(CreateAesKey(AesKey, Key) == FFFTP_SUCCESS)\r
1472                         {\r
1473                                 aes_encrypt_key(AesKey, 32, &Ctx);\r
1474 \r
1475                                 if(aes_cbc_encrypt(StrPadBuf, AesEncBuf, StrPadLen, AesCbcIv, &Ctx) == EXIT_SUCCESS)\r
1476                                 {\r
1477                                         for(EncBufIndex = 0; EncBufIndex < StrPadLen; EncBufIndex++)\r
1478                                         {\r
1479                                                 sprintf(Put, "%02x", AesEncBuf[EncBufIndex]);\r
1480                                                 Put += 2;\r
1481                                         }\r
1482                                         *Put = NUL;\r
1483                                         PutState = TRUE;\r
1484                                 }\r
1485                         }\r
1486                         if(FALSE == PutState)\r
1487                         {\r
1488                                 Buf[0] = NUL;\r
1489                         }\r
1490                         free(StrPadBuf);\r
1491                 }\r
1492                 free(AesEncBuf);\r
1493         }\r
1494         return;\r
1495 }\r
1496 \r
1497 \r
1498 /*----- パスワードの暗号化を解く ----------------------------------------------\r
1499 *\r
1500 *       Parameter\r
1501 *               char *Str : 暗号化したパスワード\r
1502 *               char *Buf : パスワードを格納するバッファ\r
1503 *\r
1504 *       Return Value\r
1505 *               なし\r
1506 *----------------------------------------------------------------------------*/\r
1507 \r
1508 static void DecodePassword(char *Str, char *Buf)\r
1509 {\r
1510         unsigned char *Get;\r
1511         unsigned char *Put;\r
1512 \r
1513         Get = (unsigned char *)Str;\r
1514         Put = (unsigned char *)Buf;\r
1515         \r
1516         if( *Get == NUL ){\r
1517                 *Put = NUL;\r
1518         }\r
1519         else if( 0x40 <= *Get && *Get < 0x80 ){\r
1520                 /* Original algorithm */\r
1521                 DecodePasswordOriginal( Str, Buf );\r
1522         }\r
1523         else if( strncmp( Get, "0A", 2 ) == 0 ){\r
1524                 DecodePasswordOriginal( Str + 2, Buf );\r
1525         }\r
1526         else if( strncmp( Get, "0B", 2 ) == 0 ){\r
1527                 DecodePassword2( Str + 2, Buf, SecretKey );\r
1528         }\r
1529         else if( strncmp( Get, "0C", 2 ) == 0 ){\r
1530                 DecodePassword3( Str + 2, Buf, SecretKey );\r
1531         }\r
1532         else {\r
1533                 //      unknown encoding\r
1534                 *Put = NUL;\r
1535                 return;\r
1536         }\r
1537 }\r
1538 \r
1539 /*----- パスワードの暗号化を解く(オリジナルアルゴリズム) -------------------\r
1540 *\r
1541 *       Parameter\r
1542 *               char *Str : 暗号化したパスワード\r
1543 *               char *Buf : パスワードを格納するバッファ\r
1544 *\r
1545 *       Return Value\r
1546 *               なし\r
1547 *----------------------------------------------------------------------------*/\r
1548 static void DecodePasswordOriginal(char *Str, char *Buf)\r
1549 {\r
1550         unsigned char *Get;\r
1551         unsigned char *Put;\r
1552         int Rnd;\r
1553         int Ch;\r
1554 \r
1555         Get = (unsigned char *)Str;\r
1556         Put = (unsigned char *)Buf;\r
1557 \r
1558         while(*Get != NUL)\r
1559         {\r
1560                 Rnd = ((unsigned int)*Get >> 4) & 0x3;\r
1561                 Ch = (*Get & 0xF) | ((*(Get+1) & 0xF) << 4);\r
1562                 Ch <<= 8;\r
1563                 if((*Get & 0x1) != 0)\r
1564                         Get++;\r
1565                 Get += 2;\r
1566                 Ch >>= Rnd;\r
1567                 Ch = (Ch & 0xFF) | ((Ch >> 8) & 0xFF);\r
1568                 *Put++ = Ch;\r
1569         }\r
1570         *Put = NUL;\r
1571         return;\r
1572 }\r
1573 \r
1574 /*----- パスワードの暗号化を解く(オリジナルアルゴリズム^Key) -------------------\r
1575 *\r
1576 *       Parameter\r
1577 *               char *Str : 暗号化したパスワード\r
1578 *               char *Buf : パスワードを格納するバッファ\r
1579 *               const char *Key : 暗号化キー\r
1580 *\r
1581 *       Return Value\r
1582 *               なし\r
1583 *----------------------------------------------------------------------------*/\r
1584 static void DecodePassword2(char *Str, char *Buf, const char* Key)\r
1585 {\r
1586         int Rnd;\r
1587         int Ch;\r
1588         unsigned char *Get = (unsigned char *)Str;\r
1589         unsigned char *Put = (unsigned char *)Buf;\r
1590 \r
1591         /* 2010.01.31 genta Key */\r
1592         unsigned char *KeyHead = (unsigned char *)Key;\r
1593         unsigned char *KeyEnd = KeyHead + strlen(KeyHead);\r
1594         unsigned char *KeyCurrent = KeyHead;\r
1595 \r
1596         while(*Get != NUL)\r
1597         {\r
1598                 Rnd = ((unsigned int)*Get >> 4) & 0x3;\r
1599                 Ch = (*Get & 0xF) | ((*(Get+1) & 0xF) << 4);\r
1600                 Ch <<= 8;\r
1601                 if((*Get & 0x1) != 0)\r
1602                         Get++;\r
1603                 Get += 2;\r
1604                 Ch >>= Rnd;\r
1605                 Ch = (Ch & 0xFF) | ((Ch >> 8) & 0xFF);\r
1606                 *Put++ = Ch ^ *KeyCurrent;\r
1607                 \r
1608                 /* 2010.01.31 genta Key */\r
1609                 if( ++KeyCurrent == KeyEnd ){\r
1610                         KeyCurrent = KeyHead;\r
1611                 }\r
1612         }\r
1613         *Put = NUL;\r
1614         return;\r
1615 }\r
1616 \r
1617 /*----- パスワードの暗号化を解く(AES) ---------------------------------------\r
1618 *\r
1619 *       Parameter\r
1620 *               char *Str : 暗号化したパスワード\r
1621 *               char *Buf : パスワードを格納するバッファ\r
1622 *               const char *Key : 暗号化キー\r
1623 *\r
1624 *       Return Value\r
1625 *               なし\r
1626 *----------------------------------------------------------------------------*/\r
1627 \r
1628 static void DecodePassword3(char *Str, char *Buf, const char *Key)\r
1629 {\r
1630         char *Get;\r
1631         unsigned char *EncBuf;\r
1632         size_t StrLen;\r
1633         size_t IvIndex;\r
1634         size_t EncBufIndex;\r
1635         size_t EncBufLen;\r
1636         unsigned char AesKey[32];\r
1637         unsigned char AesCbcIv[AES_BLOCK_SIZE];\r
1638         aes_decrypt_ctx Ctx;\r
1639 \r
1640         Buf[0] = NUL;\r
1641 \r
1642         Get = Str;\r
1643         StrLen = strlen(Str);\r
1644 \r
1645         if(AES_BLOCK_SIZE * 2 + 1 < StrLen)\r
1646         {\r
1647 \r
1648                 EncBufLen = (StrLen - 1 ) / 2 - AES_BLOCK_SIZE;\r
1649                 if((EncBuf = malloc(EncBufLen)) != NULL)\r
1650                 {\r
1651                         for(IvIndex = 0; IvIndex < AES_BLOCK_SIZE; IvIndex++)\r
1652                         {\r
1653                                 AesCbcIv[IvIndex]  = hex2bin(*Get++) << 4;\r
1654                                 AesCbcIv[IvIndex] |= hex2bin(*Get++);\r
1655                         }\r
1656 \r
1657                         if(*Get++ == ':')\r
1658                         {\r
1659                                 if(CreateAesKey(AesKey, Key) == FFFTP_SUCCESS)\r
1660                                 {\r
1661                                         aes_decrypt_key(AesKey, 32, &Ctx);\r
1662 \r
1663                                         for(EncBufIndex = 0; EncBufIndex < EncBufLen; EncBufIndex++)\r
1664                                         {\r
1665                                                 EncBuf[EncBufIndex]  = hex2bin(*Get++) << 4;\r
1666                                                 EncBuf[EncBufIndex] |= hex2bin(*Get++);\r
1667                                         }\r
1668                                         if(aes_cbc_decrypt(EncBuf, Buf, EncBufLen, AesCbcIv, &Ctx) == EXIT_SUCCESS)\r
1669                                         {\r
1670                                                 Buf[EncBufLen] = NUL;\r
1671                                         }\r
1672                                 }\r
1673                         }\r
1674                         free(EncBuf);\r
1675                 }\r
1676         }\r
1677         return;\r
1678 }\r
1679 \r
1680 /*----- AES用固定長キーを作成 ----------------------------------------------\r
1681 *\r
1682 *       Parameter\r
1683 *               unsigned char *AesKey : AES暗号鍵\r
1684 *               const char *Key : 暗号化キー\r
1685 *\r
1686 *       Return Value\r
1687 *               int ステータス (FFFTP_SUCCESS/FFFTP_FAIL)\r
1688 *       Note\r
1689 *               SHA-1をもちいて32Byte鍵を生成する\r
1690 *----------------------------------------------------------------------------*/\r
1691 \r
1692 static int CreateAesKey(unsigned char *AesKey, const char* Key)\r
1693 {\r
1694         char* HashKey;\r
1695         uint32 HashKeyLen;\r
1696         uint32 results[10];\r
1697         int ByteOffset;\r
1698         int KeyIndex;\r
1699         int ResIndex;\r
1700 \r
1701         HashKeyLen = strlen(Key) + 16;\r
1702         if((HashKey = malloc(HashKeyLen + 1)) == NULL){\r
1703                 return (FFFTP_FAIL);\r
1704         }\r
1705 \r
1706         strcpy(HashKey, Key);\r
1707         strcat(HashKey, ">g^r=@N7=//z<[`:");\r
1708     sha_memory((uchar *)HashKey, HashKeyLen, results);\r
1709 \r
1710         strcpy(HashKey, Key);\r
1711         strcat(HashKey, "VG77dO1#EyC]$|C@");\r
1712     sha_memory((uchar *)HashKey, HashKeyLen, results + 5);\r
1713 \r
1714         KeyIndex = 0;\r
1715         ResIndex = 0;\r
1716         while(ResIndex < 8){\r
1717                 for(ByteOffset = 0; ByteOffset < 4; ByteOffset++){\r
1718                         AesKey[KeyIndex++] = (results[ResIndex] >> ByteOffset * 8) & 0xff;\r
1719                 }\r
1720                 ResIndex++;\r
1721         }\r
1722         free(HashKey);\r
1723 \r
1724         return (FFFTP_SUCCESS);\r
1725 }\r
1726 \r
1727 \r
1728 /*===== レジストリとINIファイルのアクセス処理 ============*/\r
1729 \r
1730 \r
1731 /*===== INIファイル用のレジストリデータ =====*/\r
1732 \r
1733 typedef struct regdatatbl {\r
1734         char KeyName[80+1];                     /* キー名 */\r
1735         char ValTbl[REG_SECT_MAX];      /* 値のテーブル */\r
1736         int ValLen;                                     /* 値データのバイト数 */\r
1737         int Mode;                                       /* キーのモード */\r
1738         struct regdatatbl *Next;\r
1739 } REGDATATBL;\r
1740 \r
1741 /*===== プロトタイプ =====*/\r
1742 \r
1743 static BOOL WriteOutRegToFile(REGDATATBL *Pos);\r
1744 static int ReadInReg(char *Name, REGDATATBL **Handle);\r
1745 static int StrCatOut(char *Src, int Len, char *Dst);\r
1746 static int StrReadIn(char *Src, int Max, char *Dst);\r
1747 static char *ScanValue(void *Handle, char *Name);\r
1748 \r
1749 \r
1750 /*===== ローカルなワーク =====*/\r
1751 \r
1752 static int TmpRegType;\r
1753 \r
1754 \r
1755 \r
1756 /*----- レジストリのタイプを設定する ------------------------------------------\r
1757 *\r
1758 *       Parameter\r
1759 *               int Type : タイプ (REGTYPE_xxx)\r
1760 *\r
1761 *       Return Value\r
1762 *               int ステータス\r
1763 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1764 *----------------------------------------------------------------------------*/\r
1765 \r
1766 static void SetRegType(int Type)\r
1767 {\r
1768         TmpRegType = Type;\r
1769         return;\r
1770 }\r
1771 \r
1772 \r
1773 /*----- レジストリ/INIファイルをオープンする(読み込み)-----------------------\r
1774 *\r
1775 *       Parameter\r
1776 *               char *Name : レジストリ名\r
1777 *               void **Handle : ハンドルを返すワーク\r
1778 *\r
1779 *       Return Value\r
1780 *               int ステータス\r
1781 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1782 *----------------------------------------------------------------------------*/\r
1783 \r
1784 static int OpenReg(char *Name, void **Handle)\r
1785 {\r
1786         int Sts;\r
1787         char Tmp[FMAX_PATH+1];\r
1788 \r
1789         Sts = FFFTP_FAIL;\r
1790         if(TmpRegType == REGTYPE_REG)\r
1791         {\r
1792                 strcpy(Tmp, "Software\\Sota\\");\r
1793                 strcat(Tmp, Name);\r
1794                 if(RegOpenKeyEx(HKEY_CURRENT_USER, Tmp, 0, KEY_READ, (HKEY *)Handle) == ERROR_SUCCESS)\r
1795                         Sts = FFFTP_SUCCESS;\r
1796         }\r
1797         else\r
1798         {\r
1799                 if((Sts = ReadInReg(Name, (REGDATATBL **)Handle)) == FFFTP_SUCCESS)\r
1800                         ((REGDATATBL *)(*Handle))->Mode = 0;\r
1801         }\r
1802         return(Sts);\r
1803 }\r
1804 \r
1805 \r
1806 /*----- レジストリ/INIファイルを作成する(書き込み)---------------------------\r
1807 *\r
1808 *       Parameter\r
1809 *               char *Name : レジストリ名\r
1810 *               void **Handle : ハンドルを返すワーク\r
1811 *\r
1812 *       Return Value\r
1813 *               int ステータス\r
1814 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1815 *----------------------------------------------------------------------------*/\r
1816 \r
1817 static int CreateReg(char *Name, void **Handle)\r
1818 {\r
1819         int Sts;\r
1820         char Tmp[FMAX_PATH+1];\r
1821         DWORD Dispos;\r
1822 \r
1823         Sts = FFFTP_FAIL;\r
1824         if(TmpRegType == REGTYPE_REG)\r
1825         {\r
1826                 strcpy(Tmp, "Software\\Sota\\");\r
1827                 strcat(Tmp, Name);\r
1828                 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
1829                         Sts = FFFTP_SUCCESS;\r
1830         }\r
1831         else\r
1832         {\r
1833                 if((*Handle = malloc(sizeof(REGDATATBL))) != NULL)\r
1834                 {\r
1835                         strcpy(((REGDATATBL *)(*Handle))->KeyName, Name);\r
1836                         ((REGDATATBL *)(*Handle))->ValLen = 0;\r
1837                         ((REGDATATBL *)(*Handle))->Next = NULL;\r
1838                         ((REGDATATBL *)(*Handle))->Mode = 1;\r
1839                         Sts = FFFTP_SUCCESS;\r
1840                 }\r
1841         }\r
1842         return(Sts);\r
1843 }\r
1844 \r
1845 \r
1846 /*----- レジストリ/INIファイルをクローズする ----------------------------------\r
1847 *\r
1848 *       Parameter\r
1849 *               void *Handle : ハンドル\r
1850 *\r
1851 *       Return Value\r
1852 *               int ステータス\r
1853 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1854 *----------------------------------------------------------------------------*/\r
1855 \r
1856 static int CloseReg(void *Handle)\r
1857 {\r
1858         REGDATATBL *Pos;\r
1859         REGDATATBL *Next;\r
1860         FILE *Strm;\r
1861 \r
1862         if(TmpRegType == REGTYPE_REG)\r
1863         {\r
1864                 RegCloseKey(Handle);\r
1865 \r
1866                 /* INIファイルを削除 */\r
1867                 if((Strm = fopen(AskIniFilePath(), "rt")) != NULL)\r
1868                 {\r
1869                         fclose(Strm);\r
1870                         MoveFileToTrashCan(AskIniFilePath());\r
1871                 }\r
1872         }\r
1873         else\r
1874         {\r
1875                 if(((REGDATATBL *)Handle)->Mode == 1)\r
1876                 {\r
1877                         if(WriteOutRegToFile(Handle) == TRUE)\r
1878                         {\r
1879 //                              /* レジストリをクリア */\r
1880 //                              ClearRegistory();\r
1881                         }\r
1882                 }\r
1883                 /* テーブルを削除 */\r
1884                 Pos = Handle;\r
1885                 while(Pos != NULL)\r
1886                 {\r
1887                         Next = Pos->Next;\r
1888                         free(Pos);\r
1889                         Pos = Next;\r
1890                 }\r
1891         }\r
1892         return(FFFTP_SUCCESS);\r
1893 }\r
1894 \r
1895 \r
1896 /*----- レジストリ情報をINIファイルに書き込む ---------------------------------\r
1897 *\r
1898 *       Parameter\r
1899 *               REGDATATBL *Pos : レジストリデータ\r
1900 *\r
1901 *       Return Value\r
1902 *               なし\r
1903 *----------------------------------------------------------------------------*/\r
1904 \r
1905 static BOOL WriteOutRegToFile(REGDATATBL *Pos)\r
1906 {\r
1907         FILE *Strm;\r
1908         char *Disp;\r
1909         BOOL Ret;\r
1910 \r
1911         Ret = FALSE;\r
1912         if((Strm = fopen(AskIniFilePath(), "wt")) != NULL)\r
1913         {\r
1914                 fprintf(Strm, MSGJPN239);\r
1915                 while(Pos != NULL)\r
1916                 {\r
1917                         fprintf(Strm, "\n[%s]\n", Pos->KeyName);\r
1918 \r
1919                         Disp = Pos->ValTbl;\r
1920                         while(Disp < (Pos->ValTbl + Pos->ValLen))\r
1921                         {\r
1922                                 fprintf(Strm, "%s\n", Disp);\r
1923                                 Disp = Disp + strlen(Disp) + 1;\r
1924                         }\r
1925                         Pos = Pos->Next;\r
1926                 }\r
1927                 fclose(Strm);\r
1928                 Ret = TRUE;\r
1929         }\r
1930         else\r
1931                 MessageBox(NULL, MSGJPN240, "FFFTP", MB_OK);\r
1932 \r
1933         return(Ret);\r
1934 }\r
1935 \r
1936 \r
1937 /*----- INIファイルからレジストリ情報を読み込む -------------------------------\r
1938 *\r
1939 *       Parameter\r
1940 *               char *Name : 名前\r
1941 *               void *Handle : ハンドル\r
1942 *\r
1943 *       Return Value\r
1944 *               int ステータス\r
1945 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1946 *----------------------------------------------------------------------------*/\r
1947 \r
1948 static int ReadInReg(char *Name, REGDATATBL **Handle)\r
1949 {\r
1950         FILE *Strm;\r
1951         char *Buf;\r
1952         char *Tmp;\r
1953         char *Data;\r
1954         REGDATATBL *New;\r
1955         REGDATATBL *Pos;\r
1956         int Sts;\r
1957 \r
1958         Sts = FFFTP_FAIL;\r
1959         *Handle = NULL;\r
1960 \r
1961         if((Strm = fopen(AskIniFilePath(), "rt")) != NULL)\r
1962         {\r
1963                 if((Buf = malloc(REG_SECT_MAX)) != NULL)\r
1964                 {\r
1965                         while(fgets(Buf, REG_SECT_MAX, Strm) != NULL)\r
1966                         {\r
1967                                 if(*Buf != '#')\r
1968                                 {\r
1969                                         if((Tmp = strchr(Buf, '\n')) != NULL)\r
1970                                                 *Tmp = NUL;\r
1971 \r
1972                                         if(*Buf == '[')\r
1973                                         {\r
1974                                                 if((New = malloc(sizeof(REGDATATBL))) != NULL)\r
1975                                                 {\r
1976                                                         if((Tmp = strchr(Buf, ']')) != NULL)\r
1977                                                                 *Tmp = NUL;\r
1978                                                         strcpy(New->KeyName, Buf+1);\r
1979                                                         New->ValLen = 0;\r
1980                                                         New->Next = NULL;\r
1981                                                         Data = New->ValTbl;\r
1982                                                 }\r
1983                                                 if(*Handle == NULL)\r
1984                                                         *Handle = New;\r
1985                                                 else\r
1986                                                 {\r
1987                                                         Pos = *Handle;\r
1988                                                         while(Pos->Next != NULL)\r
1989                                                                 Pos = Pos->Next;\r
1990                                                         Pos->Next = New;\r
1991                                                 }\r
1992                                         }\r
1993                                         else if(strlen(Buf) > 0)\r
1994                                         {\r
1995                                                 strcpy(Data, Buf);\r
1996                                                 Data += strlen(Buf) + 1;\r
1997                                                 New->ValLen += strlen(Buf) + 1;\r
1998                                         }\r
1999                                 }\r
2000                         }\r
2001                         Sts = FFFTP_SUCCESS;\r
2002                         free(Buf);\r
2003                 }\r
2004                 fclose(Strm);\r
2005         }\r
2006         return(Sts);\r
2007 }\r
2008 \r
2009 \r
2010 /*----- サブキーをオープンする ------------------------------------------------\r
2011 *\r
2012 *       Parameter\r
2013 *               void *Parent : 親のハンドル\r
2014 *               char *Name : 名前\r
2015 *               void **Handle : ハンドルを返すワーク\r
2016 *\r
2017 *       Return Value\r
2018 *               int ステータス\r
2019 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2020 *----------------------------------------------------------------------------*/\r
2021 \r
2022 static int OpenSubKey(void *Parent, char *Name, void **Handle)\r
2023 {\r
2024         int Sts;\r
2025         char Key[80];\r
2026         REGDATATBL *Pos;\r
2027 \r
2028         Sts = FFFTP_FAIL;\r
2029         if(TmpRegType == REGTYPE_REG)\r
2030         {\r
2031                 if(RegOpenKeyEx(Parent, Name, 0, KEY_READ, (HKEY *)Handle) == ERROR_SUCCESS)\r
2032                         Sts = FFFTP_SUCCESS;\r
2033         }\r
2034         else\r
2035         {\r
2036                 strcpy(Key, ((REGDATATBL *)Parent)->KeyName);\r
2037                 strcat(Key, "\\");\r
2038                 strcat(Key, Name);\r
2039                 Pos = Parent;\r
2040                 while(Pos != NULL)\r
2041                 {\r
2042                         if(strcmp(Pos->KeyName, Key) == 0)\r
2043                         {\r
2044                                 *Handle = Pos;\r
2045                                 Sts = FFFTP_SUCCESS;\r
2046                                 break;\r
2047                         }\r
2048                         Pos = Pos->Next;\r
2049                 }\r
2050         }\r
2051         return(Sts);\r
2052 }\r
2053 \r
2054 \r
2055 /*----- サブキーを作成する ----------------------------------------------------\r
2056 *\r
2057 *       Parameter\r
2058 *               void *Parent : 親のハンドル\r
2059 *               char *Name : 名前\r
2060 *               void **Handle : ハンドルを返すワーク\r
2061 *\r
2062 *       Return Value\r
2063 *               int ステータス\r
2064 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2065 *----------------------------------------------------------------------------*/\r
2066 \r
2067 static int CreateSubKey(void *Parent, char *Name, void **Handle)\r
2068 {\r
2069         int Sts;\r
2070         DWORD Dispos;\r
2071         REGDATATBL *Pos;\r
2072 \r
2073         Sts = FFFTP_FAIL;\r
2074         if(TmpRegType == REGTYPE_REG)\r
2075         {\r
2076                 if(RegCreateKeyEx(Parent, Name, 0, "", REG_OPTION_NON_VOLATILE, KEY_SET_VALUE, NULL, (HKEY *)Handle, &Dispos) == ERROR_SUCCESS)\r
2077                         Sts = FFFTP_SUCCESS;\r
2078         }\r
2079         else\r
2080         {\r
2081                 if((*Handle = malloc(sizeof(REGDATATBL))) != NULL)\r
2082                 {\r
2083                         strcpy(((REGDATATBL *)(*Handle))->KeyName, ((REGDATATBL *)Parent)->KeyName);\r
2084                         strcat(((REGDATATBL *)(*Handle))->KeyName, "\\");\r
2085                         strcat(((REGDATATBL *)(*Handle))->KeyName, Name);\r
2086 \r
2087                         ((REGDATATBL *)(*Handle))->ValLen = 0;\r
2088                         ((REGDATATBL *)(*Handle))->Next = NULL;\r
2089 \r
2090                         Pos = (REGDATATBL *)Parent;\r
2091                         while(Pos->Next != NULL)\r
2092                                 Pos = Pos->Next;\r
2093                         Pos->Next = *Handle;\r
2094                         Sts = FFFTP_SUCCESS;\r
2095                 }\r
2096         }\r
2097         return(Sts);\r
2098 }\r
2099 \r
2100 \r
2101 /*----- サブキーをクローズする ------------------------------------------------\r
2102 *\r
2103 *       Parameter\r
2104 *               void *Handle : ハンドル\r
2105 *\r
2106 *       Return Value\r
2107 *               int ステータス\r
2108 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2109 *----------------------------------------------------------------------------*/\r
2110 \r
2111 static int CloseSubKey(void *Handle)\r
2112 {\r
2113         if(TmpRegType == REGTYPE_REG)\r
2114                 RegCloseKey(Handle);\r
2115         else\r
2116         {\r
2117                 /* Nothing */\r
2118         }\r
2119         return(FFFTP_SUCCESS);\r
2120 }\r
2121 \r
2122 \r
2123 /*----- サブキーを削除する ----------------------------------------------------\r
2124 *\r
2125 *       Parameter\r
2126 *               void *Handle : ハンドル\r
2127 *               char *Name : 名前\r
2128 *\r
2129 *       Return Value\r
2130 *               int ステータス\r
2131 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2132 *----------------------------------------------------------------------------*/\r
2133 \r
2134 static int DeleteSubKey(void *Handle, char *Name)\r
2135 {\r
2136         int Sts;\r
2137 \r
2138         Sts = FFFTP_FAIL;\r
2139         if(TmpRegType == REGTYPE_REG)\r
2140         {\r
2141                 if(RegDeleteKey(Handle, Name) == ERROR_SUCCESS)\r
2142                         Sts = FFFTP_SUCCESS;\r
2143         }\r
2144         else\r
2145         {\r
2146                 Sts = FFFTP_FAIL;\r
2147         }\r
2148         return(Sts);\r
2149 }\r
2150 \r
2151 \r
2152 /*----- 値を削除する ----------------------------------------------------------\r
2153 *\r
2154 *       Parameter\r
2155 *               void *Handle : ハンドル\r
2156 *               char *Name : 名前\r
2157 *\r
2158 *       Return Value\r
2159 *               int ステータス\r
2160 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2161 *----------------------------------------------------------------------------*/\r
2162 \r
2163 static int DeleteValue(void *Handle, char *Name)\r
2164 {\r
2165         int Sts;\r
2166 \r
2167         Sts = FFFTP_FAIL;\r
2168         if(TmpRegType == REGTYPE_REG)\r
2169         {\r
2170                 if(RegDeleteValue(Handle, Name) == ERROR_SUCCESS)\r
2171                         Sts = FFFTP_SUCCESS;\r
2172         }\r
2173         else\r
2174         {\r
2175                 Sts = FFFTP_FAIL;\r
2176         }\r
2177         return(Sts);\r
2178 }\r
2179 \r
2180 \r
2181 /*----- INT値を読み込む -------------------------------------------------------\r
2182 *\r
2183 *       Parameter\r
2184 *               void *Handle : ハンドル\r
2185 *               char *Name : 名前\r
2186 *               int *Value : INT値を返すワーク\r
2187 *\r
2188 *       Return Value\r
2189 *               int ステータス\r
2190 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2191 *----------------------------------------------------------------------------*/\r
2192 \r
2193 static int ReadIntValueFromReg(void *Handle, char *Name, int *Value)\r
2194 {\r
2195         int Sts;\r
2196         DWORD Size;\r
2197         char *Pos;\r
2198 \r
2199         Sts = FFFTP_FAIL;\r
2200         if(TmpRegType == REGTYPE_REG)\r
2201         {\r
2202                 Size = sizeof(int);\r
2203                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Value, &Size) == ERROR_SUCCESS)\r
2204                         Sts = FFFTP_SUCCESS;\r
2205         }\r
2206         else\r
2207         {\r
2208                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2209                 {\r
2210                         *Value = atoi(Pos);\r
2211                         Sts = FFFTP_SUCCESS;\r
2212                 }\r
2213         }\r
2214         return(Sts);\r
2215 }\r
2216 \r
2217 \r
2218 /*----- INT値を書き込む -------------------------------------------------------\r
2219 *\r
2220 *       Parameter\r
2221 *               void *Handle : ハンドル\r
2222 *               char *Name : 名前\r
2223 *               int Value : INT値\r
2224 *\r
2225 *       Return Value\r
2226 *               int ステータス\r
2227 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2228 *----------------------------------------------------------------------------*/\r
2229 \r
2230 static int WriteIntValueToReg(void *Handle, char *Name, int Value)\r
2231 {\r
2232         REGDATATBL *Pos;\r
2233         char *Data;\r
2234         char Tmp[20];\r
2235 \r
2236         if(TmpRegType == REGTYPE_REG)\r
2237                 RegSetValueEx(Handle, Name, 0, REG_DWORD, (CONST BYTE *)&Value, sizeof(int));\r
2238         else\r
2239         {\r
2240                 Pos = (REGDATATBL *)Handle;\r
2241                 Data = Pos->ValTbl + Pos->ValLen;\r
2242                 strcpy(Data, Name);\r
2243                 strcat(Data, "=");\r
2244                 sprintf(Tmp, "%d", Value);\r
2245                 strcat(Data, Tmp);\r
2246                 Pos->ValLen += strlen(Data) + 1;\r
2247         }\r
2248         return(FFFTP_SUCCESS);\r
2249 }\r
2250 \r
2251 \r
2252 /*----- 文字列を読み込む ------------------------------------------------------\r
2253 *\r
2254 *       Parameter\r
2255 *               void *Handle : ハンドル\r
2256 *               char *Name : 名前\r
2257 *               char *Str : 文字列を返すワーク\r
2258 *               DWORD Size : 最大サイズ\r
2259 *\r
2260 *       Return Value\r
2261 *               int ステータス\r
2262 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2263 *----------------------------------------------------------------------------*/\r
2264 \r
2265 static int ReadStringFromReg(void *Handle, char *Name, char *Str, DWORD Size)\r
2266 {\r
2267         int Sts;\r
2268         char *Pos;\r
2269         // UTF-8対応\r
2270         char* pa0;\r
2271         wchar_t* pw0;\r
2272         DWORD TempSize;\r
2273 \r
2274         Sts = FFFTP_FAIL;\r
2275         if(TmpRegType == REGTYPE_REG)\r
2276         {\r
2277                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Str, &Size) == ERROR_SUCCESS)\r
2278                 {\r
2279                         if(*(Str + Size - 1) != NUL)\r
2280                                 *(Str + Size) = NUL;\r
2281                         Sts = FFFTP_SUCCESS;\r
2282                 }\r
2283         }\r
2284         else\r
2285         {\r
2286                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2287                 {\r
2288                         // UTF-8対応\r
2289 //                      Size = min1(Size-1, strlen(Pos));\r
2290 //                      Size = StrReadIn(Pos, Size, Str);\r
2291 //                      *(Str + Size) = NUL;\r
2292 //                      Sts = FFFTP_SUCCESS;\r
2293                         switch(IniKanjiCode)\r
2294                         {\r
2295                         case KANJI_SJIS:\r
2296                                 if(pa0 = AllocateStringA(Size * 4))\r
2297                                 {\r
2298                                         if(pw0 = AllocateStringW(Size * 4 * 4))\r
2299                                         {\r
2300                                                 TempSize = min1((Size * 4) - 1, strlen(Pos));\r
2301                                                 TempSize = StrReadIn(Pos, TempSize, pa0);\r
2302                                                 *(pa0 + TempSize) = NUL;\r
2303                                                 AtoW(pw0, Size * 4 * 4, pa0, -1);\r
2304                                                 WtoM(Str, Size, pw0, -1);\r
2305                                                 TerminateStringM(Str, Size);\r
2306                                                 Sts = FFFTP_SUCCESS;\r
2307                                                 FreeDuplicatedString(pw0);\r
2308                                         }\r
2309                                         FreeDuplicatedString(pa0);\r
2310                                 }\r
2311                                 break;\r
2312                         case KANJI_NOCNV:\r
2313                                 Size = min1(Size-1, strlen(Pos));\r
2314                                 Size = StrReadIn(Pos, Size, Str);\r
2315                                 *(Str + Size) = NUL;\r
2316                                 Sts = FFFTP_SUCCESS;\r
2317                                 break;\r
2318                         }\r
2319                 }\r
2320         }\r
2321         return(Sts);\r
2322 }\r
2323 \r
2324 \r
2325 /*----- 文字列を書き込む ------------------------------------------------------\r
2326 *\r
2327 *       Parameter\r
2328 *               void *Handle : ハンドル\r
2329 *               char *Name : 名前\r
2330 *               char *Str :文字列\r
2331 *\r
2332 *       Return Value\r
2333 *               int ステータス\r
2334 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2335 *----------------------------------------------------------------------------*/\r
2336 \r
2337 static int WriteStringToReg(void *Handle, char *Name, char *Str)\r
2338 {\r
2339         REGDATATBL *Pos;\r
2340         char *Data;\r
2341 \r
2342         if(TmpRegType == REGTYPE_REG)\r
2343                 RegSetValueEx(Handle, Name, 0, REG_SZ, (CONST BYTE *)Str, strlen(Str)+1);\r
2344         else\r
2345         {\r
2346                 Pos = (REGDATATBL *)Handle;\r
2347                 Data = Pos->ValTbl + Pos->ValLen;\r
2348                 strcpy(Data, Name);\r
2349                 strcat(Data, "=");\r
2350                 Pos->ValLen += strlen(Data);\r
2351                 Data = Pos->ValTbl + Pos->ValLen;\r
2352                 Pos->ValLen += StrCatOut(Str, strlen(Str), Data) + 1;\r
2353         }\r
2354         return(FFFTP_SUCCESS);\r
2355 }\r
2356 \r
2357 \r
2358 /*----- マルチ文字列を読み込む ------------------------------------------------\r
2359 *\r
2360 *       Parameter\r
2361 *               void *Handle : ハンドル\r
2362 *               char *Name : 名前\r
2363 *               char *Str : 文字列を返すワーク\r
2364 *               DWORD Size : 最大サイズ\r
2365 *\r
2366 *       Return Value\r
2367 *               int ステータス\r
2368 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2369 *----------------------------------------------------------------------------*/\r
2370 \r
2371 static int ReadMultiStringFromReg(void *Handle, char *Name, char *Str, DWORD Size)\r
2372 {\r
2373         int Sts;\r
2374         char *Pos;\r
2375 \r
2376         Sts = FFFTP_FAIL;\r
2377         if(TmpRegType == REGTYPE_REG)\r
2378         {\r
2379                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Str, &Size) == ERROR_SUCCESS)\r
2380                 {\r
2381                         if(*(Str + Size - 1) != NUL)\r
2382                                 *(Str + Size) = NUL;\r
2383                         Sts = FFFTP_SUCCESS;\r
2384                 }\r
2385         }\r
2386         else\r
2387         {\r
2388                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2389                 {\r
2390                         Size = min1(Size-1, strlen(Pos));\r
2391                         Size = StrReadIn(Pos, Size, Str);\r
2392                         *(Str + Size) = NUL;\r
2393                         Sts = FFFTP_SUCCESS;\r
2394                 }\r
2395         }\r
2396         return(Sts);\r
2397 }\r
2398 \r
2399 \r
2400 /*----- マルチ文字列を書き込む ------------------------------------------------\r
2401 *\r
2402 *       Parameter\r
2403 *               void *Handle : ハンドル\r
2404 *               char *Name : 名前\r
2405 *               char *Str : 文字列\r
2406 *\r
2407 *       Return Value\r
2408 *               int ステータス\r
2409 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2410 *----------------------------------------------------------------------------*/\r
2411 \r
2412 static int WriteMultiStringToReg(void *Handle, char *Name, char *Str)\r
2413 {\r
2414         REGDATATBL *Pos;\r
2415         char *Data;\r
2416 \r
2417         if(TmpRegType == REGTYPE_REG)\r
2418                 RegSetValueEx(Handle, Name, 0, REG_MULTI_SZ, (CONST BYTE *)Str, StrMultiLen(Str)+1);\r
2419         else\r
2420         {\r
2421                 Pos = (REGDATATBL *)Handle;\r
2422                 Data = Pos->ValTbl + Pos->ValLen;\r
2423                 strcpy(Data, Name);\r
2424                 strcat(Data, "=");\r
2425                 Pos->ValLen += strlen(Data);\r
2426                 Data = Pos->ValTbl + Pos->ValLen;\r
2427                 Pos->ValLen += StrCatOut(Str, StrMultiLen(Str), Data) + 1;\r
2428         }\r
2429         return(FFFTP_SUCCESS);\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 *               DWORD Size : 最大サイズ\r
2440 *\r
2441 *       Return Value\r
2442 *               int ステータス\r
2443 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2444 *----------------------------------------------------------------------------*/\r
2445 \r
2446 static int ReadBinaryFromReg(void *Handle, char *Name, void *Bin, DWORD Size)\r
2447 {\r
2448         int Sts;\r
2449         char *Pos;\r
2450 \r
2451         Sts = FFFTP_FAIL;\r
2452         if(TmpRegType == REGTYPE_REG)\r
2453         {\r
2454                 if(RegQueryValueEx(Handle, Name, NULL, NULL, (BYTE *)Bin, &Size) == ERROR_SUCCESS)\r
2455                         Sts = FFFTP_SUCCESS;\r
2456         }\r
2457         else\r
2458         {\r
2459                 if((Pos = ScanValue(Handle, Name)) != NULL)\r
2460                 {\r
2461                         Size = min1(Size, strlen(Pos));\r
2462                         Size = StrReadIn(Pos, Size, Bin);\r
2463                         Sts = FFFTP_SUCCESS;\r
2464                 }\r
2465         }\r
2466         return(Sts);\r
2467 }\r
2468 \r
2469 \r
2470 /*----- バイナリを書き込む ----------------------------------------------------\r
2471 *\r
2472 *       Parameter\r
2473 *               void *Handle : ハンドル\r
2474 *               char *Name : 名前\r
2475 *               void *Bin : バイナリ\r
2476 *               int Len : 長さ\r
2477 *\r
2478 *       Return Value\r
2479 *               int ステータス\r
2480 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
2481 *----------------------------------------------------------------------------*/\r
2482 \r
2483 static int WriteBinaryToReg(void *Handle, char *Name, void *Bin, int Len)\r
2484 {\r
2485         REGDATATBL *Pos;\r
2486         char *Data;\r
2487 \r
2488         if(TmpRegType == REGTYPE_REG)\r
2489                 RegSetValueEx(Handle, Name, 0, REG_BINARY, (CONST BYTE *)Bin, Len);\r
2490         else\r
2491         {\r
2492                 Pos = (REGDATATBL *)Handle;\r
2493                 Data = Pos->ValTbl + Pos->ValLen;\r
2494                 strcpy(Data, Name);\r
2495                 strcat(Data, "=");\r
2496                 Pos->ValLen += strlen(Data);\r
2497                 Data = Pos->ValTbl + Pos->ValLen;\r
2498                 Pos->ValLen += StrCatOut(Bin, Len, Data) + 1;\r
2499         }\r
2500         return(FFFTP_SUCCESS);\r
2501 }\r
2502 \r
2503 \r
2504 /*----- 文字列をバッファに追加書き込みする ------------------------------------\r
2505 *\r
2506 *       Parameter\r
2507 *               char *Src : 文字列\r
2508 *               int len : 文字列の長さ\r
2509 *               char *Dst : 書き込みするバッファ\r
2510 *\r
2511 *       Return Value\r
2512 *               int 追加したバイト数\r
2513 *----------------------------------------------------------------------------*/\r
2514 \r
2515 static int StrCatOut(char *Src, int Len, char *Dst)\r
2516 {\r
2517         int Count;\r
2518 \r
2519         Dst += strlen(Dst);\r
2520         Count = 0;\r
2521         for(; Len > 0; Len--)\r
2522         {\r
2523                 if(*Src == '\\')\r
2524                 {\r
2525                         *Dst++ = '\\';\r
2526                         *Dst++ = '\\';\r
2527                         Count += 2;\r
2528                 }\r
2529                 else if((*Src >= 0x20) && (*Src <= 0x7E))\r
2530                 {\r
2531                         *Dst++ = *Src;\r
2532                         Count++;\r
2533                 }\r
2534                 else\r
2535                 {\r
2536                         sprintf(Dst, "\\%02X", *(unsigned char *)Src);\r
2537                         Dst += 3;\r
2538                         Count += 3;\r
2539                 }\r
2540                 Src++;\r
2541         }\r
2542         *Dst = NUL;\r
2543         return(Count);\r
2544 }\r
2545 \r
2546 \r
2547 /*----- 文字列をバッファに読み込む --------------------------------------------\r
2548 *\r
2549 *       Parameter\r
2550 *               char *Src : 文字列\r
2551 *               int Max : 最大サイズ\r
2552 *               char *Dst : 書き込みするバッファ\r
2553 *\r
2554 *       Return Value\r
2555 *               int 読み込んだバイト数\r
2556 *----------------------------------------------------------------------------*/\r
2557 \r
2558 static int StrReadIn(char *Src, int Max, char *Dst)\r
2559 {\r
2560         int Count;\r
2561         int Tmp;\r
2562 \r
2563         Count = 0;\r
2564         while(*Src != NUL)\r
2565         {\r
2566                 if(Count >= Max)\r
2567                         break;\r
2568 \r
2569                 if(*Src == '\\')\r
2570                 {\r
2571                         Src++;\r
2572                         if(*Src == '\\')\r
2573                                 *Dst = '\\';\r
2574                         else\r
2575                         {\r
2576                                 sscanf(Src, "%02x", &Tmp);\r
2577                                 *Dst = Tmp;\r
2578                                 Src++;\r
2579                         }\r
2580                 }\r
2581                 else\r
2582                         *Dst = *Src;\r
2583 \r
2584                 Count++;\r
2585                 Dst++;\r
2586                 Src++;\r
2587         }\r
2588         return(Count);\r
2589 }\r
2590 \r
2591 \r
2592 /*----- 値を検索する ----------------------------------------------------------\r
2593 *\r
2594 *       Parameter\r
2595 *               char *Handle : ハンドル\r
2596 *               char *Name : 名前\r
2597 *\r
2598 *       Return Value\r
2599 *               char *値データの先頭\r
2600 *                       NULL=指定の名前の値が見つからない\r
2601 *----------------------------------------------------------------------------*/\r
2602 \r
2603 static char *ScanValue(void *Handle, char *Name)\r
2604 {\r
2605         REGDATATBL *Cur;\r
2606         char *Pos;\r
2607         char *Ret;\r
2608 \r
2609         Ret = NULL;\r
2610         Cur = Handle;\r
2611         Pos = Cur->ValTbl;\r
2612         while(Pos < (Cur->ValTbl + Cur->ValLen))\r
2613         {\r
2614                 if((strncmp(Name, Pos, strlen(Name)) == 0) &&\r
2615                    (*(Pos + strlen(Name)) == '='))\r
2616                 {\r
2617                         Ret = Pos + strlen(Name) + 1;\r
2618                         break;\r
2619                 }\r
2620                 Pos += strlen(Pos) + 1;\r
2621         }\r
2622         return(Ret);\r
2623 }\r
2624 \r
2625 \r
2626 /*----------- パスワードの妥当性を確認する ------------------------------------\r
2627 *\r
2628 *       Parameter\r
2629 *               char *Password: パスワード文字列\r
2630 *               char *HashStr: SHA-1ハッシュ文字列\r
2631 *\r
2632 *       Return Value\r
2633 *               int 0 不一致\r
2634 *                       1: 一致\r
2635 *                       2: 異常\r
2636 *----------------------------------------------------------------------------*/\r
2637 int CheckPasswordValidity( char* Password, int length, const char* HashStr )\r
2638 {\r
2639         ulong hash1[5];\r
2640         ulong hash2[5];\r
2641         \r
2642         int i, j;\r
2643         \r
2644         const char* p = HashStr;\r
2645         \r
2646         /* 空文字列は一致したことにする */\r
2647         if( HashStr[0] == NUL ) return 1;\r
2648 \r
2649         /* Hashをチェックするする*/\r
2650         if( strlen(HashStr) != 40 )     return 2;\r
2651 \r
2652         /* Hashをデコードする*/\r
2653         for( i = 0; i < 5; i++ ){\r
2654                 ulong decode = 0;\r
2655                 for( j = 0; j < 8; j++ ){\r
2656                         if( *p < 0x40 || 0x40 + 15 < *p ){\r
2657                                 return 2;\r
2658                         }\r
2659                         decode = (decode << 4 ) + (*p - 0x40);\r
2660                         ++p;\r
2661                 }\r
2662                 hash1[i] = decode;\r
2663         }\r
2664         \r
2665         /* Password をハッシュする */\r
2666         sha_memory( Password, length, hash2 );\r
2667         \r
2668         if( memcmp( (char*)hash1, (char*)hash2, sizeof( hash1 )) == 0 ){\r
2669                 return 1;\r
2670         }\r
2671         return 0;\r
2672 }\r
2673 \r
2674 /*----------- パスワードの妥当性チェックのための文字列を作成する ------------\r
2675 *\r
2676 *       Parameter\r
2677 *               char *Password: パスワード文字列\r
2678 *               char *Str: SHA-1ハッシュ文字列格納場所 (41bytes以上)\r
2679 *\r
2680 *       Return Value\r
2681 *               None\r
2682 *----------------------------------------------------------------------------*/\r
2683 void CreatePasswordHash( char* Password, int length, char* HashStr )\r
2684 {\r
2685         ulong hash[5];\r
2686         int i, j;\r
2687         unsigned char *p = (unsigned char *)HashStr;\r
2688 \r
2689         sha_memory( Password, length, hash );\r
2690 \r
2691         for( i = 0; i < 5; i++ ){\r
2692                 ulong rest = hash[i];\r
2693                 for( j = 0; j < 8; j++ ){\r
2694                         *p++ = (unsigned char)((rest & 0xf0000000) >> 28) + '@';\r
2695                         rest <<= 4;\r
2696                 }\r
2697         }\r
2698         *p = NUL;\r
2699 }\r
2700 \r
2701 void SetHashSalt( DWORD salt )\r
2702 {\r
2703         unsigned char* pos = &SecretKey[strlen(SecretKey) + 1];\r
2704         *pos++ = ( salt >> 24 ) & 0xff;\r
2705         *pos++ = ( salt >> 16 ) & 0xff;\r
2706         *pos++ = ( salt >>  8 ) & 0xff;\r
2707         *pos++ = ( salt       ) & 0xff;\r
2708         \r
2709         SecretKeyLength = strlen( SecretKey ) + 5;\r
2710 }\r
2711 \r
2712 /*----------- 乱数生成をする -------------------------------------------------\r
2713 *\r
2714 *       Parameter\r
2715 *\r
2716 *       Return Value\r
2717 *               ランダムな値:コンパイラVS2005/動作環境WinXP以上では rand_s から取得する\r
2718 *----------------------------------------------------------------------------*/\r
2719 DWORD GetRandamDWRODValue(void)\r
2720 {\r
2721         DWORD rndValue;\r
2722         int errorCode;\r
2723 #ifdef _CRT_RAND_S\r
2724         errno_t errnoRand_s;\r
2725         errnoRand_s = rand_s(&rndValue);\r
2726         errorCode = (0 != errnoRand_s ? 1 : 0);\r
2727 #else\r
2728         errorCode = 1;\r
2729 #endif\r
2730         if(0 != errorCode){\r
2731 #ifdef USE_RANDAM_C_RAND\r
2732                 rndValue = rand() | (rand() << 16);\r
2733 #else\r
2734                 /* rand() のかわりに、SHA-1とパフォーマンスカウンタを用いる */\r
2735                 ulong shaValue[5];\r
2736                 LARGE_INTEGER Counter;\r
2737                 \r
2738                 if(0 == IsRndSourceInit){\r
2739                         /* 初回取得時 */\r
2740                         HANDLE CurProcHandle;\r
2741                         HANDLE CurThreadHandle;\r
2742                         \r
2743                         if(DuplicateHandle(GetCurrentProcess(), GetCurrentProcess(), GetCurrentProcess(),\r
2744                                 &CurProcHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))\r
2745                         {\r
2746                                 CloseHandle(CurProcHandle);\r
2747                         }\r
2748                         if(DuplicateHandle(GetCurrentProcess(), GetCurrentThread(), GetCurrentProcess(),\r
2749                                 &CurThreadHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))\r
2750                         {\r
2751                                 CloseHandle(CurThreadHandle);\r
2752                         }\r
2753                         \r
2754                         /* _WIN64 では64bitだが、その場合はrand_sが大抵利用可能なのでここでは32bitのみ用いる */\r
2755                         RndSource[0] = (ulong)CurProcHandle;\r
2756                         RndSource[1] = (ulong)CurThreadHandle;\r
2757                         RndSource[2] = (ulong)GetTickCount();\r
2758                         RndSource[3] = (ulong)timeGetTime();\r
2759                         RndSource[4] = 0; /* カウントアップ */\r
2760                         RndSource[5] = RndSource[3] + 1;\r
2761                         IsRndSourceInit = 1;\r
2762                 }\r
2763                 RndSource[4]++;\r
2764                 RndSource[5] += 0x00010010;\r
2765                 if(QueryPerformanceCounter(&Counter)){\r
2766                         RndSource[6] = Counter.LowPart;\r
2767                         RndSource[7] = Counter.HighPart;\r
2768                         RndSource[8] = (ulong)rand();\r
2769                 }else{\r
2770                         RndSource[6] = (ulong)timeGetTime();\r
2771                         RndSource[7] = (ulong)rand();\r
2772                         RndSource[8] = (ulong)rand();\r
2773                 }\r
2774                 \r
2775                 sha_memory((char *)RndSource, sizeof(RndSource), shaValue);\r
2776                 rndValue = shaValue[0] ^ shaValue[1] ^ shaValue[2] ^ shaValue[3] ^ shaValue[4];\r
2777 #endif\r
2778         }\r
2779         return rndValue;\r
2780 }\r