OSDN Git Service

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