registory.c

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