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