registry.c

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