registory.c

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