misc.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 #define STRICT\r
  31 #include <stdio.h>\r
  32 #include <stdlib.h>\r
  33 #include <stdarg.h>\r
  34 #include <string.h>\r
  35 #include <mbstring.h>\r
  36 // IPv6対応\r
  37 //#include <winsock.h>\r
  38 #include <winsock2.h>\r
  39 #include <windowsx.h>\r
  40 #include <commctrl.h>\r
  41 #include <shlobj.h>\r
  42 #include <locale.h>\r
  43 \r
  44 #include "common.h"\r
  45 #include "resource.h"\r
  46 \r
  47 #include <htmlhelp.h>\r
  48 #include "helpid.h"\r
  49 \r
  50 // UTF-8対応\r
  51 #undef __MBSWRAPPER_H__\r
  52 #include "mbswrapper.h"\r
  53 \r
  54 \r
  55 \r
  56 /*===== 入力ダイアログデータのストラクチャ =====*/\r
  57 \r
  58 typedef struct {\r
  59         char Title[80];                 /* ダイアログのタイトル */\r
  60         char Str[FMAX_PATH+1];  /* デフォルト文字列／入力された文字列(Output) */\r
  61         int MaxLen;                             /* 文字列の最長 */\r
  62         int Anonymous;                  /* Anonymousフラグ(Output) */\r
  63 } DIALOGDATA;\r
  64 \r
  65 /*===== プロトタイプ =====*/\r
  66 \r
  67 // 64ビット対応\r
  68 //static BOOL CALLBACK InputDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);\r
  69 static INT_PTR CALLBACK InputDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam);\r
  70 \r
  71 /*===== 外部参照 =====*/\r
  72 \r
  73 extern HWND hHelpWin;\r
  74 \r
  75 /*===== ローカルなワーク =====*/\r
  76 \r
  77 static DIALOGDATA *DialogData;          /* 入力ダイアログデータ */\r
  78 static int HelpPage;\r
  79 \r
  80 \r
  81 \r
  82 /*----- 入力ダイアログを表示 --------------------------------------------------\r
  83 *\r
  84 *       Parameter\r
  85 *               int Res : ダイアログボックスのID\r
  86 *               HWND hWnd : 親ウインドウのウインドウハンドル\r
  87 *               char *Title : ウインドウタイトル (NULL=設定しない)\r
  88 *               char *Buf : エディットボックスの初期文字列／入力文字列を返すバッファ\r
  89 *               int Max : バッファのサイズ (FMAX_PATH+1以下であること)\r
  90 *               int *Flg : フラグの初期値／フラグを返すワーク\r
  91 *               int Help : ヘルプのコンテキスト番号\r
  92 *\r
  93 *       Return Value\r
  94 *               int ステータス (YES/NO=取り消し)\r
  95 *\r
  96 *       Note\r
  97 *               ダイアログは１個のEditBoxと１個のButtonを持つものを使う\r
  98 *----------------------------------------------------------------------------*/\r
  99 \r
 100 int InputDialogBox(int Res, HWND hWnd, char *Title, char *Buf, int Max, int *Flg, int Help)\r
 101 {\r
 102         int Ret;\r
 103         DIALOGDATA dData;\r
 104 \r
 105         dData.MaxLen = Max;\r
 106         memset(dData.Str, NUL, FMAX_PATH+1);\r
 107         strncpy(dData.Str, Buf, FMAX_PATH);\r
 108         strcpy(dData.Title, "");\r
 109         if(Title != NULL)\r
 110                 strcpy(dData.Title, Title);\r
 111         dData.Anonymous = *Flg;\r
 112         DialogData = &dData;\r
 113         HelpPage = Help;\r
 114 \r
 115         Ret = DialogBox(GetFtpInst(), MAKEINTRESOURCE(Res), hWnd, InputDialogCallBack);\r
 116 \r
 117         if(Ret == YES)\r
 118         {\r
 119                 memset(Buf, NUL, Max);\r
 120                 strncpy(Buf, dData.Str, Max-1);\r
 121                 *Flg = dData.Anonymous;\r
 122         }\r
 123         return(Ret);\r
 124 }\r
 125 \r
 126 \r
 127 /*----- 入力ダイアログのコールバック ------------------------------------------\r
 128 *\r
 129 *       Parameter\r
 130 *               HWND hDlg : ウインドウハンドル\r
 131 *               UINT message : メッセージ番号\r
 132 *               WPARAM wParam : メッセージの WPARAM 引数\r
 133 *               LPARAM lParam : メッセージの LPARAM 引数\r
 134 *\r
 135 *       Return Value\r
 136 *               BOOL TRUE/FALSE\r
 137 *----------------------------------------------------------------------------*/\r
 138 \r
 139 // 64ビット対応\r
 140 //static BOOL CALLBACK InputDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)\r
 141 static INT_PTR CALLBACK InputDialogCallBack(HWND hDlg, UINT iMessage, WPARAM wParam, LPARAM lParam)\r
 142 {\r
 143         char Tmp[FMAX_PATH+1];\r
 144 \r
 145         switch (iMessage)\r
 146         {\r
 147                 case WM_INITDIALOG :\r
 148                         // プロセス保護\r
 149                         ProtectAllEditControls(hDlg);\r
 150                         if(strlen(DialogData->Title) != 0)\r
 151                                 SendMessage(hDlg, WM_SETTEXT, 0, (LPARAM)DialogData->Title);\r
 152                         SendDlgItemMessage(hDlg, INP_INPSTR, EM_LIMITTEXT, DialogData->MaxLen-1, 0);\r
 153                         SendDlgItemMessage(hDlg, INP_INPSTR, WM_SETTEXT, 0, (LPARAM)DialogData->Str);\r
 154                         SendDlgItemMessage(hDlg, INP_ANONYMOUS, BM_SETCHECK, DialogData->Anonymous, 0);\r
 155                         return(TRUE);\r
 156 \r
 157                 case WM_COMMAND :\r
 158                         switch(GET_WM_COMMAND_ID(wParam, lParam))\r
 159                         {\r
 160                                 case IDOK :\r
 161                                         SendDlgItemMessage(hDlg, INP_INPSTR, WM_GETTEXT, DialogData->MaxLen, (LPARAM)DialogData->Str);\r
 162                                         DialogData->Anonymous = SendDlgItemMessage(hDlg, INP_ANONYMOUS, BM_GETCHECK, 0, 0);\r
 163                                         EndDialog(hDlg, YES);\r
 164                                         break;\r
 165 \r
 166                                 case IDCANCEL :\r
 167                                         EndDialog(hDlg, NO);\r
 168                                         break;\r
 169 \r
 170                                 case IDHELP :\r
 171                                         hHelpWin = HtmlHelp(NULL, AskHelpFilePath(), HH_HELP_CONTEXT, HelpPage);\r
 172                                         break;\r
 173 \r
 174                                 case INP_BROWSE :\r
 175                                         if(SelectDir(hDlg, Tmp, FMAX_PATH) == TRUE)\r
 176                                                 SendDlgItemMessage(hDlg, INP_INPSTR, WM_SETTEXT, 0, (LPARAM)Tmp);\r
 177                                         break;\r
 178                         }\r
 179             return(TRUE);\r
 180         }\r
 181         return(FALSE);\r
 182 }\r
 183 \r
 184 \r
 185 /*----- ［実行］と［取消］だけのダイアログの共通コールバック関数 --------------\r
 186 *\r
 187 *       Parameter\r
 188 *               HWND hDlg : ウインドウハンドル\r
 189 *               UINT message : メッセージ番号\r
 190 *               WPARAM wParam : メッセージの WPARAM 引数\r
 191 *               LPARAM lParam : メッセージの LPARAM 引数\r
 192 *\r
 193 *       Return Value\r
 194 *               BOOL TRUE/FALSE\r
 195 *----------------------------------------------------------------------------*/\r
 196 \r
 197 // 64ビット対応\r
 198 //BOOL CALLBACK ExeEscDialogProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)\r
 199 INT_PTR CALLBACK ExeEscDialogProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)\r
 200 {\r
 201         switch (message)\r
 202         {\r
 203                 case WM_INITDIALOG :\r
 204                         return(TRUE);\r
 205 \r
 206                 case WM_COMMAND :\r
 207                         switch(GET_WM_COMMAND_ID(wParam, lParam))\r
 208                         {\r
 209                                 case IDOK :\r
 210                                         EndDialog(hDlg, YES);\r
 211                                         break;\r
 212 \r
 213                                 case IDCANCEL :\r
 214                                         EndDialog(hDlg, NO);\r
 215                                         break;\r
 216                         }\r
 217                         return(TRUE);\r
 218         }\r
 219     return(FALSE);\r
 220 }\r
 221 \r
 222 \r
 223 /*----- ［実行］と［取消］だけのダイアログの共通コールバック関数(テキスト表示つき)\r
 224 *\r
 225 *       Parameter\r
 226 *               HWND hDlg : ウインドウハンドル\r
 227 *               UINT message : メッセージ番号\r
 228 *               WPARAM wParam : メッセージの WPARAM 引数\r
 229 *               LPARAM lParam : メッセージの LPARAM 引数\r
 230 *\r
 231 *       Return Value\r
 232 *               BOOL TRUE/FALSE\r
 233 *----------------------------------------------------------------------------*/\r
 234 \r
 235 // 64ビット対応\r
 236 //BOOL CALLBACK ExeEscTextDialogProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)\r
 237 INT_PTR CALLBACK ExeEscTextDialogProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)\r
 238 {\r
 239         switch (message)\r
 240         {\r
 241                 case WM_INITDIALOG :\r
 242                         SendDlgItemMessage(hDlg, COMMON_TEXT, WM_SETTEXT, 0, lParam);\r
 243                         return(TRUE);\r
 244 \r
 245                 case WM_COMMAND :\r
 246                         switch(GET_WM_COMMAND_ID(wParam, lParam))\r
 247                         {\r
 248                                 case IDOK :\r
 249                                         EndDialog(hDlg, YES);\r
 250                                         break;\r
 251 \r
 252                                 case IDCANCEL :\r
 253                                         EndDialog(hDlg, NO);\r
 254                                         break;\r
 255                         }\r
 256                         return(TRUE);\r
 257         }\r
 258     return(FALSE);\r
 259 }\r
 260 \r
 261 \r
 262 /*----- 文字列の最後に "\" を付ける -------------------------------------------\r
 263 *\r
 264 *       Parameter\r
 265 *               char *Str : 文字列\r
 266 *\r
 267 *       Return Value\r
 268 *               なし\r
 269 *\r
 270 *       Note\r
 271 *               オリジナルの文字列 char *Str が変更されます。\r
 272 *----------------------------------------------------------------------------*/\r
 273 \r
 274 void SetYenTail(char *Str)\r
 275 {\r
 276         if(_mbscmp(_mbsninc(Str, _mbslen(Str) - 1), "\\") != 0)\r
 277                 strcat(Str, "\\");\r
 278 \r
 279         return;;\r
 280 }\r
 281 \r
 282 \r
 283 /*----- 文字列の最後の "\" を取り除く -----------------------------------------\r
 284 *\r
 285 *       Parameter\r
 286 *               char *Str : 文字列\r
 287 *\r
 288 *       Return Value\r
 289 *               なし\r
 290 *\r
 291 *       Note\r
 292 *               オリジナルの文字列 char *Str が変更されます。\r
 293 *----------------------------------------------------------------------------*/\r
 294 \r
 295 void RemoveYenTail(char *Str)\r
 296 {\r
 297         char *Pos;\r
 298 \r
 299         if(strlen(Str) > 0)\r
 300         {\r
 301                 Pos = _mbsninc(Str, _mbslen(Str) - 1);\r
 302                 if(_mbscmp(Pos, "\\") == 0)\r
 303                         *Pos = NUL;\r
 304         }\r
 305         return;;\r
 306 }\r
 307 \r
 308 \r
 309 /*----- 文字列の最後に "/" を付ける -------------------------------------------\r
 310 *\r
 311 *       Parameter\r
 312 *               char *Str : 文字列\r
 313 *\r
 314 *       Return Value\r
 315 *               なし\r
 316 *\r
 317 *       Note\r
 318 *               オリジナルの文字列 char *Str が変更されます。\r
 319 *----------------------------------------------------------------------------*/\r
 320 \r
 321 void SetSlashTail(char *Str)\r
 322 {\r
 323 #if defined(HAVE_TANDEM)\r
 324     /* Tandem では / の代わりに . を追加 */\r
 325         if(AskHostType() == HTYPE_TANDEM) {\r
 326                 if(_mbscmp(_mbsninc(Str, _mbslen(Str) - 1), ".") != 0)\r
 327                         strcat(Str, ".");\r
 328         } else\r
 329 #endif\r
 330         if(_mbscmp(_mbsninc(Str, _mbslen(Str) - 1), "/") != 0)\r
 331                 strcat(Str, "/");\r
 332 \r
 333         return;\r
 334 }\r
 335 \r
 336 \r
 337 /*----- 文字列から改行コードを取り除く ----------------------------------------\r
 338 *\r
 339 *       Parameter\r
 340 *               char *Str : 文字列\r
 341 *\r
 342 *       Return Value\r
 343 *               なし\r
 344 *\r
 345 *       Note\r
 346 *               オリジナルの文字列 char *Str が変更されます。\r
 347 *----------------------------------------------------------------------------*/\r
 348 \r
 349 void RemoveReturnCode(char *Str)\r
 350 {\r
 351         char *Pos;\r
 352 \r
 353         if((Pos = strchr(Str, 0x0D)) != NULL)\r
 354                 *Pos = NUL;\r
 355         if((Pos = strchr(Str, 0x0A)) != NULL)\r
 356                 *Pos = NUL;\r
 357         return;\r
 358 }\r
 359 \r
 360 \r
 361 /*----- 文字列内の特定の文字を全て置き換える ----------------------------------\r
 362 *\r
 363 *       Parameter\r
 364 *               char *Str : 文字列\r
 365 *               char Src : 検索文字\r
 366 *               char Dst : 置換文字\r
 367 *\r
 368 *       Return Value\r
 369 *               なし\r
 370 *----------------------------------------------------------------------------*/\r
 371 \r
 372 void ReplaceAll(char *Str, char Src, char Dst)\r
 373 {\r
 374         char *Pos;\r
 375 \r
 376 /* Tandem ではノード名の変換を行わない */\r
 377 /* 最初の1文字が \ でもそのままにする */\r
 378 #if defined(HAVE_TANDEM)\r
 379         if (AskRealHostType() == HTYPE_TANDEM && strlen(Str) > 0)\r
 380                 Str++;\r
 381 #endif\r
 382         while((Pos = _mbschr(Str, Src)) != NULL)\r
 383                 *Pos = Dst;\r
 384         return;\r
 385 }\r
 386 \r
 387 \r
 388 /*----- 数字もしくは特定の１文字かチェック ------------------------------------\r
 389 *\r
 390 *       Parameter\r
 391 *               int Ch : チェックする文字\r
 392 *               int Sym : 記号\r
 393 *\r
 394 *       Return Value\r
 395 *               int ステータス\r
 396 *                       0=数字でも特定の記号でもない\r
 397 *----------------------------------------------------------------------------*/\r
 398 \r
 399 int IsDigitSym(int Ch, int Sym)\r
 400 {\r
 401         int Ret;\r
 402 \r
 403         if((Ret = IsDigit(Ch)) == 0)\r
 404         {\r
 405                 if((Sym != NUL) && (Sym == Ch))\r
 406                         Ret = 1;\r
 407         }\r
 408         return(Ret);\r
 409 }\r
 410 \r
 411 \r
 412 /*----- 文字列が全て同じ文字かチェック ----------------------------------------\r
 413 *\r
 414 *       Parameter\r
 415 *               char *Str : 文字列\r
 416 *               int Ch : 文字\r
 417 *\r
 418 *       Return Value\r
 419 *               int ステータス\r
 420 *                       YES/NO\r
 421 *----------------------------------------------------------------------------*/\r
 422 \r
 423 int StrAllSameChar(char *Str, char Ch)\r
 424 {\r
 425         int Ret;\r
 426 \r
 427         Ret = YES;\r
 428         while(*Str != NUL)\r
 429         {\r
 430                 if(*Str != Ch)\r
 431                 {\r
 432                         Ret = NO;\r
 433                         break;\r
 434                 }\r
 435                 Str++;\r
 436         }\r
 437         return(Ret);\r
 438 }\r
 439 \r
 440 \r
 441 /*----- 文字列の末尾のスペースを削除 ------------------------------------------\r
 442 *\r
 443 *       Parameter\r
 444 *               char *Str : 文字列\r
 445 *\r
 446 *       Return Value\r
 447 *               なし\r
 448 *----------------------------------------------------------------------------*/\r
 449 \r
 450 void RemoveTailingSpaces(char *Str)\r
 451 {\r
 452         char *Pos;\r
 453 \r
 454         Pos = Str + strlen(Str);\r
 455         while(--Pos > Str)\r
 456         {\r
 457                 if(*Pos != ' ')\r
 458                         break;\r
 459                 *Pos = NUL;\r
 460         }\r
 461         return;\r
 462 }\r
 463 \r
 464 \r
 465 /*----- 大文字／小文字を区別しないstrstr --------------------------------------\r
 466 *\r
 467 *       Parameter\r
 468 *               char *s1 : 文字列１\r
 469 *               char *s2 : 文字列２\r
 470 *\r
 471 *       Return Value\r
 472 *               char *文字列１中で文字列２が見つかった位置\r
 473 *                       NULL=見つからなかった\r
 474 *----------------------------------------------------------------------------*/\r
 475 \r
 476 char *stristr(char *s1, char *s2)\r
 477 {\r
 478         char *Ret;\r
 479 \r
 480         Ret = NULL;\r
 481         while(*s1 != NUL)\r
 482         {\r
 483                 if((tolower(*s1) == tolower(*s2)) &&\r
 484                    (_strnicmp(s1, s2, strlen(s2)) == 0))\r
 485                 {\r
 486                         Ret = s1;\r
 487                         break;\r
 488                 }\r
 489                 s1++;\r
 490         }\r
 491         return(Ret);\r
 492 }\r
 493 \r
 494 \r
 495 /*----- 文字列中のスペースで区切られた次のフィールドを返す --------------------\r
 496 *\r
 497 *       Parameter\r
 498 *               char *Str : 文字列\r
 499 *\r
 500 *       Return Value\r
 501 *               char *次のフィールド\r
 502 *                       NULL=見つからなかった\r
 503 *----------------------------------------------------------------------------*/\r
 504 \r
 505 char *GetNextField(char *Str)\r
 506 {\r
 507         if((Str = strchr(Str, ' ')) != NULL)\r
 508         {\r
 509                 while(*Str == ' ')\r
 510                 {\r
 511                         if(*Str == NUL)\r
 512                         {\r
 513                                 Str = NULL;\r
 514                                 break;\r
 515                         }\r
 516                         Str++;\r
 517                 }\r
 518         }\r
 519         return(Str);\r
 520 }\r
 521 \r
 522 \r
 523 /*----- 現在のフィールドの文字列をコピーする ----------------------------------\r
 524 *\r
 525 *       Parameter\r
 526 *               char *Str : 文字列\r
 527 *               char *Buf : コピー先\r
 528 *               int Max : 最大文字数\r
 529 *\r
 530 *       Return Value\r
 531 *               int ステータス\r
 532 *                       FFFTP_SUCCESS/FFFTP_FAIL=長さが長すぎる\r
 533 *----------------------------------------------------------------------------*/\r
 534 \r
 535 int GetOneField(char *Str, char *Buf, int Max)\r
 536 {\r
 537         int Sts;\r
 538         char *Pos;\r
 539 \r
 540         Sts = FFFTP_FAIL;\r
 541         if((Pos = strchr(Str, ' ')) == NULL)\r
 542         {\r
 543                 if((int)strlen(Str) <= Max)\r
 544                 {\r
 545                         strcpy(Buf, Str);\r
 546                         Sts = FFFTP_SUCCESS;\r
 547                 }\r
 548         }\r
 549         else\r
 550         {\r
 551                 if(Pos - Str <= Max)\r
 552                 {\r
 553                         strncpy(Buf, Str, Pos - Str);\r
 554                         *(Buf + (Pos - Str)) = NUL;\r
 555                         Sts = FFFTP_SUCCESS;\r
 556                 }\r
 557         }\r
 558         return(Sts);\r
 559 }\r
 560 \r
 561 \r
 562 /*----- カンマを取り除く ------------------------------------------------------\r
 563 *\r
 564 *       Parameter\r
 565 *               char *Str : 文字列\r
 566 *\r
 567 *       Return Value\r
 568 *               なし\r
 569 *----------------------------------------------------------------------------*/\r
 570 \r
 571 void RemoveComma(char *Str)\r
 572 {\r
 573         char *Put;\r
 574 \r
 575         Put = Str;\r
 576         while(*Str != NUL)\r
 577         {\r
 578                 if(*Str != ',')\r
 579                 {\r
 580                         *Put = *Str;\r
 581                         Put++;\r
 582                 }\r
 583                 Str++;\r
 584         }\r
 585         *Put = NUL;\r
 586         return;\r
 587 }\r
 588 \r
 589 \r
 590 /*----- パス名の中のファイル名の先頭を返す ------------------------------------\r
 591 *\r
 592 *       Parameter\r
 593 *               char *Path : パス名\r
 594 *\r
 595 *       Return Value\r
 596 *               char *ファイル名の先頭\r
 597 *\r
 598 *       Note\r
 599 *               ディレクトリの区切り記号は "\" と "/" の両方が有効\r
 600 *----------------------------------------------------------------------------*/\r
 601 \r
 602 char *GetFileName(char *Path)\r
 603 {\r
 604         char *Pos;\r
 605 \r
 606         if((Pos = _mbschr(Path, ':')) != NULL)\r
 607                 Path = Pos + 1;\r
 608 \r
 609         if((Pos = _mbsrchr(Path, '\\')) != NULL)\r
 610                 Path = Pos + 1;\r
 611 \r
 612         if((Pos = _mbsrchr(Path, '/')) != NULL)\r
 613                 Path = Pos + 1;\r
 614 \r
 615 #if defined(HAVE_TANDEM)\r
 616         /* Tandem は . がデリミッタとなる */\r
 617         if((AskHostType() == HTYPE_TANDEM) && ((Pos = _mbsrchr(Path, '.')) != NULL))\r
 618                 Path = Pos + 1;\r
 619 #endif\r
 620         return(Path);\r
 621 }\r
 622 \r
 623 \r
 624 /*----- ツールの表示名を返す --------------------------------------------------\r
 625 *\r
 626 *       Parameter\r
 627 *               char *Path : パス名\r
 628 *\r
 629 *       Return Value\r
 630 *               char * : 表示名\r
 631 *----------------------------------------------------------------------------*/\r
 632 \r
 633 char *GetToolName(char *Path)\r
 634 {\r
 635         char *Pos;\r
 636 \r
 637         if((Pos = _mbschr(Path, ':')) != NULL)\r
 638                 Path = Pos + 1;\r
 639 \r
 640         if((Pos = _mbsrchr(Path, '\\')) != NULL)\r
 641                 Path = Pos + 1;\r
 642 \r
 643         return(Path);\r
 644 }\r
 645 \r
 646 \r
 647 /*----- パス名の中の拡張子の先頭を返す ----------------------------------------\r
 648 *\r
 649 *       Parameter\r
 650 *               char *Path : パス名\r
 651 *\r
 652 *       Return Value\r
 653 *               char *拡張子の先頭\r
 654 *----------------------------------------------------------------------------*/\r
 655 \r
 656 char *GetFileExt(char *Path)\r
 657 {\r
 658         char *Ret;\r
 659 \r
 660         Ret = _mbschr(Path, NUL);\r
 661         if((_mbscmp(Path, ".") != 0) &&\r
 662            (_mbscmp(Path, "..") != 0))\r
 663         {\r
 664                 while((Path = _mbschr(Path, '.')) != NULL)\r
 665                 {\r
 666                         Path++;\r
 667                         Ret = Path;\r
 668                 }\r
 669         }\r
 670         return(Ret);\r
 671 }\r
 672 \r
 673 \r
 674 /*----- パス名からファイル名を取り除く ----------------------------------------\r
 675 *\r
 676 *       Parameter\r
 677 *               char *Path : パス名\r
 678 *               char *Buf : ファイル名を除いたパス名のコピー先\r
 679 *\r
 680 *       Return Value\r
 681 *               なし\r
 682 *\r
 683 *       Note\r
 684 *               ディレクトリの区切り記号は "\" と "/" の両方が有効\r
 685 *----------------------------------------------------------------------------*/\r
 686 \r
 687 void RemoveFileName(char *Path, char *Buf)\r
 688 {\r
 689         char *Pos;\r
 690 \r
 691         strcpy(Buf, Path);\r
 692 \r
 693         if((Pos = _mbsrchr(Buf, '/')) != NULL)\r
 694                 *Pos = NUL;\r
 695         else if((Pos = _mbsrchr(Buf, '\\')) != NULL)\r
 696         {\r
 697                 if((Pos == Buf) || \r
 698                    ((Pos != Buf) && (*(Pos - 1) != ':')))\r
 699                         *Pos = NUL;\r
 700         }\r
 701         return;\r
 702 }\r
 703 \r
 704 \r
 705 /*----- 上位ディレクトリのパス名を取得 ----------------------------------------\r
 706 *\r
 707 *       Parameter\r
 708 *               char *Path : パス名\r
 709 *\r
 710 *       Return Value\r
 711 *               なし\r
 712 *\r
 713 *       Note\r
 714 *               ディレクトリの区切り記号は "\" と "/" の両方が有効\r
 715 *               最初の "\"や"/"は残す\r
 716 *                       例） "/pub"   --> "/"\r
 717 *                       例） "C:\DOS" --> "C:\"\r
 718 *----------------------------------------------------------------------------*/\r
 719 \r
 720 void GetUpperDir(char *Path)\r
 721 {\r
 722         char *Top;\r
 723         char *Pos;\r
 724 \r
 725         if(((Top = _mbschr(Path, '/')) != NULL) ||\r
 726            ((Top = _mbschr(Path, '\\')) != NULL))\r
 727         {\r
 728                 Top++;\r
 729                 if(((Pos = _mbsrchr(Top, '/')) != NULL) ||\r
 730                    ((Pos = _mbsrchr(Top, '\\')) != NULL))\r
 731                         *Pos = NUL;\r
 732                 else\r
 733                         *Top = NUL;\r
 734         }\r
 735         return;\r
 736 }\r
 737 \r
 738 \r
 739 /*----- 上位ディレクトリのパス名を取得 ----------------------------------------\r
 740 *\r
 741 *       Parameter\r
 742 *               char *Path : パス名\r
 743 *\r
 744 *       Return Value\r
 745 *               なし\r
 746 *\r
 747 *       Note\r
 748 *               ディレクトリの区切り記号は "\" と "/" の両方が有効\r
 749 *               最初の "\"や"/"も消す\r
 750 *                       例） "/pub"   --> ""\r
 751 *                       例） "C:\DOS" --> "C:"\r
 752 *----------------------------------------------------------------------------*/\r
 753 \r
 754 void GetUpperDirEraseTopSlash(char *Path)\r
 755 {\r
 756         char *Pos;\r
 757 \r
 758         if(((Pos = _mbsrchr(Path, '/')) != NULL) ||\r
 759            ((Pos = _mbsrchr(Path, '\\')) != NULL))\r
 760                 *Pos = NUL;\r
 761         else\r
 762                 *Path = NUL;\r
 763 \r
 764         return;\r
 765 }\r
 766 \r
 767 \r
 768 /*----- ディレクトリの階層数を返す --------------------------------------------\r
 769 *\r
 770 *       Parameter\r
 771 *               char *Path : パス名\r
 772 *\r
 773 *       Return Value\r
 774 *               なし\r
 775 *\r
 776 *       Note\r
 777 *               単に '\' と '/'の数を返すだけ\r
 778 *----------------------------------------------------------------------------*/\r
 779 \r
 780 int AskDirLevel(char *Path)\r
 781 {\r
 782         char *Pos;\r
 783         int Level;\r
 784 \r
 785         Level = 0;\r
 786         while(((Pos = _mbschr(Path, '/')) != NULL) ||\r
 787                   ((Pos = _mbschr(Path, '\\')) != NULL))\r
 788         {\r
 789                 Path = Pos + 1;\r
 790                 Level++;\r
 791         }\r
 792         return(Level);\r
 793 }\r
 794 \r
 795 \r
 796 /*----- ファイルサイズを文字列に変換する --------------------------------------\r
 797 *\r
 798 *       Parameter\r
 799 *               double Size : ファイルサイズ\r
 800 *               char *Buf : 文字列を返すバッファ\r
 801 *\r
 802 *       Return Value\r
 803 *               なし\r
 804 *----------------------------------------------------------------------------*/\r
 805 \r
 806 void MakeSizeString(double Size, char *Buf)\r
 807 {\r
 808         if(Size >= (1024*1024))\r
 809         {\r
 810                 Size /= (1024*1024);\r
 811                 sprintf(Buf, "%.2fM Bytes", Size);\r
 812         }\r
 813         else if (Size >= 1024)\r
 814         {\r
 815                 Size /= 1024;\r
 816                 sprintf(Buf, "%.2fK Bytes", Size);\r
 817         }\r
 818         else\r
 819                 sprintf(Buf, "%.0f Bytes", Size);\r
 820 \r
 821         return;\r
 822 }\r
 823 \r
 824 \r
 825 /*----- StaticTextの領域に収まるようにパス名を整形して表示 --------------------\r
 826 *\r
 827 *       Parameter\r
 828 *               HWND hWnd : ウインドウハンドル\r
 829 *               char *Str : 文字列 (長さはFMAX_PATH以下)\r
 830 *\r
 831 *       Return Value\r
 832 *               なし\r
 833 *----------------------------------------------------------------------------*/\r
 834 \r
 835 void DispStaticText(HWND hWnd, char *Str)\r
 836 {\r
 837         char Buf[FMAX_PATH+1];\r
 838         char *Pos;\r
 839         char *Tmp;\r
 840         RECT Rect;\r
 841         SIZE fSize;\r
 842         HDC hDC;\r
 843         int Force;\r
 844 \r
 845         GetClientRect(hWnd, &Rect);\r
 846         Rect.right -= Rect.left;\r
 847 \r
 848         hDC = GetDC(hWnd);\r
 849         strcpy(Buf, Str);\r
 850         Pos = Buf;\r
 851         Force = NO;\r
 852         while(Force == NO)\r
 853         {\r
 854                 GetTextExtentPoint32(hDC, Pos, strlen(Pos), &fSize);\r
 855 \r
 856                 if(fSize.cx <= Rect.right)\r
 857                         break;\r
 858 \r
 859                 if(_mbslen(Pos) <= 4)\r
 860                         Force = YES;\r
 861                 else\r
 862                 {\r
 863                         Pos = _mbsninc(Pos, 4);\r
 864                         if((Tmp = _mbschr(Pos, '\\')) == NULL)\r
 865                                 Tmp = _mbschr(Pos, '/');\r
 866 \r
 867                         if(Tmp == NULL)\r
 868                                 Tmp = _mbsninc(Pos, 4);\r
 869 \r
 870                         Pos = Tmp - 3;\r
 871                         memset(Pos, '.', 3);\r
 872                 }\r
 873         }\r
 874         ReleaseDC(hWnd, hDC);\r
 875 \r
 876         SendMessage(hWnd, WM_SETTEXT, 0, (LPARAM)Pos);\r
 877         return;\r
 878 }\r
 879 \r
 880 \r
 881 /*----- 文字列アレイの長さを求める --------------------------------------------\r
 882 *\r
 883 *       Parameter\r
 884 *               char *Str : 文字列アレイ (末尾はNUL２つ)\r
 885 *\r
 886 *       Return Value\r
 887 *               int 長さ\r
 888 *\r
 889 *       Note\r
 890 *               終端の2つのNULのうちの最後の物は数えない\r
 891 *                       StrMultiLen("") = 0\r
 892 *                       StrMultiLen("abc\0xyz\0") = 8\r
 893 *                       StrMultiLen("abc") = 終端が２つのNULでないので求められない\r
 894 *----------------------------------------------------------------------------*/\r
 895 \r
 896 int StrMultiLen(char *Str)\r
 897 {\r
 898         int Len;\r
 899         int Tmp;\r
 900 \r
 901         Len = 0;\r
 902         while(*Str != NUL)\r
 903         {\r
 904                 Tmp = strlen(Str) + 1;\r
 905                 Str += Tmp;\r
 906                 Len += Tmp;\r
 907         }\r
 908         return(Len);\r
 909 }\r
 910 \r
 911 \r
 912 /*----- RECTをクライアント座標からスクリーン座標に変換 ------------------------\r
 913 *\r
 914 *       Parameter\r
 915 *               HWND hWnd : ウインドウハンドル\r
 916 *               RECT *Rect : RECT\r
 917 *\r
 918 *       Return Value\r
 919 *               なし\r
 920 *----------------------------------------------------------------------------*/\r
 921 \r
 922 void RectClientToScreen(HWND hWnd, RECT *Rect)\r
 923 {\r
 924         POINT Tmp;\r
 925 \r
 926         Tmp.x = Rect->left;\r
 927         Tmp.y = Rect->top;\r
 928         ClientToScreen(hWnd, &Tmp);\r
 929         Rect->left = Tmp.x;\r
 930         Rect->top = Tmp.y;\r
 931 \r
 932         Tmp.x = Rect->right;\r
 933         Tmp.y = Rect->bottom;\r
 934         ClientToScreen(hWnd, &Tmp);\r
 935         Rect->right = Tmp.x;\r
 936         Rect->bottom = Tmp.y;\r
 937 \r
 938         return;\r
 939 }\r
 940 \r
 941 \r
 942 /*----- 16進文字をバイナリに変換 ----------------------------------------------\r
 943 *\r
 944 *       Parameter\r
 945 *               char Ch : 16進文字\r
 946 *\r
 947 *       Return Value\r
 948 *               int バイナリ値\r
 949 *----------------------------------------------------------------------------*/\r
 950 \r
 951 int hex2bin(char Ch)\r
 952 {\r
 953         int Ret;\r
 954 \r
 955         if((Ch >= '0') && (Ch <= '9'))\r
 956                 Ret = Ch - '0';\r
 957         else if((Ch >= 'A') && (Ch <= 'F'))\r
 958                 Ret = Ch - 'A' + 10;\r
 959         else if((Ch >= 'a') && (Ch <= 'f'))\r
 960                 Ret = Ch - 'a' + 10;\r
 961 \r
 962         return(Ret);\r
 963 }\r
 964 \r
 965 \r
 966 /*----- ＵＮＣ文字列を分解する ------------------------------------------------\r
 967 *\r
 968 *       Parameter\r
 969 *               char *unc : UNC文字列\r
 970 *               char *Host : ホスト名をコピーするバッファ (サイズは HOST_ADRS_LEN+1)\r
 971 *               char *Path : パス名をコピーするバッファ (サイズは FMAX_PATH+1)\r
 972 *               char *File : ファイル名をコピーするバッファ (サイズは FMAX_PATH+1)\r
 973 *               char *User : ユーザ名をコピーするバッファ (サイズは USER_NAME_LEN+1)\r
 974 *               char *Pass : パスワードをコピーするバッファ (サイズは PASSWORD_LEN+1)\r
 975 *               int *Port : ポート番号をコピーするバッファ\r
 976 *\r
 977 *       Return Value\r
 978 *               int ステータス\r
 979 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
 980 *\r
 981 *       "\"は全て"/"に置き換える\r
 982 *----------------------------------------------------------------------------*/\r
 983 \r
 984 int SplitUNCpath(char *unc, char *Host, char *Path, char *File, char *User, char *Pass, int *Port)\r
 985 {\r
 986         int Sts;\r
 987         char *Pos1;\r
 988         char *Pos2;\r
 989         char Tmp[FMAX_PATH+1];\r
 990 \r
 991         memset(Host, NUL, HOST_ADRS_LEN+1);\r
 992         memset(Path, NUL, FMAX_PATH+1);\r
 993         memset(File, NUL, FMAX_PATH+1);\r
 994         memset(User, NUL, USER_NAME_LEN+1);\r
 995         memset(Pass, NUL, PASSWORD_LEN+1);\r
 996         *Port = PORT_NOR;\r
 997 \r
 998         ReplaceAll(unc, '\\', '/');\r
 999 \r
1000         if((Pos1 = _mbsstr(unc, "//")) != NULL)\r
1001                 Pos1 += 2;\r
1002         else\r
1003                 Pos1 = unc;\r
1004 \r
1005         if((Pos2 = _mbschr(Pos1, '@')) != NULL)\r
1006         {\r
1007                 memset(Tmp, NUL, FMAX_PATH+1);\r
1008                 memcpy(Tmp, Pos1, Pos2-Pos1);\r
1009                 Pos1 = Pos2 + 1;\r
1010 \r
1011                 if((Pos2 = _mbschr(Tmp, ':')) != NULL)\r
1012                 {\r
1013                         memcpy(User, Tmp, min1(Pos2-Tmp, USER_NAME_LEN));\r
1014                         strncpy(Pass, Pos2+1, PASSWORD_LEN);\r
1015                 }\r
1016                 else\r
1017                         strncpy(User, Tmp, USER_NAME_LEN);\r
1018         }\r
1019 \r
1020         // IPv6対応\r
1021         if((Pos2 = _mbschr(Pos1, '[')) != NULL && Pos2 < _mbschr(Pos1, ':'))\r
1022         {\r
1023                 Pos1 = Pos2 + 1;\r
1024                 if((Pos2 = _mbschr(Pos2, ']')) != NULL)\r
1025                 {\r
1026                         memcpy(Host, Pos1, min1(Pos2-Pos1, HOST_ADRS_LEN));\r
1027                         Pos1 = Pos2 + 1;\r
1028                 }\r
1029         }\r
1030 \r
1031         if((Pos2 = _mbschr(Pos1, ':')) != NULL)\r
1032         {\r
1033                 // IPv6対応\r
1034 //              memcpy(Host, Pos1, min1(Pos2-Pos1, HOST_ADRS_LEN));\r
1035                 if(strlen(Host) == 0)\r
1036                         memcpy(Host, Pos1, min1(Pos2-Pos1, HOST_ADRS_LEN));\r
1037                 Pos2++;\r
1038                 if(IsDigit(*Pos2))\r
1039                 {\r
1040                         *Port = atoi(Pos2);\r
1041                         while(*Pos2 != NUL)\r
1042                         {\r
1043                                 if(IsDigit(*Pos2) == 0)\r
1044                                         break;\r
1045                                 Pos2++;\r
1046                         }\r
1047                 }\r
1048                 RemoveFileName(Pos2, Path);\r
1049                 strncpy(File, GetFileName(Pos2), FMAX_PATH);\r
1050         }\r
1051         else if((Pos2 = _mbschr(Pos1, '/')) != NULL)\r
1052         {\r
1053                 // IPv6対応\r
1054 //              memcpy(Host, Pos1, min1(Pos2-Pos1, HOST_ADRS_LEN));\r
1055                 if(strlen(Host) == 0)\r
1056                         memcpy(Host, Pos1, min1(Pos2-Pos1, HOST_ADRS_LEN));\r
1057                 RemoveFileName(Pos2, Path);\r
1058                 strncpy(File, GetFileName(Pos2), FMAX_PATH);\r
1059         }\r
1060         else\r
1061         {\r
1062                 // IPv6対応\r
1063 //              strncpy(Host, Pos1, HOST_ADRS_LEN);\r
1064                 if(strlen(Host) == 0)\r
1065                         strncpy(Host, Pos1, HOST_ADRS_LEN);\r
1066         }\r
1067 \r
1068         Sts = FFFTP_FAIL;\r
1069         if(strlen(Host) > 0)\r
1070                 Sts = FFFTP_SUCCESS;\r
1071 \r
1072         return(Sts);\r
1073 }\r
1074 \r
1075 \r
1076 /*----- 日付文字列(JST)をFILETIME(UTC)に変換 ----------------------------------\r
1077 *\r
1078 *       Parameter\r
1079 *               char *Time : 日付文字列 ("yyyy/mm/dd hh:mm")\r
1080 *               FILETIME *Buf : ファイルタイムを返すワーク\r
1081 *\r
1082 *       Return Value\r
1083 *               int ステータス\r
1084 *                       YES/NO=日付情報がなかった\r
1085 *----------------------------------------------------------------------------*/\r
1086 \r
1087 int TimeString2FileTime(char *Time, FILETIME *Buf)\r
1088 {\r
1089         SYSTEMTIME sTime;\r
1090         FILETIME fTime;\r
1091         int Ret;\r
1092 \r
1093         Ret = NO;\r
1094     Buf->dwLowDateTime = 0;\r
1095     Buf->dwHighDateTime = 0;\r
1096 \r
1097         // タイムスタンプのバグ修正\r
1098 //      if(strlen(Time) >= 16)\r
1099         if(strlen(Time) >= 19)\r
1100         {\r
1101                 // タイムスタンプのバグ修正\r
1102 //              if(IsDigit(Time[0]) && IsDigit(Time[5]) && IsDigit(Time[8]) && \r
1103 //                 IsDigit(Time[12]) && IsDigit(Time[14]))\r
1104                 if(IsDigit(Time[0]) && IsDigit(Time[5]) && IsDigit(Time[8]) && \r
1105                    IsDigit(Time[12]) && IsDigit(Time[14]) && IsDigit(Time[17]))\r
1106                 {\r
1107                         Ret = YES;\r
1108                 }\r
1109 \r
1110                 sTime.wYear = atoi(Time);\r
1111                 sTime.wMonth = atoi(Time + 5);\r
1112                 sTime.wDay = atoi(Time + 8);\r
1113                 if(Time[11] != ' ')\r
1114                         sTime.wHour = atoi(Time + 11);\r
1115                 else\r
1116                         sTime.wHour = atoi(Time + 12);\r
1117                 sTime.wMinute = atoi(Time + 14);\r
1118                 // タイムスタンプのバグ修正\r
1119 //              sTime.wSecond = 0;\r
1120                 sTime.wSecond = atoi(Time + 17);\r
1121                 sTime.wMilliseconds = 0;\r
1122 \r
1123                 SystemTimeToFileTime(&sTime, &fTime);\r
1124                 LocalFileTimeToFileTime(&fTime, Buf);\r
1125         }\r
1126         return(Ret);\r
1127 }\r
1128 \r
1129 \r
1130 /*----- FILETIME(UTC)を日付文字列(JST)に変換 ----------------------------------\r
1131 *\r
1132 *       Parameter\r
1133 *               FILETIME *Time : ファイルタイム\r
1134 *               char *Buf : 日付文字列を返すワーク\r
1135 *               int Mode : モード (DISPFORM_xxx)\r
1136 *               int InfoExist : 情報があるかどうか (FINFO_xxx)\r
1137 *\r
1138 *       Return Value\r
1139 *               なし\r
1140 *----------------------------------------------------------------------------*/\r
1141 \r
1142 void FileTime2TimeString(FILETIME *Time, char *Buf, int Mode, int InfoExist)\r
1143 {\r
1144         SYSTEMTIME sTime;\r
1145         FILETIME fTime;\r
1146 \r
1147         if(Mode == DISPFORM_LEGACY)\r
1148         {\r
1149                 if((Time->dwLowDateTime == 0) && (Time->dwHighDateTime == 0))\r
1150                         InfoExist = 0;\r
1151 \r
1152                 // タイムスタンプのバグ修正\r
1153 //              /* "yyyy/mm/dd hh:mm" */\r
1154                 /* "yyyy/mm/dd hh:mm:ss" */\r
1155                 FileTimeToLocalFileTime(Time, &fTime);\r
1156                 FileTimeToSystemTime(&fTime, &sTime);\r
1157 \r
1158                 if(InfoExist & FINFO_DATE)\r
1159                         sprintf(Buf, "%04d/%02d/%02d ", sTime.wYear, sTime.wMonth, sTime.wDay);\r
1160                 else\r
1161                         sprintf(Buf, "           ");\r
1162 \r
1163                 if(InfoExist & FINFO_TIME)\r
1164                         // タイムスタンプのバグ修正\r
1165 //                      sprintf(Buf+11, "%2d:%02d", sTime.wHour, sTime.wMinute);\r
1166                         sprintf(Buf+11, "%2d:%02d:%02d", sTime.wHour, sTime.wMinute, sTime.wSecond);\r
1167                 else\r
1168                         // タイムスタンプのバグ修正\r
1169 //                      sprintf(Buf+11, "     ");\r
1170                         sprintf(Buf+11, "        ");\r
1171         }\r
1172         else\r
1173         {\r
1174 //              if (!strftime((char *)str, 100, "%c",  (const struct tm *)thetime))\r
1175 //                      SetTaskMsg("strftime が失敗しました!\n");\r
1176         }\r
1177         return;\r
1178 }\r
1179 \r
1180 \r
1181 /*----- ファイルタイムを指定タイムゾーンのローカルタイムからGMTに変換 ---------\r
1182 *\r
1183 *       Parameter\r
1184 *               FILETIME *Time : ファイルタイム\r
1185 *               int TimeZone : タイムゾーン\r
1186 *\r
1187 *       Return Value\r
1188 *               なし\r
1189 *----------------------------------------------------------------------------*/\r
1190 \r
1191 void SpecificLocalFileTime2FileTime(FILETIME *Time, int TimeZone)\r
1192 {\r
1193         unsigned __int64 Tmp64;\r
1194 \r
1195         Tmp64 = (unsigned __int64)Time->dwLowDateTime +\r
1196                         ((unsigned __int64)Time->dwHighDateTime << 32);\r
1197 \r
1198         Tmp64 -= (__int64)TimeZone * (__int64)36000000000;\r
1199 \r
1200         Time->dwHighDateTime = (DWORD)(Tmp64 >> 32);\r
1201         Time->dwLowDateTime = (DWORD)(Tmp64 & 0xFFFFFFFF);\r
1202 \r
1203         return;\r
1204 }\r
1205 \r
1206 \r
1207 /*----- 属性文字列を値に変換 --------------------------------------------------\r
1208 *\r
1209 *       Parameter\r
1210 *               char *Str : 属性文字列 ("rwxrwxrwx")\r
1211 *\r
1212 *       Return Value\r
1213 *               int 値\r
1214 *----------------------------------------------------------------------------*/\r
1215 \r
1216 int AttrString2Value(char *Str)\r
1217 {\r
1218         int Ret;\r
1219         char Tmp[10];\r
1220 \r
1221         Ret = 0;\r
1222         memset(Tmp, 0, 10);\r
1223         strncpy(Tmp, Str, 9);\r
1224 \r
1225         if(Tmp[0] != '-')\r
1226                 Ret |= 0x400;\r
1227         if(Tmp[1] != '-')\r
1228                 Ret |= 0x200;\r
1229         if(Tmp[2] != '-')\r
1230                 Ret |= 0x100;\r
1231 \r
1232         if(Tmp[3] != '-')\r
1233                 Ret |= 0x40;\r
1234         if(Tmp[4] != '-')\r
1235                 Ret |= 0x20;\r
1236         if(Tmp[5] != '-')\r
1237                 Ret |= 0x10;\r
1238 \r
1239         if(Tmp[6] != '-')\r
1240                 Ret |= 0x4;\r
1241         if(Tmp[7] != '-')\r
1242                 Ret |= 0x2;\r
1243         if(Tmp[8] != '-')\r
1244                 Ret |= 0x1;\r
1245 \r
1246         return(Ret);\r
1247 }\r
1248 \r
1249 \r
1250 /*----- 属性の値を文字列に変換 ------------------------------------------------\r
1251 *\r
1252 *       Parameter\r
1253 *               int Attr : 属性の値\r
1254 *               char *Buf : 属性文字列をセットするバッファ ("rwxrwxrwx")\r
1255 *\r
1256 *       Return Value\r
1257 *               int 値\r
1258 *----------------------------------------------------------------------------*/\r
1259 \r
1260 void AttrValue2String(int Attr, char *Buf)\r
1261 {\r
1262         strcpy(Buf, "---------");\r
1263 \r
1264         if(Attr & 0x400)\r
1265                 Buf[0] = 'r';\r
1266         if(Attr & 0x200)\r
1267                 Buf[1] = 'w';\r
1268         if(Attr & 0x100)\r
1269                 Buf[2] = 'x';\r
1270 \r
1271         if(Attr & 0x40)\r
1272                 Buf[3] = 'r';\r
1273         if(Attr & 0x20)\r
1274                 Buf[4] = 'w';\r
1275         if(Attr & 0x10)\r
1276                 Buf[5] = 'x';\r
1277 \r
1278         if(Attr & 0x4)\r
1279                 Buf[6] = 'r';\r
1280         if(Attr & 0x2)\r
1281                 Buf[7] = 'w';\r
1282         if(Attr & 0x1)\r
1283                 Buf[8] = 'x';\r
1284 \r
1285         return;\r
1286 }\r
1287 \r
1288 \r
1289 /*----- INIファイル文字列を整形 -----------------------------------------------\r
1290 *\r
1291 *       Parameter\r
1292 *               char *Str : 文字列\r
1293 *\r
1294 *       Return Value\r
1295 *               なし\r
1296 *----------------------------------------------------------------------------*/\r
1297 \r
1298 void FormatIniString(char *Str)\r
1299 {\r
1300         char *Put;\r
1301 \r
1302         Put = Str;\r
1303         while(*Str != NUL)\r
1304         {\r
1305                 if((*Str != ' ') && (*Str != '\t') && (*Str != '\n'))\r
1306                         *Put++ = *Str;\r
1307                 if(*Str++ == '=')\r
1308                         break;\r
1309         }\r
1310 \r
1311         while(*Str != NUL)\r
1312         {\r
1313                 if((*Str != 0x22) && (*Str != '\n'))\r
1314                         *Put++ = *Str;\r
1315                 Str++;\r
1316         }\r
1317         *Put = NUL;\r
1318 \r
1319         return;\r
1320 }\r
1321 \r
1322 \r
1323 /*----- ファイル選択 ----------------------------------------------------------\r
1324 *\r
1325 *       Parameter\r
1326 *               HWND hWnd : ウインドウハンドル\r
1327 *               char *Fname : ファイル名を返すバッファ\r
1328 *               char *Title : タイトル\r
1329 *               char *Filters : フィルター文字列\r
1330 *               char *Ext : デフォルト拡張子\r
1331 *               int Flags : 追加するフラグ\r
1332 *               int Save : 「開く」か「保存」か (0=開く, 1=保存)\r
1333 *\r
1334 *       Return Value\r
1335 *               int ステータス\r
1336 *                       TRUE/FALSE=取消\r
1337 *----------------------------------------------------------------------------*/\r
1338 \r
1339 int SelectFile(HWND hWnd, char *Fname, char *Title, char *Filters, char *Ext, int Flags, int Save)\r
1340 {\r
1341         OPENFILENAME OpenFile;\r
1342         char Tmp[FMAX_PATH+1];\r
1343         char Cur[FMAX_PATH+1];\r
1344         int Sts;\r
1345 \r
1346         GetCurrentDirectory(FMAX_PATH, Cur);\r
1347 \r
1348         strcpy(Tmp, Fname);\r
1349         // 変数が未初期化のバグ修正\r
1350         memset(&OpenFile, 0, sizeof(OPENFILENAME));\r
1351         OpenFile.lStructSize = sizeof(OPENFILENAME);\r
1352         OpenFile.hwndOwner = hWnd;\r
1353         OpenFile.hInstance = 0;\r
1354         OpenFile.lpstrFilter = Filters;\r
1355         OpenFile.lpstrCustomFilter = NULL;\r
1356         OpenFile.nFilterIndex = 1;\r
1357         OpenFile.lpstrFile = Tmp;\r
1358         OpenFile.nMaxFile = FMAX_PATH;\r
1359         OpenFile.lpstrFileTitle = NULL;\r
1360         OpenFile.nMaxFileTitle = 0;\r
1361         OpenFile.lpstrInitialDir = NULL;\r
1362         OpenFile.lpstrTitle = Title;\r
1363         OpenFile.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST | Flags;\r
1364         OpenFile.nFileOffset = 0;\r
1365         OpenFile.nFileExtension = 0;\r
1366         OpenFile.lpstrDefExt = Ext;\r
1367         OpenFile.lCustData = 0;\r
1368         OpenFile.lpfnHook = NULL;\r
1369         OpenFile.lpTemplateName = NULL;\r
1370 \r
1371         if(Save == 0)\r
1372         {\r
1373                 if((Sts = GetOpenFileName(&OpenFile)) == TRUE)\r
1374                         strcpy(Fname,Tmp);\r
1375         }\r
1376         else\r
1377         {\r
1378                 if((Sts = GetSaveFileName(&OpenFile)) == TRUE)\r
1379                         strcpy(Fname,Tmp);\r
1380         }\r
1381         SetCurrentDirectory(Cur);\r
1382         return(Sts);\r
1383 }\r
1384 \r
1385 \r
1386 /*----- ディレクトリを選択 ----------------------------------------------------\r
1387 *\r
1388 *       Parameter\r
1389 *               HWND hWnd : ウインドウハンドル\r
1390 *               char *Buf : ディレクトリ名を返すバッファ（初期ディレクトリ名）\r
1391 *               int MaxLen : バッファのサイズ\r
1392 *\r
1393 *       Return Value\r
1394 *               int ステータス\r
1395 *                       TRUE/FALSE=取消\r
1396 *----------------------------------------------------------------------------*/\r
1397 \r
1398 int SelectDir(HWND hWnd, char *Buf, int MaxLen)\r
1399 {\r
1400         char Tmp[FMAX_PATH+1];\r
1401         char Cur[FMAX_PATH+1];\r
1402         BROWSEINFO  Binfo;\r
1403         LPITEMIDLIST lpIdll;\r
1404         int Sts;\r
1405         LPMALLOC lpMalloc;\r
1406 \r
1407         Sts = FALSE;\r
1408         GetCurrentDirectory(FMAX_PATH, Cur);\r
1409 \r
1410         if(SHGetMalloc(&lpMalloc) == NOERROR)\r
1411         {\r
1412                 Binfo.hwndOwner = hWnd;\r
1413                 Binfo.pidlRoot = NULL;\r
1414                 Binfo.pszDisplayName = Tmp;\r
1415                 Binfo.lpszTitle = MSGJPN185;\r
1416                 Binfo.ulFlags = BIF_RETURNONLYFSDIRS;\r
1417                 Binfo.lpfn = NULL;\r
1418                 Binfo.lParam = 0;\r
1419                 Binfo.iImage = 0;\r
1420                 if((lpIdll = SHBrowseForFolder(&Binfo)) != NULL)\r
1421                 {\r
1422                         SHGetPathFromIDList(lpIdll, Tmp);\r
1423                         memset(Buf, NUL, MaxLen);\r
1424                         strncpy(Buf, Tmp, MaxLen-1);\r
1425                         Sts = TRUE;\r
1426                         lpMalloc->lpVtbl->Free(lpMalloc, lpIdll);\r
1427             }\r
1428             lpMalloc->lpVtbl->Release(lpMalloc);\r
1429                 SetCurrentDirectory(Cur);\r
1430         }\r
1431         return(Sts);\r
1432 }\r
1433 \r
1434 \r
1435 /*----- 値に関連付けられたラジオボタンをチェックする --------------------------\r
1436 *\r
1437 *       Parameter\r
1438 *               HWND hDlg : ダイアログボックスのウインドウハンドル\r
1439 *               int Value : 値\r
1440 *               const RADIOBUTTON *Buttons : ラジオボタンと値の関連付けテーブル\r
1441 *               int Num : ボタンの数\r
1442 *\r
1443 *       Return Value\r
1444 *               なし\r
1445 *\r
1446 *       Note\r
1447 *               値に関連付けられたボタンが無い時は、テーブルの最初に登録されているボタ\r
1448 *               ンをチェックする\r
1449 *----------------------------------------------------------------------------*/\r
1450 \r
1451 void SetRadioButtonByValue(HWND hDlg, int Value, const RADIOBUTTON *Buttons, int Num)\r
1452 {\r
1453         int i;\r
1454         int Def;\r
1455 \r
1456         Def = Buttons->ButID;\r
1457         for(i = 0; i < Num; i++)\r
1458         {\r
1459                 if(Value == Buttons->Value)\r
1460                 {\r
1461                         SendDlgItemMessage(hDlg, Buttons->ButID, BM_SETCHECK, 1, 0);\r
1462                         /* ラジオボタンを変更した時に他の項目のハイドなどを行なう事が      */\r
1463                         /* あるので、そのために WM_COMMAND を送る                                          */\r
1464                         SendMessage(hDlg, WM_COMMAND, MAKEWPARAM(Buttons->ButID, 0), 0);\r
1465                         break;\r
1466                 }\r
1467                 Buttons++;\r
1468         }\r
1469         if(i == Num)\r
1470         {\r
1471                 SendDlgItemMessage(hDlg, Def, BM_SETCHECK, 1, 0);\r
1472                 SendMessage(hDlg, WM_COMMAND, MAKEWPARAM(Def, 0), 0);\r
1473         }\r
1474         return;\r
1475 }\r
1476 \r
1477 \r
1478 /*----- チェックされているボタンに関連付けられた値を返す ----------------------\r
1479 *\r
1480 *       Parameter\r
1481 *               HWND hDlg : ダイアログボックスのウインドウハンドル\r
1482 *               const RADIOBUTTON *Buttons : ラジオボタンと値の関連付けテーブル\r
1483 *               int Num : ボタンの数\r
1484 *\r
1485 *       Return Value\r
1486 *               int 値\r
1487 *\r
1488 *       Note\r
1489 *               どのボタンもチェックされていない時は、テーブルの最初に登録されているボ\r
1490 *               タンの値を返す\r
1491 *----------------------------------------------------------------------------*/\r
1492 \r
1493 int AskRadioButtonValue(HWND hDlg, const RADIOBUTTON *Buttons, int Num)\r
1494 {\r
1495         int i;\r
1496         int Ret;\r
1497 \r
1498         Ret = Buttons->Value;\r
1499         for(i = 0; i < Num; i++)\r
1500         {\r
1501                 if(SendDlgItemMessage(hDlg, Buttons->ButID, BM_GETCHECK, 0, 0) == 1)\r
1502                 {\r
1503                         Ret = Buttons->Value;\r
1504                         break;\r
1505                 }\r
1506                 Buttons++;\r
1507         }\r
1508         return(Ret);\r
1509 }\r
1510 \r
1511 \r
1512 /*----- １６進文字列を数値に変換 ----------------------------------------------\r
1513 *\r
1514 *       Parameter\r
1515 *               char *Str : 文字列\r
1516 *\r
1517 *       Return Value\r
1518 *               int 値\r
1519 *----------------------------------------------------------------------------*/\r
1520 \r
1521 int xtoi(char *Str)\r
1522 {\r
1523         int Ret;\r
1524 \r
1525         Ret = 0;\r
1526         while(*Str != NUL)\r
1527         {\r
1528                 Ret *= 0x10;\r
1529                 if((*Str >= '0') && (*Str <= '9'))\r
1530                         Ret += *Str - '0';\r
1531                 else if((*Str >= 'A') && (*Str <= 'F'))\r
1532                         Ret += *Str - 'A' + 10;\r
1533                 else if((*Str >= 'a') && (*Str <= 'f'))\r
1534                         Ret += *Str - 'a' + 10;\r
1535                 else\r
1536                         break;\r
1537 \r
1538                 Str++;\r
1539         }\r
1540         return(Ret);\r
1541 }\r
1542 \r
1543 \r
1544 /*----- ファイルが読み取り可能かどうかを返す ----------------------------------\r
1545 *\r
1546 *       Parameter\r
1547 *               char *Fname : ファイル名\r
1548 *\r
1549 *       Return Value\r
1550 *               int ステータス\r
1551 *                       FFFTP_SUCCESS/FFFTP_FAIL\r
1552 *----------------------------------------------------------------------------*/\r
1553 \r
1554 int CheckFileReadable(char *Fname)\r
1555 {\r
1556         int Sts;\r
1557         HANDLE iFileHandle;\r
1558         SECURITY_ATTRIBUTES Sec;\r
1559 \r
1560         Sts = FFFTP_FAIL;\r
1561 \r
1562         Sec.nLength = sizeof(SECURITY_ATTRIBUTES);\r
1563         Sec.lpSecurityDescriptor = NULL;\r
1564         Sec.bInheritHandle = FALSE;\r
1565 \r
1566         if((iFileHandle = CreateFile(Fname, GENERIC_READ,\r
1567                 FILE_SHARE_READ|FILE_SHARE_WRITE, &Sec, OPEN_EXISTING, 0, NULL)) != INVALID_HANDLE_VALUE)\r
1568         {\r
1569                 Sts = FFFTP_SUCCESS;\r
1570                 CloseHandle(iFileHandle);\r
1571         }\r
1572         return(Sts);\r
1573 }\r
1574 \r
1575 \r
1576 \r
1577 \r
1578 \r
1579 int max1(int n, int m)\r
1580 {\r
1581         if(n > m)\r
1582                 return(n);\r
1583         else\r
1584                 return(m);\r
1585 }\r
1586 \r
1587 \r
1588 \r
1589 int min1(int n, int m)\r
1590 {\r
1591         if(n < m)\r
1592                 return(n);\r
1593         else\r
1594                 return(m);\r
1595 }\r
1596 \r
1597 \r
1598 void ExcEndianDWORD(DWORD *x)\r
1599 {\r
1600         BYTE *Pos;\r
1601         BYTE Tmp;\r
1602 \r
1603         Pos = (BYTE *)x;\r
1604         Tmp = *(Pos + 0);\r
1605         *(Pos + 0) = *(Pos + 3);\r
1606         *(Pos + 3) = Tmp;\r
1607         Tmp = *(Pos + 1);\r
1608         *(Pos + 1) = *(Pos + 2);\r
1609         *(Pos + 2) = Tmp;\r
1610         return;\r
1611 }\r
1612 \r
1613 \r
1614 \r
1615 \r
1616 /*----- int値の入れ替え -------------------------------------------------------\r
1617 *\r
1618 *       Parameter\r
1619 *               int *Num1 : 数値１\r
1620 *               int *Num2 : 数値２\r
1621 *\r
1622 *       Return Value\r
1623 *               なし\r
1624 *----------------------------------------------------------------------------*/\r
1625 \r
1626 void SwapInt(int *Num1, int *Num2)\r
1627 {\r
1628         int Tmp;\r
1629 \r
1630         Tmp = *Num1;\r
1631         *Num1 = *Num2;\r
1632         *Num2 = Tmp;\r
1633         return;\r
1634 }\r
1635 \r
1636 \r
1637 /*----- 指定されたフォルダがあるかどうかチェック -------------------------------\r
1638 *\r
1639 *       Parameter\r
1640 *               char *Path : パス\r
1641 *\r
1642 *       Return Value\r
1643 *               int ステータス (YES/NO)\r
1644 *----------------------------------------------------------------------------*/\r
1645 \r
1646 int IsFolderExist(char *Path)\r
1647 {\r
1648         int Sts;\r
1649         char Tmp[FMAX_PATH+1];\r
1650         DWORD Attr;\r
1651 \r
1652         Sts = YES;\r
1653         if(strlen(Path) > 0)\r
1654         {\r
1655                 strcpy(Tmp, Path);\r
1656                 if(_mbscmp(Tmp+1, ":\\") != 0)\r
1657                         RemoveYenTail(Tmp);\r
1658 \r
1659                 Attr = GetFileAttributes(Tmp);\r
1660                 if((Attr == 0xFFFFFFFF) || ((Attr & FILE_ATTRIBUTE_DIRECTORY) == 0))\r
1661                         Sts = NO;\r
1662         }\r
1663         return(Sts);\r
1664 }\r
1665 \r
1666 \r
1667 /*----- テーブルにしたがって数値を登録 -----------------------------------------\r
1668 *\r
1669 *       Parameter\r
1670 *               int x : 数値\r
1671 *               int Dir : 変換方向\r
1672 *               INTCONVTBL *Tbl : テーブル\r
1673 *               int Num : テーブルの数値の数\r
1674 *\r
1675 *       Return Value\r
1676 *               int 数値\r
1677 *----------------------------------------------------------------------------*/\r
1678 \r
1679 int ConvertNum(int x, int Dir, const INTCONVTBL *Tbl, int Num)\r
1680 {\r
1681         int i;\r
1682         int Ret;\r
1683 \r
1684         Ret = x;\r
1685         for(i = 0; i < Num; i++)\r
1686         {\r
1687                 if((Dir == 0) && (Tbl->Num1 == x))\r
1688                 {\r
1689                         Ret = Tbl->Num2;\r
1690                         break;\r
1691                 }\r
1692                 else if((Dir == 1) && (Tbl->Num2 == x))\r
1693                 {\r
1694                         Ret = Tbl->Num1;\r
1695                         break;\r
1696                 }\r
1697                 Tbl++;\r
1698         }\r
1699         return(Ret);\r
1700 }\r
1701 \r
1702 \r
1703 \r
1704 \r
1705 \r
1706 \r
1707 /*----- ファイルをゴミ箱に削除 ------------------------------------------------\r
1708 *\r
1709 *       Parameter\r
1710 *               char *Path : ファイル名\r
1711 *\r
1712 *       Return Value\r
1713 *               int ステータス (0=正常終了)\r
1714 *----------------------------------------------------------------------------*/\r
1715 \r
1716 int MoveFileToTrashCan(char *Path)\r
1717 {\r
1718         SHFILEOPSTRUCT FileOp;\r
1719         char Tmp[FMAX_PATH+2];\r
1720 \r
1721         memset(Tmp, 0, FMAX_PATH+2);\r
1722         strcpy(Tmp, Path);\r
1723         FileOp.hwnd = NULL;\r
1724         FileOp.wFunc = FO_DELETE;\r
1725         FileOp.pFrom = Tmp;\r
1726         FileOp.pTo = "";\r
1727         FileOp.fFlags = FOF_SILENT | FOF_NOCONFIRMATION | FOF_ALLOWUNDO;\r
1728         FileOp.lpszProgressTitle = "";\r
1729         return(SHFileOperation(&FileOp));\r
1730 }\r
1731 \r
1732 \r
1733 \r
1734 \r
1735 LONGLONG MakeLongLong(DWORD High, DWORD Low)\r
1736 {\r
1737         LONGLONG z;\r
1738         LONGLONG x1, y1;\r
1739 \r
1740         x1 = (LONGLONG)Low;\r
1741         y1 = (LONGLONG)High;\r
1742         z = x1 | (y1 << 32);\r
1743         return(z);\r
1744 }\r
1745 \r
1746 \r
1747 char *MakeNumString(LONGLONG Num, char *Buf, BOOL Comma)\r
1748 {\r
1749         int i;\r
1750         char *Pos;\r
1751 \r
1752         Pos = Buf;\r
1753         *Pos = '\0';\r
1754 \r
1755         i = 1;\r
1756         do\r
1757         {\r
1758                 *Pos++ = (char)(Num % 10) + '0';\r
1759                 Num /= 10;\r
1760                 if((Comma == TRUE) && ((i % 3) == 0) && (Num != 0))\r
1761                         *Pos++ = ',';\r
1762                 i++;\r
1763         }\r
1764         while(Num != 0);\r
1765         *Pos = NUL;\r
1766         _strrev(Buf);\r
1767 \r
1768         return(Buf);\r
1769 }\r
1770 \r
1771 \r
1772 // 異なるファイルが表示されるバグ修正\r
1773 \r
1774 // ShellExecute等で使用されるファイル名を修正\r
1775 // UNCでない場合に末尾の半角スペースは無視されるため拡張子が補完されなくなるまで半角スペースを追加\r
1776 // 現在UNC対応の予定は無い\r
1777 char* MakeDistinguishableFileName(char* Out, char* In)\r
1778 {\r
1779         char* Fname;\r
1780         char Tmp[FMAX_PATH+1];\r
1781         char Tmp2[FMAX_PATH+3];\r
1782         HANDLE hFind;\r
1783         WIN32_FIND_DATA Find;\r
1784         if(strlen(GetFileExt(GetFileName(In))) > 0)\r
1785                 strcpy(Out, In);\r
1786         else\r
1787         {\r
1788                 Fname = GetFileName(In);\r
1789                 strcpy(Tmp, In);\r
1790                 strcpy(Tmp2, Tmp);\r
1791                 strcat(Tmp2, ".*");\r
1792                 while(strlen(Tmp) < FMAX_PATH && (hFind = FindFirstFile(Tmp2, &Find)) != INVALID_HANDLE_VALUE)\r
1793                 {\r
1794                         do\r
1795                         {\r
1796                                 if(strcmp(Find.cFileName, Fname) != 0)\r
1797                                         break;\r
1798                         }\r
1799                         while(FindNextFile(hFind, &Find));\r
1800                         FindClose(hFind);\r
1801                         if(strcmp(Find.cFileName, Fname) != 0)\r
1802                         {\r
1803                                 strcat(Tmp, " ");\r
1804                                 strcpy(Tmp2, Tmp);\r
1805                                 strcat(Tmp2, ".*");\r
1806                         }\r
1807                         else\r
1808                                 break;\r
1809                 }\r
1810                 strcpy(Out, Tmp);\r
1811         }\r
1812         return Out;\r
1813 }\r
1814 \r
1815 // 環境依存の不具合対策\r
1816 char* GetAppTempPath(char* Buf)\r
1817 {\r
1818         char Temp[32];\r
1819         GetTempPath(MAX_PATH, Buf);\r
1820         SetYenTail(Buf);\r
1821         sprintf(Temp, "ffftp%08x", GetCurrentProcessId());\r
1822         strcat(Buf, Temp);\r
1823         return Buf;\r
1824 }\r
1825 \r
1826 #if defined(HAVE_TANDEM)\r
1827 /*----- ファイルサイズからEXTENTサイズの計算を行う ----------------------------\r
1828 *\r
1829 *       Parameter\r
1830 *               LONGLONG Size : ファイルサイズ\r
1831 *\r
1832 *       Return Value\r
1833 *               なし\r
1834 *----------------------------------------------------------------------------*/\r
1835 void CalcExtentSize(TRANSPACKET *Pkt, LONGLONG Size)\r
1836 {\r
1837         LONGLONG extent;\r
1838 \r
1839         /* EXTENTS(4,28) MAXEXTENTS 978 */\r
1840         if(Size < 56025088) {\r
1841                 Pkt->PriExt = DEF_PRIEXT;\r
1842                 Pkt->SecExt = DEF_SECEXT;\r
1843                 Pkt->MaxExt = DEF_MAXEXT;\r
1844         } else {\r
1845                 /* 増加余地を残すため Used 75% 近辺になるように EXTENT サイズを調整) */\r
1846                 extent = (LONGLONG)(Size / ((DEF_MAXEXT * 0.75) * 2048LL));\r
1847                 /* 28未満にすると誤差でFile Fullになる可能性がある */\r
1848                 if(extent < 28)\r
1849                         extent = 28;\r
1850 \r
1851                 Pkt->PriExt = (int)extent;\r
1852                 Pkt->SecExt = (int)extent;\r
1853                 Pkt->MaxExt = DEF_MAXEXT;\r
1854         }\r
1855 }\r
1856 #endif\r