--- /dev/null
+// SoftEther UT-VPN SourceCode\r
+// \r
+// Copyright (C) 2004-2010 SoftEther Corporation.\r
+// Copyright (C) 2004-2010 University of Tsukuba, Japan.\r
+// Copyright (C) 2003-2010 Daiyuu Nobori.\r
+// All Rights Reserved.\r
+// \r
+// http://utvpn.tsukuba.ac.jp/\r
+// \r
+// This program is free software; you can redistribute it and/or\r
+// modify it under the terms of the GNU General Public License\r
+// version 2 as published by the Free Software Foundation.\r
+// \r
+// This program is distributed in the hope that it will be useful,\r
+// but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
+// GNU General Public License for more details.\r
+// \r
+// You should have received a copy of the GNU General Public License version 2\r
+// along with this program; if not, write to the Free Software\r
+// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.\r
+// \r
+// このファイルは GPL バージョン 2 ライセンスで公開されています。\r
+// 誰でもこのファイルの内容を複製、改変したり、改変したバージョンを再配布\r
+// することができます。ただし、原著作物を改変した場合は、原著作物の著作権表示\r
+// を除去することはできません。改変した著作物を配布する場合は、改変実施者の\r
+// 著作権表示を原著作物の著作権表示に付随して記載するようにしてください。\r
+// \r
+// この SoftEther UT-VPN オープンソース・プロジェクトは、日本国の\r
+// ソフトイーサ株式会社 (SoftEther Corporation, http://www.softether.co.jp/ )\r
+// および筑波大学 (University of Tsukuba, http://www.tsukuba.ac.jp/ ) によって\r
+// ホストされています。\r
+// 本プログラムの配布者は、本プログラムを、業としての利用以外のため、\r
+// および、試験または研究のために利用が行われることを想定して配布\r
+// しています。\r
+// SoftEther UT-VPN プロジェクトの Web サイトは http://utvpn.tsukuba.ac.jp/ に\r
+// あります。\r
+// 本ソフトウェアの不具合の修正、機能改良、セキュリティホールの修復などのコード\r
+// の改変を行った場合で、その成果物を SoftEther UT-VPN プロジェクトに提出して\r
+// いただける場合は、 http://utvpn.tsukuba.ac.jp/ までソースコードを送付して\r
+// ください。SoftEther UT-VPN プロジェクトの本体リリースまたはブランチリリース\r
+// に組み込みさせていただきます。\r
+// \r
+// GPL に基づいて原著作物が提供される本ソフトウェアの改良版を配布、販売する\r
+// 場合は、そのソースコードを GPL に基づいて誰にでも開示する義務が生じます。\r
+// \r
+// 本ソフトウェアに関連する著作権、特許権、商標権はソフトイーサ株式会社\r
+// (SoftEther Corporation) およびその他の著作権保持者が保有しています。\r
+// ソフトイーサ株式会社等はこれらの権利を放棄していません。本ソフトウェアの\r
+// 二次著作物を配布、販売する場合は、これらの権利を侵害しないようにご注意\r
+// ください。\r
+// \r
+// お願い: どのような通信ソフトウェアにも通常は必ず未発見の\r
+// セキュリティホールが潜んでいます。本ソースコードをご覧いただいた結果、\r
+// UT-VPN にセキュリティホールを発見された場合は、当該セキュリティホールの\r
+// 情報を不特定多数に開示される前に、必ず、ソフトイーサ株式会社\r
+// および脆弱性情報の届出を受け付ける公的機関まで通報いただき、\r
+// 公益保護にご協力いただきますようお願い申し上げます。\r
+// \r
+// ソフトイーサ株式会社は、当該セキュリティホールについて迅速に対処を\r
+// 行い、UT-VPN および UT-VPN に関連するソフトウェアのユーザー・顧客\r
+// を保護するための努力を行います。\r
+// \r
+// ソフトイーサへの届出先: http://www.softether.co.jp/jp/contact/\r
+// 日本国内の脆弱性情報届出受付公的機関:\r
+// 独立行政法人 情報処理推進機構\r
+// http://www.ipa.go.jp/security/vuln/report/\r
+// \r
+// 上記各事項について不明な点は、ソフトイーサ株式会社までご連絡ください。\r
+// 連絡先: http://www.softether.co.jp/jp/contact/\r
+\r
+// -----------------------------------------------\r
+// [ChangeLog]\r
+// 2010.05.20\r
+// 新規リリース by SoftEther\r
+// -----------------------------------------------\r
+\r
+// WinUi.c\r
+// Win32 用ユーザーインターフェースコード\r
+\r
+#ifdef WIN32\r
+\r
+#define WINUI_C\r
+\r
+#define _WIN32_WINNT 0x0502\r
+#define WINVER 0x0502\r
+#include <winsock2.h>\r
+#include <windows.h>\r
+#include <wincrypt.h>\r
+#include <wininet.h>\r
+#include <Iphlpapi.h>\r
+#include <shlobj.h>\r
+#include <commctrl.h>\r
+#include <Dbghelp.h>\r
+#include <stdio.h>\r
+#include <stdlib.h>\r
+#include <string.h>\r
+#include <wchar.h>\r
+#include <stdarg.h>\r
+#include <time.h>\r
+#include <errno.h>\r
+#include <Mayaqua/Mayaqua.h>\r
+#include <Cedar/Cedar.h>\r
+#include "../PenCore/resource.h"\r
+\r
+char cached_pin_code[MAX_SIZE] = {0};\r
+UINT64 cached_pin_code_expires = 0;\r
+\r
+static HINSTANCE hDll = NULL;\r
+static wchar_t *title_bar = NULL;\r
+static char *font_name = NULL;\r
+static UINT font_size = 9;\r
+static HIMAGELIST large_image_list = NULL, small_image_list = NULL;\r
+static LIST *icon_list = NULL;\r
+static HINSTANCE hMsHtml = NULL;\r
+static UINT init_winui_counter = 0;\r
+static bool new_style_mode = false;\r
+\r
+bool UseAlpha = false;\r
+UINT AlphaValue = 100;\r
+\r
+static THREAD *led_thread = NULL;\r
+static bool thread_stop = false;\r
+static bool g_led_special = false;\r
+static bool g_tcpip_topmost = false;\r
+\r
+typedef struct GDI_CACHE\r
+{\r
+ bool IsInited;\r
+ COLORREF BackgroundColor;\r
+ COLORREF ForegroundColor;\r
+ COLORREF TextBoxBackgroundColor;\r
+ HBRUSH BlackBrush;\r
+ HBRUSH WhiteBrush;\r
+ HBRUSH BackgroundColorBrush;\r
+ HBRUSH ForegroundColorBrush;\r
+ HBRUSH TextBoxBackgroundColorBrush;\r
+} GDI_CACHE;\r
+\r
+static GDI_CACHE gdi_cache = { false, };\r
+\r
+// スプラッシュウインドウデータ\r
+typedef struct SPLASH\r
+{\r
+ HWND hWnd;\r
+ HWND hWndParent;\r
+ WINBMP *Bmp;\r
+ void *Param;\r
+ UINT64 Ticks;\r
+ UINT64 StartTick;\r
+ char *Title;\r
+ wchar_t *Caption;\r
+ HPEN LinePen;\r
+ WINMEMDC *BackDC;\r
+} SPLASH;\r
+\r
+// 画面がフルカラーモードかどうか取得\r
+bool IsFullColor()\r
+{\r
+ bool ret = false;\r
+ HDC hDC = CreateCompatibleDC(0);\r
+\r
+ if (GetDeviceCaps(hDC, BITSPIXEL) >= 16)\r
+ {\r
+ ret = true;\r
+ }\r
+\r
+ DeleteDC(hDC);\r
+\r
+ return ret;\r
+}\r
+\r
+// リストビューの背景に画像を表示する\r
+void LvSetBkImage(HWND hWnd, UINT id, char *bmp_file_name)\r
+{\r
+ LVBKIMAGE t;\r
+ char *tmp;\r
+ // 引数チェック\r
+ if (hWnd == NULL || bmp_file_name == NULL)\r
+ {\r
+ return;\r
+ }\r
+ if (IsFullColor() == false)\r
+ {\r
+ // 256 色モードの場合は表示しない\r
+ return;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+\r
+ tmp = MsCreateTempFileNameByExt(".bmp");\r
+\r
+ FileCopy(bmp_file_name, tmp);\r
+\r
+ t.ulFlags = LVBKIF_SOURCE_URL | LVBKIF_STYLE_NORMAL;\r
+ t.pszImage = tmp;\r
+ t.xOffsetPercent = 100;\r
+ t.yOffsetPercent = 100;\r
+\r
+ ListView_SetBkImage(DlgItem(hWnd, id), &t);\r
+\r
+ Free(tmp);\r
+}\r
+\r
+// メモリ DC を解放する\r
+void FreeMemDC(WINMEMDC *m)\r
+{\r
+ // 引数チェック\r
+ if (m == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ DeleteDC(m->hDC);\r
+ DeleteObject(m->hBitmap);\r
+\r
+ Free(m);\r
+}\r
+\r
+// メモリ DC を作成する\r
+WINMEMDC *NewMemDC(UINT width, UINT height)\r
+{\r
+ WINMEMDC *m = ZeroMalloc(sizeof(WINMEMDC));\r
+ BITMAPINFOHEADER h;\r
+ BITMAPINFO bi;\r
+\r
+ m->Width = width;\r
+ m->Height = height;\r
+\r
+ m->hDC = CreateCompatibleDC(0);\r
+\r
+ Zero(&h, sizeof(h));\r
+ h.biSize = sizeof(h);\r
+ h.biWidth = width;\r
+ h.biHeight = height;\r
+ h.biPlanes = 1;\r
+ h.biBitCount = 24;\r
+ h.biXPelsPerMeter = 2834;\r
+ h.biYPelsPerMeter = 2834;\r
+\r
+ Zero(&bi, sizeof(bi));\r
+ Copy(&bi.bmiHeader, &h, sizeof(BITMAPINFOHEADER));\r
+\r
+ m->hBitmap = CreateDIBSection(m->hDC, &bi, DIB_RGB_COLORS,\r
+ &m->Data, NULL, 0);\r
+\r
+ SelectObject(m->hDC, m->hBitmap);\r
+\r
+ return m;\r
+}\r
+\r
+// スプラッシュ画面を表示する (毎回絵が変わる)\r
+void ShowSplashEx(HWND hWndParent, char *software_name, UINT ticks, UINT line_color)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ wchar_t caption[MAX_SIZE];\r
+ UINT id = MsRegReadInt(REG_CURRENT_USER, SPLASH_BMP_REGKEY, SPLASH_BMP_REGVALUE);\r
+ id++;\r
+ if (id > 20)\r
+ {\r
+ id = 1;\r
+ }\r
+ MsRegWriteInt(REG_CURRENT_USER, SPLASH_BMP_REGKEY, SPLASH_BMP_REGVALUE, id);\r
+\r
+ UniFormat(tmp, sizeof(tmp), L"|Splash%02u.bmp", id);\r
+\r
+ StrToUni(caption, sizeof(caption), software_name);\r
+\r
+ ShowSplash(hWndParent, tmp, software_name, caption, ticks, line_color, NULL);\r
+}\r
+\r
+// フォント描画\r
+void DrawFont(HDC hDC, wchar_t *text, UINT x, UINT y, HFONT font, UINT fore_color,\r
+ UINT back_color, UINT back_width)\r
+{\r
+ int i, j;\r
+\r
+ SelectObject(hDC, font);\r
+ SetBkMode(hDC, TRANSPARENT);\r
+\r
+ // 背景の描画\r
+ SetTextColor(hDC, back_color);\r
+ for (i = -((int)back_width);i <= (int)back_width;i++)\r
+ {\r
+ for (j = -((int)back_width); j <= (int)back_width;j++)\r
+ {\r
+ if (i != 0 || j != 0)\r
+ {\r
+ TextOutW(hDC, (int)x + i, (int)y + j, text, UniStrLen(text));\r
+ }\r
+ }\r
+ }\r
+\r
+ // 文字の描画\r
+ SetTextColor(hDC, fore_color);\r
+ TextOutW(hDC, x, y, text, UniStrLen(text));\r
+}\r
+\r
+// スプラッシュウインドウを開く\r
+LRESULT CALLBACK SplashProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)\r
+{\r
+ SPLASH *splash;\r
+ CREATESTRUCT *cs = (CREATESTRUCT *)lParam;\r
+ UINT64 now = Tick64();\r
+ UINT64 current_span = 0;\r
+ UINT a;\r
+ UINT fade = 8;\r
+\r
+ if (msg == WM_CREATE)\r
+ {\r
+ splash = (SPLASH *)cs->lpCreateParams;\r
+ current_span = 0;\r
+ }\r
+ else\r
+ {\r
+ splash = (SPLASH *)GetWindowLongPtrA(hWnd, GWLP_USERDATA);\r
+ if (splash != NULL)\r
+ {\r
+ current_span = now - splash->StartTick;\r
+ }\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_CREATE:\r
+ SetWindowLongPtrA(hWnd, GWLP_USERDATA, (LONG_PTR)splash);\r
+\r
+ CenterParent(hWnd);\r
+\r
+ if (splash->Ticks != 0)\r
+ {\r
+ SetTimer(hWnd, 1, 1, NULL);\r
+\r
+ splash->StartTick = now;\r
+\r
+ SetAplha(hWnd, 0);\r
+\r
+ Top(hWnd);\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ KillTimer(hWnd, 1);\r
+\r
+ a = 0;\r
+\r
+ if (current_span < (splash->Ticks / fade))\r
+ {\r
+ // フェードイン\r
+ a = (UINT)((double)current_span * 255.0 / (double)(splash->Ticks / fade));\r
+ }\r
+ else if (current_span < (splash->Ticks * (fade - 1) / fade))\r
+ {\r
+ // 通常表示\r
+ a = 255;\r
+ }\r
+ else if (current_span < splash->Ticks)\r
+ {\r
+ // フェードアウト\r
+ a = 255 - (UINT)(((double)(current_span - (splash->Ticks * (fade - 1) / fade))) * 255.0 / (double)(splash->Ticks / fade));\r
+ }\r
+ else\r
+ {\r
+ // 閉じる\r
+ goto LABEL_CLOSE;\r
+ }\r
+\r
+ SetAplha(hWnd, a);\r
+\r
+ SetTimer(hWnd, 1, 1, NULL);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_PAINT:\r
+ if (true)\r
+ {\r
+ PAINTSTRUCT ps;\r
+ HDC hDC, hWndDC;\r
+\r
+ Zero(&ps, sizeof(ps));\r
+ hWndDC = BeginPaint(hWnd, &ps);\r
+ if (hWndDC != NULL)\r
+ {\r
+ POINT points[5];\r
+ wchar_t tmp[MAX_SIZE];\r
+\r
+ hDC = splash->BackDC->hDC;\r
+\r
+ // ビットマップ画像\r
+ BitBlt(hDC, 0, 0, splash->Bmp->Width, splash->Bmp->Height,\r
+ splash->Bmp->hDC, 0, 0, SRCCOPY);\r
+\r
+ // 線\r
+ Zero(points, sizeof(points));\r
+ points[0].x = 0; points[0].y = 0;\r
+ points[1].x = splash->Bmp->Width - 1; points[1].y = 0;\r
+ points[2].x = splash->Bmp->Width - 1; points[2].y = splash->Bmp->Height - 1;\r
+ points[3].x = 0; points[3].y = splash->Bmp->Height - 1;\r
+ points[4].x = 0; points[4].y = 0;\r
+\r
+ SelectObject(hDC, splash->LinePen);\r
+ Polyline(hDC, points, 5);\r
+\r
+ // ソフトウェアのタイトルの描画\r
+ DrawFont(hDC, splash->Caption, 114, 136,\r
+ GetFont("Arial", 36, true, false, false, false),\r
+ RGB(0, 0, 0),\r
+ RGB(255, 255, 255),\r
+ 3);\r
+\r
+ // ソフトウェアのバージョン情報の描画\r
+ UniFormat(tmp, sizeof(tmp),\r
+ L"Version %u.%02u Build %u, Compiled in %04u/%02u/%02u.",\r
+ CEDAR_VER / 100, CEDAR_VER - (CEDAR_VER / 100) * 100,\r
+ CEDAR_BUILD, BUILD_DATE_Y, BUILD_DATE_M, BUILD_DATE_D);\r
+ DrawFont(hDC, tmp, 200, 202,\r
+ GetFont("Arial", 8, true, false, false, false),\r
+ RGB(0, 0, 0),\r
+ RGB(255, 255, 255),\r
+ 1);\r
+\r
+ // 画面に描画\r
+ BitBlt(hWndDC, 0, 0, splash->Bmp->Width, splash->Bmp->Height,\r
+ hDC, 0, 0, SRCCOPY);\r
+\r
+ EndPaint(hWnd, &ps);\r
+ }\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ if (splash->Ticks != 0)\r
+ {\r
+ return 0;\r
+ }\r
+LABEL_CLOSE:\r
+ if (splash->hWndParent != NULL)\r
+ {\r
+ Enable(splash->hWndParent, 0);\r
+ }\r
+ DestroyWindow(hWnd);\r
+ return 0;\r
+\r
+ case WM_KEYDOWN:\r
+ switch (wParam)\r
+ {\r
+ case VK_ESCAPE:\r
+ case VK_RETURN:\r
+ case VK_SPACE:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_LBUTTONUP:\r
+ case WM_RBUTTONUP:\r
+ case WM_MBUTTONUP:\r
+ Close(hWnd);\r
+ break;\r
+\r
+ case WM_DESTROY:\r
+ if (splash->hWndParent != NULL)\r
+ {\r
+ Enable(splash->hWndParent, 0);\r
+ }\r
+ PostQuitMessage(0);\r
+ return 0;\r
+ }\r
+\r
+ return DefWindowProc(hWnd, msg, wParam, lParam);\r
+}\r
+\r
+// スプラッシュウインドウ\r
+void ShowSplash(HWND hWndParent, wchar_t *bmp_file_name, char *title, wchar_t *caption, UINT ticks, UINT line_color, void *param)\r
+{\r
+ SPLASH *p;\r
+ WNDCLASSA wc;\r
+ char wndclass_name[MAX_SIZE];\r
+ // 引数チェック\r
+ if (bmp_file_name == NULL)\r
+ {\r
+ return;\r
+ }\r
+ if (IsEmptyStr(title))\r
+ {\r
+ title = "Splash Window";\r
+ }\r
+\r
+ p = ZeroMalloc(sizeof(SPLASH));\r
+\r
+ p->Bmp = LoadBmpFromFileW(bmp_file_name);\r
+ if (p->Bmp == NULL)\r
+ {\r
+ Free(p);\r
+ return;\r
+ }\r
+\r
+ p->BackDC = NewMemDC(p->Bmp->Width, p->Bmp->Height);\r
+\r
+ p->LinePen = CreatePen(PS_SOLID, 1, line_color);\r
+\r
+ p->hWndParent = hWndParent;\r
+\r
+ p->Title = title;\r
+ p->Caption = caption;\r
+ p->Ticks = ticks;\r
+\r
+ p->Param = param;\r
+\r
+ Zero(&wc, sizeof(wc));\r
+ wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);\r
+ wc.hCursor = LoadCursor(NULL, ticks == 0 ? IDC_ARROW : IDC_APPSTARTING);\r
+ wc.hInstance = GetModuleHandleA(NULL);\r
+ wc.lpfnWndProc = SplashProc;\r
+\r
+ Format(wndclass_name, sizeof(wndclass_name), "WINUI_SPLASH_CLASS_%I64u", Rand64());\r
+ wc.lpszClassName = wndclass_name;\r
+\r
+ RegisterClassA(&wc);\r
+\r
+ p->hWnd = CreateWindowA(wndclass_name, title,\r
+ WS_POPUP, 0, 0,\r
+ p->Bmp->Width, p->Bmp->Height,\r
+ hWndParent, NULL, GetModuleHandleA(NULL), p);\r
+ if (p->hWnd == NULL)\r
+ {\r
+ Debug("CreateWindowA Error: %u\n", GetLastError());\r
+ }\r
+\r
+ if (hWndParent != NULL)\r
+ {\r
+ Disable(hWndParent, 0);\r
+ }\r
+\r
+ ShowWindow(p->hWnd, SW_SHOW);\r
+\r
+ if (p->hWnd != NULL)\r
+ {\r
+ MSG msg;\r
+\r
+ while (true)\r
+ {\r
+ Zero(&msg, sizeof(msg));\r
+\r
+ if (GetMessageA(&msg, NULL, 0, 0) == 0)\r
+ {\r
+ break;\r
+ }\r
+\r
+ TranslateMessage(&msg);\r
+ DispatchMessageA(&msg);\r
+ }\r
+ }\r
+\r
+ if (hWndParent != NULL)\r
+ {\r
+ Enable(hWndParent, 0);\r
+ SetActiveWindow(hWndParent);\r
+ BringWindowToTop(hWndParent);\r
+ }\r
+\r
+ UnregisterClassA(wndclass_name, GetModuleHandleA(NULL));\r
+\r
+ FreeMemDC(p->BackDC);\r
+\r
+ FreeBmp(p->Bmp);\r
+\r
+ DeleteObject(p->LinePen);\r
+\r
+ Free(p);\r
+}\r
+\r
+// GDI オブジェクトのキャッシュがまだ作成されていない場合は作成する\r
+void InitGdiCache()\r
+{\r
+ if (gdi_cache.IsInited)\r
+ {\r
+ return;\r
+ }\r
+\r
+ gdi_cache.BlackBrush = GetStockObject(BLACK_BRUSH);\r
+ gdi_cache.WhiteBrush = GetStockObject(WHITE_BRUSH);\r
+\r
+ gdi_cache.BackgroundColor = RGB(247, 238, 255);\r
+ gdi_cache.BackgroundColorBrush = CreateSolidBrush(gdi_cache.BackgroundColor);\r
+\r
+ gdi_cache.ForegroundColor = RGB(0, 0, 0);\r
+ gdi_cache.ForegroundColorBrush = CreateSolidBrush(gdi_cache.ForegroundColor);\r
+\r
+ gdi_cache.TextBoxBackgroundColor = RGB(255, 255, 255);\r
+ gdi_cache.TextBoxBackgroundColorBrush = CreateSolidBrush(gdi_cache.TextBoxBackgroundColor);\r
+\r
+ gdi_cache.IsInited = true;\r
+}\r
+\r
+// ビットマップをリソースから読む\r
+WINBMP *LoadBmpFromResource(UINT id)\r
+{\r
+ HANDLE h;\r
+ // 引数チェック\r
+ if (id == 0)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ h = LoadImageA(hDll, MAKEINTRESOURCEA(id), IMAGE_BITMAP, 0, 0,\r
+ LR_CREATEDIBSECTION | LR_VGACOLOR);\r
+\r
+ if (h == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return LoadBmpMain(h);\r
+}\r
+\r
+// ビットマップをファイルから読む\r
+WINBMP *LoadBmpFromFileW(wchar_t *filename)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ char *tmpa;\r
+ // 引数チェック\r
+ if (filename == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ // 一時ファイルにコピー\r
+ tmpa = MsCreateTempFileNameByExt("bmp");\r
+\r
+ StrToUni(tmp, sizeof(tmp), tmpa);\r
+\r
+ Free(tmpa);\r
+\r
+ if (FileCopyW(filename, tmp) == false)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return LoadBmpFromFileInnerW(tmp);\r
+}\r
+WINBMP *LoadBmpFromFileInnerW(wchar_t *filename)\r
+{\r
+ HANDLE h;\r
+ // 引数チェック\r
+ if (filename == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ if (MsIsNt())\r
+ {\r
+ h = LoadImageW(NULL, filename, IMAGE_BITMAP, 0, 0,\r
+ LR_CREATEDIBSECTION | LR_LOADFROMFILE | LR_VGACOLOR);\r
+ }\r
+ else\r
+ {\r
+ char tmp[MAX_SIZE];\r
+\r
+ UniToStr(tmp, sizeof(tmp), filename);\r
+\r
+ h = LoadImageA(NULL, tmp, IMAGE_BITMAP, 0, 0,\r
+ LR_CREATEDIBSECTION | LR_LOADFROMFILE | LR_VGACOLOR);\r
+ }\r
+\r
+ if (h == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return LoadBmpMain(h);\r
+}\r
+WINBMP *LoadBmpFromFileA(char *filename)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ // 引数チェック\r
+ if (filename == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ StrToUni(tmp, sizeof(tmp), filename);\r
+\r
+ return LoadBmpFromFileW(tmp);\r
+}\r
+\r
+// ビットマップ読み込みメイン\r
+WINBMP *LoadBmpMain(void *hBitmap)\r
+{\r
+ WINBMP *b;\r
+ BITMAP d;\r
+ HDC hDC;\r
+ // 引数チェック\r
+ if (hBitmap == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ Zero(&d, sizeof(d));\r
+\r
+ if (GetObject((HANDLE)hBitmap, sizeof(d), &d) == 0)\r
+ {\r
+ DeleteObject((HANDLE)hBitmap);\r
+ return NULL;\r
+ }\r
+\r
+ b = ZeroMalloc(sizeof(WINBMP));\r
+ b->Bits = d.bmBitsPixel;\r
+ b->hBitmap = hBitmap;\r
+ b->Height = d.bmHeight;\r
+ b->Width = d.bmWidth;\r
+\r
+ hDC = CreateCompatibleDC(0);\r
+\r
+ SelectObject(hDC, hBitmap);\r
+\r
+ b->hDC = hDC;\r
+\r
+ return b;\r
+}\r
+\r
+// ビットマップを解放する\r
+void FreeBmp(WINBMP *b)\r
+{\r
+ // 引数チェック\r
+ if (b == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ DeleteDC(b->hDC);\r
+ DeleteObject(b->hBitmap);\r
+\r
+ Free(b);\r
+}\r
+\r
+// 新しいスタイルを開始\r
+void EnableNewStyleMode()\r
+{\r
+ InitGdiCache();\r
+\r
+ new_style_mode = true;\r
+}\r
+\r
+// 新しいスタイルを終了\r
+void DisableNewStyleMode()\r
+{\r
+ new_style_mode = false;\r
+}\r
+\r
+// 新しいスタイルが有効になっているかどうかチェック\r
+bool IsNewStyleModeEnabled()\r
+{\r
+ return new_style_mode;\r
+}\r
+\r
+// NIC 情報ダイアログプロシージャ\r
+UINT NicInfoProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ UI_NICINFO *info = (UI_NICINFO *)param;\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ NicInfoInit(hWnd, info);\r
+\r
+ SetTimer(hWnd, 1, 50, NULL);\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ KillTimer(hWnd, 1);\r
+\r
+ NicInfoOnTimer(hWnd, info);\r
+\r
+ SetTimer(hWnd, 1, 50, NULL);\r
+ break;\r
+\r
+ case 2:\r
+ KillTimer(hWnd, 2);\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ KillTimer(hWnd, 1);\r
+ KillTimer(hWnd, 2);\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+void NicInfoCloseAfterTime(HWND hWnd, UI_NICINFO *info, UINT tick)\r
+{\r
+ UINT64 now;\r
+ UINT64 closetime;\r
+ // 引数チェック\r
+ if (hWnd == NULL || info == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ now = Tick64();\r
+ closetime = now + (UINT64)tick;\r
+\r
+ if (info->CloseAfterTime == 0 || info->CloseAfterTime >= closetime)\r
+ {\r
+ info->CloseAfterTime = closetime;\r
+ KillTimer(hWnd, 2);\r
+ SetTimer(hWnd, 2, tick, NULL);\r
+ }\r
+}\r
+void NicInfoShowStatus(HWND hWnd, UI_NICINFO *info, wchar_t *msg1, wchar_t *msg2, UINT icon, bool animate)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || info == NULL)\r
+ {\r
+ return;\r
+ }\r
+ if (icon == 0)\r
+ {\r
+ icon = ICO_TEST;\r
+ }\r
+ if (msg1 == NULL)\r
+ {\r
+ msg1 = L"";\r
+ }\r
+ if (msg2 == NULL)\r
+ {\r
+ msg2 = L"";\r
+ }\r
+\r
+ if (info->CurrentIcon != icon)\r
+ {\r
+ SetIcon(hWnd, S_ICON, icon);\r
+ info->CurrentIcon = icon;\r
+ }\r
+\r
+ SetText(hWnd, S_STATUS1, msg1);\r
+ SetText(hWnd, S_STATUS2, msg2);\r
+\r
+ SetShow(hWnd, P_BAR, animate && MsIsWinXPOrWinVista());\r
+}\r
+void NicInfoRefresh(HWND hWnd, UI_NICINFO *info)\r
+{\r
+ MS_ADAPTER *a;\r
+ IP ip;\r
+ char ip_str[MAX_SIZE];\r
+ char title[MAX_SIZE];\r
+ UINT i;\r
+ wchar_t tmp[MAX_SIZE];\r
+ bool has_ip = false;\r
+ // 引数チェック\r
+ if (hWnd == NULL || info == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Format(title, sizeof(title), VLAN_ADAPTER_NAME_TAG, info->NicName);\r
+\r
+ a = MsGetAdapter(title);\r
+ if (a == NULL)\r
+ {\r
+ Close(hWnd);\r
+ return;\r
+ }\r
+\r
+ // IP アドレスが割り当てら割れているかどうかチェック\r
+ Zero(&ip, sizeof(ip));\r
+ for (i = 0;i < MAX_MS_ADAPTER_IP_ADDRESS;i++)\r
+ {\r
+ if (IsZeroIP(&a->IpAddresses[i]) == false)\r
+ {\r
+ Copy(&ip, &a->IpAddresses[i], sizeof(IP));\r
+\r
+ if (!(ip.addr[0] == 169 && ip.addr[1] == 254))\r
+ {\r
+ has_ip = true;\r
+ }\r
+ }\r
+ }\r
+ IPToStr(ip_str, sizeof(ip_str), &ip);\r
+\r
+ if (has_ip == false)\r
+ {\r
+ if (a->UseDhcp)\r
+ {\r
+ NicInfoShowStatus(hWnd, info, _UU("NICINFO_1"), _UU("NICINFO_1_1"), ICO_NIC_OFFLINE, true);\r
+ }\r
+ else\r
+ {\r
+ NicInfoShowStatus(hWnd, info, _UU("NICINFO_1"), _UU("NICINFO_1_2"), ICO_NIC_OFFLINE, true);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ if (a->UseDhcp)\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("NICINFO_2_1"), ip_str);\r
+ NicInfoShowStatus(hWnd, info, _UU("NICINFO_2"), tmp, ICO_NIC_ONLINE, false);\r
+ }\r
+ else\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("NICINFO_3_1"), ip_str);\r
+ NicInfoShowStatus(hWnd, info, _UU("NICINFO_3"), tmp, ICO_NIC_ONLINE, false);\r
+ }\r
+\r
+ NicInfoCloseAfterTime(hWnd, info, NICINFO_AUTOCLOSE_TIME_2);\r
+ }\r
+\r
+ MsFreeAdapter(a);\r
+}\r
+void NicInfoInit(HWND hWnd, UI_NICINFO *info)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || info == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (MsIsWinXPOrWinVista())\r
+ {\r
+ // Windows XP 以降の場合はプログレスバーを表示する\r
+ SendMsg(hWnd, P_BAR, PBM_SETMARQUEE, TRUE, 150);\r
+ SetStyle(hWnd, P_BAR, PBS_MARQUEE);\r
+ }\r
+\r
+ DlgFont(hWnd, S_STATUS1, 9, false);\r
+ DlgFont(hWnd, S_STATUS2, 11, false);\r
+\r
+ SetIcon(hWnd, 0, ICO_NIC_ONLINE);\r
+\r
+ FormatText(hWnd, 0, info->NicName);\r
+\r
+ NicInfoRefresh(hWnd, info);\r
+\r
+ NicInfoCloseAfterTime(hWnd, info, NICINFO_AUTOCLOSE_TIME_1);\r
+}\r
+void NicInfoOnTimer(HWND hWnd, UI_NICINFO *info)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || info == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (info->Halt)\r
+ {\r
+ Close(hWnd);\r
+ return;\r
+ }\r
+\r
+ if (info->RouteChange != NULL &&\r
+ IsRouteChanged(info->RouteChange) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ NicInfoRefresh(hWnd, info);\r
+}\r
+\r
+// NIC 情報ダイアログの表示\r
+void NicInfo(UI_NICINFO *info)\r
+{\r
+ // 引数チェック\r
+ if (info == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ info->RouteChange = NewRouteChange();\r
+\r
+ DialogEx2(NULL, D_NICINFO, NicInfoProc, info, true, true);\r
+\r
+ FreeRouteChange(info->RouteChange);\r
+ info->RouteChange = NULL;\r
+}\r
+\r
+// TCP 接続スレッド\r
+void WinConnectDlgThread(THREAD *thread, void *param)\r
+{\r
+ SOCK *s;\r
+ WINCONNECT_DLG_DATA *d = (WINCONNECT_DLG_DATA *)param;\r
+ // 引数チェック\r
+ if (d == NULL || thread == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // ソケット接続\r
+ s = ConnectEx2(d->hostname, d->port, d->timeout, &d->cancel);\r
+\r
+ d->ret_sock = s;\r
+\r
+ PostMessageA(d->hWnd, WM_APP + 68, 0, 0);\r
+}\r
+\r
+// TCP 接続ダイアログプロシージャ\r
+UINT WinConnectDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ WINCONNECT_DLG_DATA *d = (WINCONNECT_DLG_DATA *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL || d == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ // UI 設定\r
+ CenterParent(hWnd);\r
+ SetText(hWnd, 0, d->caption);\r
+ SetText(hWnd, S_INFO, d->info);\r
+ SetIcon(hWnd, S_ICON, d->icon_id);\r
+ d->hWnd = hWnd;\r
+\r
+ if (MsIsWinXPOrWinVista())\r
+ {\r
+ // Windows XP 以降の場合はプログレスバーを表示する\r
+ SendMsg(hWnd, IDC_PROGRESS1, PBM_SETMARQUEE, TRUE, 100);\r
+ SetStyle(hWnd, IDC_PROGRESS1, PBS_MARQUEE);\r
+ }\r
+ else\r
+ {\r
+ // Windows 2000 以前の場合はプログレスバーを非表示にする\r
+ Hide(hWnd, IDC_PROGRESS1);\r
+ }\r
+\r
+ // スレッドの作成\r
+ d->thread = NewThread(WinConnectDlgThread, d);\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_APP + 68:\r
+ case WM_CLOSE:\r
+ if (d->cancel == false)\r
+ {\r
+ d->cancel = true;\r
+ Disable(hWnd, IDCANCEL);\r
+ if (d->ret_sock == NULL)\r
+ {\r
+ SetText(hWnd, S_INFO, _UU("CONNECTDLG_CANCELING"));\r
+ }\r
+ DoEvents(hWnd);\r
+ Refresh(hWnd);\r
+ WaitThread(d->thread, INFINITE);\r
+ ReleaseThread(d->thread);\r
+ EndDialog(hWnd, 0);\r
+ }\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// TCP 接続を UI を表示しながら実施\r
+SOCK *WinConnectEx2(HWND hWnd, char *server, UINT port, UINT timeout, UINT icon_id, wchar_t *caption, wchar_t *info)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ wchar_t tmp2[MAX_SIZE];\r
+ WINCONNECT_DLG_DATA d;\r
+ // 引数チェック\r
+ if (server == NULL || port == 0)\r
+ {\r
+ return NULL;\r
+ }\r
+ if (icon_id == 0)\r
+ {\r
+ icon_id = ICO_USER_ADMIN;\r
+ }\r
+ if (caption == NULL)\r
+ {\r
+ if (hWnd == NULL)\r
+ {\r
+ caption = _UU("CONNECTDLG_CAPTION");\r
+ }\r
+ else\r
+ {\r
+ GetTxt(hWnd, 0, tmp2, sizeof(tmp2));\r
+ caption = tmp2;\r
+ }\r
+ }\r
+ if (info == NULL)\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("CONNECTDLG_MESSAGE"), server, port);\r
+\r
+ info = tmp;\r
+ }\r
+\r
+ Zero(&d, sizeof(d));\r
+\r
+ d.cancel = false;\r
+ d.caption = caption;\r
+ d.icon_id = icon_id;\r
+ d.info = info;\r
+ d.timeout = timeout;\r
+ d.hostname = server;\r
+ d.port = port;\r
+\r
+ Dialog(hWnd, D_CONNECT, WinConnectDlgProc, &d);\r
+\r
+ return d.ret_sock;\r
+}\r
+\r
+// Windows ネットワーク設定画面の表示\r
+bool ShowWindowsNetworkConnectionDialog()\r
+{\r
+ wchar_t exe_name[MAX_SIZE];\r
+ void *proc;\r
+\r
+ CombinePathW(exe_name, sizeof(exe_name), MsGetSystem32DirW(), L"control.exe");\r
+\r
+ proc = Win32RunEx2W(exe_name, L"netconnections", false, NULL);\r
+\r
+ if (proc == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ Win32CloseProcess(proc);\r
+\r
+ return true;\r
+}\r
+\r
+// メイリオフォントの取得\r
+HFONT GetMeiryoFont()\r
+{\r
+ return GetMeiryoFontEx(0);\r
+}\r
+HFONT GetMeiryoFontEx(UINT font_size)\r
+{\r
+ // 少し適当な処理。日本語版では Meiryo, 中文版では Microsoft YaHei を使用する。\r
+ if (_GETLANG() == 0)\r
+ {\r
+ return GetFont("Meiryo", font_size, false, false, false, false);\r
+ }\r
+ else if (_GETLANG() == 2)\r
+ {\r
+ return GetFont("Microsoft YaHei", font_size, false, false, false, false);\r
+ }\r
+ else\r
+ {\r
+ return GetFont(NULL, font_size, false, false, false, false);\r
+ }\r
+}\r
+\r
+// メイリオフォントに設定\r
+void SetFontMeiryo(HWND hWnd, UINT id)\r
+{\r
+ SetFont(hWnd, id, GetMeiryoFont());\r
+}\r
+\r
+// デフォルトフォントに設定\r
+void SetFontDefault(HWND hWnd, UINT id)\r
+{\r
+ SetFont(hWnd, id, GetDialogDefaultFont());\r
+}\r
+\r
+// 悪いプロセスに関する警告メッセージの表示\r
+void ShowBadProcessWarning(HWND hWnd, BAD_PROCESS *bad)\r
+{\r
+ wchar_t title[MAX_SIZE];\r
+ wchar_t message[8192];\r
+ // 引数チェック\r
+ if (bad == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ UniFormat(title, sizeof(title), _UU("BAD_PROCESS_TITLE"), bad->Title);\r
+ UniFormat(message, sizeof(message), _UU("BAD_PROCESS_MESSAGE"),\r
+ bad->Title, bad->Title, bad->Title, bad->Title);\r
+\r
+ OnceMsg(hWnd, title, message, true, ICO_WARNING);\r
+}\r
+\r
+// 競合するアンチウイルスソフトの一覧を検索し、該当するものがあれば表示する\r
+bool CheckBadProcesses(HWND hWnd)\r
+{\r
+ bool ret = true;\r
+ UINT i;\r
+ LIST *o;\r
+\r
+ o = MsGetProcessList();\r
+\r
+ for (i = 0;i < LIST_NUM(o);i++)\r
+ {\r
+ MS_PROCESS *p = LIST_DATA(o, i);\r
+ char exe[MAX_PATH];\r
+ BAD_PROCESS *bad;\r
+\r
+ GetFileNameFromFilePath(exe, sizeof(exe), p->ExeFilename);\r
+\r
+ bad = IsBadProcess(exe);\r
+\r
+ if (bad != NULL)\r
+ {\r
+ // 悪いプロセスを発見したのでメッセージを表示する\r
+ ret = false;\r
+\r
+ ShowBadProcessWarning(hWnd, bad);\r
+ }\r
+ }\r
+\r
+ MsFreeProcessList(o);\r
+\r
+ return ret;\r
+}\r
+\r
+// 指定したプロセス名が悪いプロセスに該当するかどうか検索する\r
+BAD_PROCESS *IsBadProcess(char *exe)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (exe == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ for (i = 0;i < num_bad_processes;i++)\r
+ {\r
+ BAD_PROCESS *bad = &bad_processes[i];\r
+\r
+ if (StrCmpi(bad->ExeName, exe) == 0)\r
+ {\r
+ return bad;\r
+ }\r
+ }\r
+\r
+ return NULL;\r
+}\r
+\r
+// メッセージ表示プロシージャ\r
+UINT OnceMsgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ ONCEMSG_DLG *d = (ONCEMSG_DLG *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ SetText(hWnd, 0, d->Title);\r
+ SetText(hWnd, E_TEXT, d->Message);\r
+ SetShow(hWnd, C_DONTSHOWAGAIN, d->ShowCheckbox);\r
+ //DisableClose(hWnd);\r
+ Focus(hWnd, IDCANCEL);\r
+ if (d->Icon != 0)\r
+ {\r
+ SetIcon(hWnd, 0, d->Icon);\r
+ }\r
+\r
+ if (MsIsVista())\r
+ {\r
+ SetFont(hWnd, E_TEXT, GetMeiryoFont());\r
+ }\r
+ else\r
+ {\r
+ DlgFont(hWnd, E_TEXT, 11, false);\r
+ }\r
+\r
+ SetTimer(hWnd, 1, 50, NULL);\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ if (*d->halt)\r
+ {\r
+ Close(hWnd);\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ KillTimer(hWnd, 1);\r
+ d->Checked = IsChecked(hWnd, C_DONTSHOWAGAIN);\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// メッセージを表示する\r
+void OnceMsg(HWND hWnd, wchar_t *title, wchar_t *message, bool show_checkbox, UINT icon)\r
+{\r
+ OnceMsgEx(hWnd, title, message, show_checkbox, icon, NULL);\r
+}\r
+void OnceMsgEx(HWND hWnd, wchar_t *title, wchar_t *message, bool show_checkbox, UINT icon, bool *halt)\r
+{\r
+ ONCEMSG_DLG d;\r
+ UINT hash;\r
+ char valuename[MAX_PATH];\r
+ bool b_dummy = false;\r
+ // 引数チェック\r
+ if (title == NULL)\r
+ {\r
+ title = title_bar;\r
+ }\r
+ if (message == NULL)\r
+ {\r
+ message = L"message";\r
+ }\r
+ if (halt == NULL)\r
+ {\r
+ halt = &b_dummy;\r
+ }\r
+\r
+ Zero(&d, sizeof(d));\r
+ d.Message = message;\r
+ d.Title = title;\r
+ d.ShowCheckbox = show_checkbox;\r
+ d.Icon = icon;\r
+ d.halt = halt;\r
+\r
+ hash = GetOnceMsgHash(title, message);\r
+ Format(valuename, sizeof(valuename), ONCE_MSG_REGVALUE, hash);\r
+\r
+ if (MsRegReadInt(REG_CURRENT_USER, ONCE_MSG_REGKEY, valuename) == 0)\r
+ {\r
+ switch (icon)\r
+ {\r
+ case ICO_WARNING:\r
+ MessageBeep(MB_ICONEXCLAMATION);\r
+ break;\r
+\r
+ case ICO_INFORMATION:\r
+ MessageBeep(MB_ICONASTERISK);\r
+ break;\r
+ }\r
+\r
+ Dialog(hWnd, D_ONCEMSG, OnceMsgProc, &d);\r
+\r
+ if (show_checkbox)\r
+ {\r
+ if (d.Checked)\r
+ {\r
+ MsRegWriteInt(REG_CURRENT_USER, ONCE_MSG_REGKEY, valuename, 1);\r
+ }\r
+ }\r
+ }\r
+}\r
+\r
+// メッセージハッシュの取得\r
+UINT GetOnceMsgHash(wchar_t *title, wchar_t *message)\r
+{\r
+ BUF *b;\r
+ UCHAR hash[SHA1_SIZE];\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (title == NULL)\r
+ {\r
+ title = title_bar;\r
+ }\r
+ if (message == NULL)\r
+ {\r
+ message = L"message";\r
+ }\r
+\r
+ b = NewBuf();\r
+ WriteBuf(b, title, UniStrSize(title));\r
+ WriteBuf(b, message, UniStrSize(message));\r
+ HashSha1(hash, b->Buf, b->Size);\r
+ FreeBuf(b);\r
+\r
+ Copy(&ret, hash, sizeof(UINT));\r
+\r
+ return ret;\r
+}\r
+\r
+// Windows Vista のテーマを設定する\r
+void InitVistaWindowTheme(HWND hWnd)\r
+{\r
+ static HINSTANCE hInstDll = NULL;\r
+ HRESULT (WINAPI *_SetWindowTheme)(HWND, LPCWSTR, LPCWSTR) = NULL;\r
+\r
+ if (MsIsVista() == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (hInstDll == NULL)\r
+ {\r
+ hInstDll = LoadLibraryA("uxtheme.dll");\r
+ }\r
+\r
+ if (hInstDll == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (_SetWindowTheme == NULL)\r
+ {\r
+ _SetWindowTheme = (HRESULT (WINAPI *)(HWND,LPCWSTR,LPCWSTR))GetProcAddress(hInstDll, "SetWindowTheme");\r
+ }\r
+\r
+ if (_SetWindowTheme == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ _SetWindowTheme(hWnd, L"explorer", NULL);\r
+}\r
+\r
+// 現在のディレクトリに存在する可能性のある Windows ファイアウォールに登録すべき\r
+// すべてのアプリケーションを登録する\r
+// Q. 行儀が悪いのではないか?\r
+// A. 確かに行儀が悪いが、Windows Firewall でブロックされていることが原因で\r
+// VPN ソフトウェアが使用できないという苦情メールがよく来ていたので\r
+// やむを得ずこのように行うことにした。\r
+// なお、Microsoft 純正のサーバーソフトや他社のサーバーソフト等もこのように\r
+// して対応しているようであるから、良いのではないか。\r
+void RegistWindowsFirewallAll()\r
+{\r
+ MsRegistWindowsFirewallEx2(CEDAR_CLIENT_STR, "utvpnclient.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_CLIENT_STR, "utvpnclient_x64.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_CLIENT_STR, "utvpnclient_ia64.exe");\r
+\r
+ MsRegistWindowsFirewallEx2(CEDAR_CLIENT_MANAGER_STR, "utvpncmgr.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_CLIENT_MANAGER_STR, "utvpncmgr_x64.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_CLIENT_MANAGER_STR, "utvpncmgr_ia64.exe");\r
+\r
+ MsRegistWindowsFirewallEx2(CEDAR_SERVER_STR, "utvpnserver.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_SERVER_STR, "utvpnserver_x64.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_SERVER_STR, "utvpnserver_ia64.exe");\r
+\r
+ MsRegistWindowsFirewallEx2(CEDAR_CUI_STR, "utvpncmd.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_CUI_STR, "utvpncmd_x64.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_CUI_STR, "utvpncmd_ia64.exe");\r
+\r
+ MsRegistWindowsFirewallEx2(CEDAR_PRODUCT_STR, "ham.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_PRODUCT_STR, "ham_x64.exe");\r
+ MsRegistWindowsFirewallEx2(CEDAR_PRODUCT_STR, "ham_ia64.exe");\r
+}\r
+\r
+// すでに通知サービスが動作しているかどうかチェックする\r
+bool Win32CnCheckAlreadyExists(bool lock)\r
+{\r
+ char tmp[MAX_SIZE];\r
+ HANDLE hMutex;\r
+\r
+ HashInstanceNameLocal(tmp, sizeof(tmp), CLIENT_NOTIFY_SERVICE_INSTANCENAME);\r
+\r
+ hMutex = OpenMutex(MUTEX_ALL_ACCESS, FALSE, tmp);\r
+ if (hMutex != NULL)\r
+ {\r
+ CloseHandle(hMutex);\r
+ return true;\r
+ }\r
+\r
+ if (lock == false)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ hMutex = CreateMutex(NULL, FALSE, tmp);\r
+ if (hMutex == NULL)\r
+ {\r
+ CloseHandle(hMutex);\r
+ return true;\r
+ }\r
+\r
+ return false;\r
+}\r
+\r
+// hamcore 内の EXE の実行\r
+bool ExecuteHamcoreExe(char *name)\r
+{\r
+ BUF *b;\r
+ wchar_t tmp[MAX_PATH];\r
+ char tmp2[MAX_PATH];\r
+ UCHAR hash[MD5_SIZE];\r
+ // 引数チェック\r
+ if (name == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ b = ReadDump(name);\r
+ if (b == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ Hash(hash, name, StrLen(name), false);\r
+ BinToStr(tmp2, sizeof(tmp2), hash, sizeof(hash));\r
+ UniFormat(tmp, sizeof(tmp), L"%s\\tmp_%S.exe", MsGetMyTempDirW(), tmp2);\r
+ SeekBuf(b, 0, 0);\r
+ DumpBufW(b, tmp);\r
+\r
+ FreeBuf(b);\r
+\r
+ return RunW(tmp, NULL, false, false);\r
+}\r
+\r
+// イースターエッグの表示\r
+void ShowEasterEgg(HWND hWnd)\r
+{\r
+}\r
+\r
+void KakushiThread(THREAD *thread, void *param)\r
+{\r
+ KAKUSHI *k;\r
+ // 引数チェック\r
+ if (thread == NULL || param == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ k = (KAKUSHI *)param;\r
+\r
+ k->Thread = thread;\r
+ AddRef(k->Thread->ref);\r
+ NoticeThreadInit(thread);\r
+\r
+ Dialog(NULL, D_CM_KAKUSHI, KakushiDlgProc, k);\r
+ k->hWnd = NULL;\r
+}\r
+\r
+KAKUSHI *InitKakushi()\r
+{\r
+ THREAD *t;\r
+ KAKUSHI *k = ZeroMalloc(sizeof(KAKUSHI));\r
+\r
+ t = NewThread(KakushiThread, k);\r
+\r
+ WaitThreadInit(t);\r
+ ReleaseThread(t);\r
+\r
+ return k;\r
+}\r
+\r
+UINT KakushiDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ KAKUSHI *k = (KAKUSHI *)param;\r
+ UINT64 now;\r
+ bool b;\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ SetText(hWnd, S_INFO, _UU("CM_VLAN_CREATING"));\r
+\r
+ b = false;\r
+\r
+ if (MsIsVista())\r
+ {\r
+ if (_GETLANG() == 0)\r
+ {\r
+ SetFont(hWnd, S_INFO, GetFont("Meiryo", 11, false, false, false, false));\r
+ b = true;\r
+ }\r
+ else if (_GETLANG() == 2)\r
+ {\r
+ SetFont(hWnd, S_INFO, GetFont("Microsoft YaHei", 11, false, false, false, false));\r
+ b = true;\r
+ }\r
+ }\r
+\r
+ if (b == false)\r
+ {\r
+ DlgFont(hWnd, S_INFO, 11, false);\r
+ }\r
+\r
+ SetTimer(hWnd, 1, 50, NULL);\r
+ k->hWnd = hWnd;\r
+\r
+ k->Span = 20 * 1000;\r
+ k->StartTick = Tick64();\r
+\r
+ SetRange(hWnd, P_PROGRESS, 0, (UINT)k->Span);\r
+\r
+ case WM_APP + 9821:\r
+ now = Tick64();\r
+\r
+ if (((k->StartTick + k->Span) <= now) || k->Halt)\r
+ {\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ SetPos(hWnd, P_PROGRESS, (UINT)(now - k->StartTick));\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ AllowSetForegroundWindow(ASFW_ANY);\r
+ SetForegroundWindow(hWnd);\r
+ SetActiveWindow(hWnd);\r
+\r
+ now = Tick64();\r
+\r
+ if (((k->StartTick + k->Span) <= now) || k->Halt)\r
+ {\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ SetPos(hWnd, P_PROGRESS, (UINT)(now - k->StartTick));\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ return 1;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// 隠し画面解放\r
+void FreeKakushi(KAKUSHI *k)\r
+{\r
+ // 引数チェック\r
+ if (k == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ k->Halt = true;\r
+\r
+ if (k->hWnd != NULL)\r
+ {\r
+ PostMessage(k->hWnd, WM_APP + 9821, 0, 0);\r
+ }\r
+\r
+ WaitThread(k->Thread, INFINITE);\r
+ ReleaseThread(k->Thread);\r
+\r
+ Free(k);\r
+}\r
+\r
+// TCP/IP 最適化選択ダイアログプロシージャ\r
+UINT TcpMsgDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ SetIcon(hWnd, 0, ICO_SETUP);\r
+ //DlgFont(hWnd, R_OPTIMIZE, 0, true);\r
+\r
+ Check(hWnd, R_NO, true);\r
+\r
+ if (g_tcpip_topmost)\r
+ {\r
+ Top(hWnd);\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ ret = 1;\r
+ if (IsChecked(hWnd, R_MANUAL))\r
+ {\r
+ ret = 2;\r
+ }\r
+ else if (IsChecked(hWnd, R_NO))\r
+ {\r
+ ret = 0;\r
+ }\r
+\r
+ EndDialog(hWnd, ret);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ return 1;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// ダイアログ初期化\r
+void TcpIpDlgInit(HWND hWnd)\r
+{\r
+ MS_TCP tcp;\r
+\r
+ SetIcon(hWnd, 0, ICO_SETUP);\r
+\r
+ MsGetTcpConfig(&tcp);\r
+\r
+ Check(hWnd, R_RECV_DISABLE, tcp.RecvWindowSize == 0);\r
+ Check(hWnd, R_RECV_ENABLE, tcp.RecvWindowSize != 0);\r
+ SetInt(hWnd, E_RECV, tcp.RecvWindowSize != 0 ? tcp.RecvWindowSize : DEFAULT_TCP_MAX_WINDOW_SIZE_RECV);\r
+\r
+ Check(hWnd, R_SEND_DISABLE, tcp.SendWindowSize == 0);\r
+ Check(hWnd, R_SEND_ENABLE, tcp.SendWindowSize != 0);\r
+ SetInt(hWnd, E_SEND, tcp.SendWindowSize != 0 ? tcp.SendWindowSize : DEFAULT_TCP_MAX_WINDOW_SIZE_SEND);\r
+\r
+ TcpIpDlgUpdate(hWnd);\r
+}\r
+\r
+// ダイアログ更新\r
+void TcpIpDlgUpdate(HWND hWnd)\r
+{\r
+ bool ok = true;\r
+\r
+ SetEnable(hWnd, E_RECV, IsChecked(hWnd, R_RECV_ENABLE));\r
+ SetEnable(hWnd, S_RECV, IsChecked(hWnd, R_RECV_ENABLE));\r
+ SetEnable(hWnd, E_SEND, IsChecked(hWnd, R_SEND_ENABLE));\r
+ SetEnable(hWnd, S_SEND, IsChecked(hWnd, R_SEND_ENABLE));\r
+\r
+ if (IsChecked(hWnd, R_RECV_ENABLE) && GetInt(hWnd, E_RECV) < 1454)\r
+ {\r
+ ok = false;\r
+ }\r
+\r
+ if (IsChecked(hWnd, R_SEND_ENABLE) && GetInt(hWnd, E_SEND) < 1454)\r
+ {\r
+ ok = false;\r
+ }\r
+\r
+ SetEnable(hWnd, IDOK, ok);\r
+}\r
+\r
+// TCP/IP ダイアログプロシージャ\r
+UINT TcpIpDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ MS_TCP tcp, old;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ TcpIpDlgInit(hWnd);\r
+\r
+ if (g_tcpip_topmost)\r
+ {\r
+ Top(hWnd);\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case R_RECV_DISABLE:\r
+ case R_RECV_ENABLE:\r
+ case R_SEND_DISABLE:\r
+ case R_SEND_ENABLE:\r
+ case E_RECV:\r
+ case E_SEND:\r
+ TcpIpDlgUpdate(hWnd);\r
+ break;\r
+ }\r
+\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ Zero(&tcp, sizeof(tcp));\r
+\r
+ if (IsChecked(hWnd, R_RECV_ENABLE))\r
+ {\r
+ tcp.RecvWindowSize = GetInt(hWnd, E_RECV);\r
+ }\r
+\r
+ if (IsChecked(hWnd, R_SEND_ENABLE))\r
+ {\r
+ tcp.SendWindowSize = GetInt(hWnd, E_SEND);\r
+ }\r
+\r
+ MsGetTcpConfig(&old);\r
+\r
+ MsSetTcpConfig(&tcp);\r
+ MsSaveTcpConfigReg(&tcp);\r
+\r
+ EndDialog(hWnd, true);\r
+ break;\r
+\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+\r
+ case R_RECV_ENABLE:\r
+ FocusEx(hWnd, E_RECV);\r
+ break;\r
+\r
+ case R_SEND_ENABLE:\r
+ FocusEx(hWnd, E_SEND);\r
+ break;\r
+\r
+ case B_RECV:\r
+ SetInt(hWnd, E_RECV, DEFAULT_TCP_MAX_WINDOW_SIZE_RECV);\r
+ Check(hWnd, R_RECV_DISABLE, false);\r
+ Check(hWnd, R_RECV_ENABLE, true);\r
+ TcpIpDlgUpdate(hWnd);\r
+ FocusEx(hWnd, E_RECV);\r
+ break;\r
+\r
+ case B_SEND:\r
+ SetInt(hWnd, E_SEND, DEFAULT_TCP_MAX_WINDOW_SIZE_SEND);\r
+ Check(hWnd, R_SEND_DISABLE, false);\r
+ Check(hWnd, R_SEND_ENABLE, true);\r
+ TcpIpDlgUpdate(hWnd);\r
+ FocusEx(hWnd, E_SEND);\r
+ break;\r
+\r
+ case B_DELETE:\r
+ Zero(&tcp, sizeof(tcp));\r
+ MsSetTcpConfig(&tcp);\r
+ MsDeleteTcpConfigReg();\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// 64 bit に関する警告ダイアログ\r
+UINT Cpu64DlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ SetIcon(hWnd, 0, ICO_WARNING);\r
+ DlgFont(hWnd, S_BOLD, 9, true);\r
+ SetTimer(hWnd, 1, 30 * 1000, NULL);\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ KillTimer(hWnd, 1);\r
+ Command(hWnd, IDOK);\r
+ break;\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// 64 bit に関する警告ダイアログの表示\r
+void ShowCpu64Warning()\r
+{\r
+ Dialog(NULL, D_CPU64_WARNING, Cpu64DlgProc, NULL);\r
+}\r
+\r
+// TCP/IP 設定ユーティリティの表示\r
+void ShowTcpIpConfigUtil(HWND hWnd, bool util_mode)\r
+{\r
+ if (MsIsTcpConfigSupported() == false)\r
+ {\r
+ if (util_mode)\r
+ {\r
+ // 現在の OS ではサポートされていない旨のメッセージを表示\r
+ if (MsIsAdmin() == false)\r
+ {\r
+ MsgBox(hWnd, MB_ICONINFORMATION, _UU("TCPOPT_NOT_ADMIN"));\r
+ }\r
+ else\r
+ {\r
+ MsgBox(hWnd, MB_ICONINFORMATION, _UU("TCPOPT_NOT_SUPPORTED"));\r
+ }\r
+ }\r
+ return;\r
+ }\r
+\r
+ if (util_mode == false)\r
+ {\r
+ // utvpncmd を起動してすぐに終了する\r
+ wchar_t tmp[MAX_PATH];\r
+ wchar_t exedir[MAX_PATH];\r
+ HANDLE h;\r
+\r
+ GetExeDirW(exedir, sizeof(exedir));\r
+\r
+ if (IsX64())\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), L"%s\\utvpncmd_x64.exe", exedir);\r
+ }\r
+ else if (IsIA64())\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), L"%s\\utvpncmd_ia64.exe", exedir);\r
+ }\r
+ else\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), L"%s\\utvpncmd.exe", exedir);\r
+ }\r
+\r
+ if (IsFileW(tmp))\r
+ {\r
+ RunW(tmp, L"/tool /cmd:exit", true, false);\r
+ }\r
+\r
+ // netsh によるタスクオフローディングの無効化\r
+ if (MsIsVista())\r
+ {\r
+ char netsh_exe[MAX_SIZE];\r
+ DIRLIST *dl;\r
+ UINT i;\r
+ bool b = false;\r
+\r
+ dl = EnumDirW(exedir);\r
+\r
+ for (i = 0;i < dl->NumFiles;i++)\r
+ {\r
+ if (UniInStr(dl->File[i]->FileNameW, L"utvpnbridge") || \r
+ UniInStr(dl->File[i]->FileNameW, L"utvpnserver"))\r
+ {\r
+ b = true;\r
+ }\r
+ }\r
+\r
+ FreeDir(dl);\r
+\r
+ if (b)\r
+ {\r
+ CombinePath(netsh_exe, sizeof(netsh_exe), MsGetSystem32Dir(), "netsh.exe");\r
+\r
+ Run(netsh_exe, "netsh int ipv6 set global taskoffload=disabled", true, false);\r
+ Run(netsh_exe, "netsh int ipv4 set global taskoffload=disabled", true, false);\r
+ }\r
+ }\r
+\r
+ // Windows Firewall 登録\r
+ RegistWindowsFirewallAll();\r
+\r
+ SleepThread(1000);\r
+\r
+ // utvpnclient.exe /uihelp の起動\r
+ h = CmExecUiHelperMain();\r
+ if (h != NULL)\r
+ {\r
+ CloseHandle(h);\r
+ }\r
+\r
+ if (Is64() == false)\r
+ {\r
+ if (MsIs64BitWindows())\r
+ {\r
+ // 32 bit 版を 64 bit Windows 上で使用している場合は\r
+ // 警告メッセージを表示する\r
+ ShowCpu64Warning();\r
+ }\r
+ }\r
+\r
+ if (MsIsAdmin())\r
+ {\r
+ if (MsIsVista())\r
+ {\r
+ // Windows Vista でインストールする場合は\r
+ // MMCSS のネットワーク制限を解除する\r
+ if (MsIsMMCSSNetworkThrottlingEnabled())\r
+ {\r
+ MsSetMMCSSNetworkThrottlingEnable(false);\r
+ }\r
+ }\r
+ }\r
+ }\r
+\r
+ if (util_mode == false && MsIsShouldShowTcpConfigApp() == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (util_mode == false)\r
+ {\r
+ // 2006.07.04 nobori\r
+ // インストーラ上では TCP/IP 最適化ユーティリティは表示しないことにした\r
+ return;\r
+ }\r
+\r
+ g_tcpip_topmost = util_mode ? false : true;\r
+\r
+ if (util_mode == false)\r
+ {\r
+ UINT ret = Dialog(hWnd, D_TCP_MSG, TcpMsgDlgProc, NULL);\r
+\r
+ if (ret == 0)\r
+ {\r
+ MS_TCP tcp;\r
+\r
+ Zero(&tcp, sizeof(tcp));\r
+ MsGetTcpConfig(&tcp);\r
+ MsSaveTcpConfigReg(&tcp);\r
+ return;\r
+ }\r
+ else if (ret == 1)\r
+ {\r
+ MS_TCP tcp;\r
+\r
+ Zero(&tcp, sizeof(tcp));\r
+\r
+ tcp.RecvWindowSize = DEFAULT_TCP_MAX_WINDOW_SIZE_RECV;\r
+ tcp.SendWindowSize = DEFAULT_TCP_MAX_WINDOW_SIZE_SEND;\r
+ MsSetTcpConfig(&tcp);\r
+ MsSaveTcpConfigReg(&tcp);\r
+\r
+ return;\r
+ }\r
+ }\r
+\r
+ Dialog(hWnd, D_TCP, TcpIpDlgProc, NULL);\r
+}\r
+\r
+// メニューの国際化対応処理を行う (Unicode)\r
+void InitMenuInternationalUni(HMENU hMenu, char *prefix)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hMenu == NULL || prefix == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // メニューの項目数を取得する\r
+ num = GetMenuItemCount(hMenu);\r
+\r
+ // メニューを列挙する\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ HMENU hSubMenu = GetSubMenu(hMenu, i);\r
+ MENUITEMINFOW info;\r
+ wchar_t tmp[MAX_SIZE];\r
+\r
+ if (hSubMenu != NULL)\r
+ {\r
+ // サブメニューがある場合再帰呼び出しする\r
+ InitMenuInternational(hSubMenu, prefix);\r
+ }\r
+\r
+ // メニュー項目を取得する\r
+ Zero(&info, sizeof(info));\r
+ info.cbSize = sizeof(info);\r
+ info.cch = sizeof(tmp);\r
+ info.dwTypeData = tmp;\r
+ info.fMask = MIIM_STRING;\r
+ Zero(tmp, sizeof(tmp));\r
+\r
+ if (GetMenuItemInfoW(hMenu, i, true, &info))\r
+ {\r
+ if (tmp[0] == L'@')\r
+ {\r
+ char name[256];\r
+ wchar_t *ret;\r
+\r
+ Format(name, sizeof(name), "%s@%S", prefix, &tmp[1]);\r
+\r
+ ret = _UU(name);\r
+ if (UniIsEmptyStr(ret) == false)\r
+ {\r
+ UniStrCpy(tmp, sizeof(tmp), ret);\r
+ info.cch = UniStrLen(tmp);\r
+\r
+ SetMenuItemInfoW(hMenu, i, true, &info);\r
+ }\r
+ }\r
+ }\r
+ }\r
+}\r
+\r
+// メニューの国際化対応処理を行う\r
+void InitMenuInternational(HMENU hMenu, char *prefix)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hMenu == NULL || prefix == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (MsIsNt())\r
+ {\r
+ InitMenuInternationalUni(hMenu, prefix);\r
+ return;\r
+ }\r
+\r
+ // メニューの項目数を取得する\r
+ num = GetMenuItemCount(hMenu);\r
+\r
+ // メニューを列挙する\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ HMENU hSubMenu = GetSubMenu(hMenu, i);\r
+ MENUITEMINFO info;\r
+ char tmp[MAX_SIZE];\r
+\r
+ if (hSubMenu != NULL)\r
+ {\r
+ // サブメニューがある場合再帰呼び出しする\r
+ InitMenuInternational(hSubMenu, prefix);\r
+ }\r
+\r
+ // メニュー項目を取得する\r
+ Zero(&info, sizeof(info));\r
+ info.cbSize = sizeof(info);\r
+ info.cch = sizeof(tmp);\r
+ info.dwTypeData = tmp;\r
+ info.fMask = MIIM_STRING;\r
+ Zero(tmp, sizeof(tmp));\r
+\r
+ if (GetMenuItemInfo(hMenu, i, true, &info))\r
+ {\r
+ if (tmp[0] == '@')\r
+ {\r
+ char name[256];\r
+ char *ret;\r
+\r
+ Format(name, sizeof(name), "%s@%s", prefix, &tmp[1]);\r
+\r
+ ret = _SS(name);\r
+ if (IsEmptyStr(ret) == false)\r
+ {\r
+ StrCpy(tmp, sizeof(tmp), ret);\r
+ info.cch = StrLen(tmp);\r
+\r
+ SetMenuItemInfo(hMenu, i, true, &info);\r
+ }\r
+ }\r
+ }\r
+ }\r
+}\r
+\r
+// ダイアログボックス用のデフォルトのフォントを取得する\r
+HFONT GetDialogDefaultFont()\r
+{\r
+ return GetDialogDefaultFontEx(false);\r
+}\r
+HFONT GetDialogDefaultFontEx(bool meiryo)\r
+{\r
+ char *default_font_name = _SS("DEFAULT_FONT");\r
+ UINT default_font_size = _II("DEFAULT_FONT_SIZE");\r
+\r
+ if (meiryo)\r
+ {\r
+ if (_GETLANG() == 2)\r
+ {\r
+ default_font_name = "Microsoft YaHei";\r
+ }\r
+ else\r
+ {\r
+ default_font_name = "Meiryo";\r
+ }\r
+ }\r
+\r
+ if (IsEmptyStr(default_font_name))\r
+ {\r
+ default_font_name = font_name;\r
+ }\r
+\r
+ if (default_font_size == 0)\r
+ {\r
+ default_font_size = 9;\r
+ }\r
+\r
+ return GetFont(default_font_name, default_font_size, false, false, false, false);\r
+}\r
+\r
+// ウインドウサイズとコントロールサイズを調整する\r
+void AdjustWindowAndControlSize(HWND hWnd)\r
+{\r
+ HFONT hDlgFont;\r
+ UINT dlgfont_x, dlgfont_y;\r
+ RECT rect, rect2;\r
+ LIST *o;\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // 現在のウインドウのフォントを取得する\r
+ hDlgFont = (HFONT)SendMsg(hWnd, 0, WM_GETFONT, 0, 0);\r
+\r
+ // 現在のウインドウのフォントの幅と高さを取得する\r
+ CalcFontSize(hDlgFont, &dlgfont_x, &dlgfont_y);\r
+\r
+ if ((dlgfont_x == WINUI_DEFAULT_DIALOG_UNIT_X) &&\r
+ (dlgfont_y == WINUI_DEFAULT_DIALOG_UNIT_Y))\r
+ {\r
+ // 調整する必要が無い\r
+ return;\r
+ }\r
+\r
+ // ウインドウのサイズを調整する\r
+ if (GetWindowRect(hWnd, &rect))\r
+ {\r
+ if (GetClientRect(hWnd, &rect2))\r
+ {\r
+ UINT width = rect2.right - rect2.left;\r
+ UINT height = rect2.bottom - rect2.top;\r
+\r
+ AdjustDialogXY(&width, &height, dlgfont_x, dlgfont_y);\r
+\r
+ width += (rect.right - rect.left) - (rect2.right - rect2.left);\r
+ height += (rect.bottom - rect.top) - (rect2.bottom - rect2.top);\r
+\r
+ if (true)\r
+ {\r
+ HWND hParent = GetParent(hWnd);\r
+\r
+ if (hParent != NULL)\r
+ {\r
+ RECT r;\r
+\r
+ Zero(&r, sizeof(r));\r
+\r
+ if (GetWindowRect(hParent, &r))\r
+ {\r
+ RECT r2;\r
+\r
+ rect.top = r.top + GetSystemMetrics(SM_CYCAPTION);\r
+\r
+ Zero(&r2, sizeof(r2));\r
+ if (SystemParametersInfo(SPI_GETWORKAREA, 0, &r2, 0))\r
+ {\r
+ if (r2.bottom < (rect.top + (int)height))\r
+ {\r
+ rect.top -= (rect.top + (int)height) - r2.bottom;\r
+\r
+ if (rect.top < 0)\r
+ {\r
+ rect.top = 0;\r
+ }\r
+ }\r
+ }\r
+ }\r
+ }\r
+ }\r
+\r
+ MoveWindow(hWnd, rect.left, rect.top, width, height, false);\r
+ }\r
+ }\r
+\r
+ // 子ウインドウを列挙する\r
+ o = EnumAllChildWindowEx(hWnd, false, true, true);\r
+\r
+ for (i = 0;i < LIST_NUM(o);i++)\r
+ {\r
+ // 子ウインドウのサイズを調整する\r
+ HWND h = *((HWND *)LIST_DATA(o, i));\r
+ HWND hWndParent = GetParent(h);\r
+ RECT current_rect;\r
+ char class_name[MAX_PATH];\r
+ bool is_image = false;\r
+\r
+ // クラス名を取得\r
+ Zero(class_name, sizeof(class_name));\r
+ GetClassNameA(h, class_name, sizeof(class_name));\r
+\r
+ if (StrCmpi(class_name, "static") == 0)\r
+ {\r
+ if (SendMsg(h, 0, STM_GETIMAGE, IMAGE_BITMAP, 0) != 0 ||\r
+ SendMsg(h, 0, STM_GETIMAGE, IMAGE_ICON, 0) != 0 ||\r
+ SendMsg(h, 0, STM_GETICON, 0, 0) != 0)\r
+ {\r
+ is_image = true;\r
+ }\r
+ }\r
+\r
+ // 位置を取得\r
+ if (GetWindowRect(h, ¤t_rect))\r
+ {\r
+ // クライアント座標に変換\r
+ POINT p1, p2;\r
+\r
+ p1.x = current_rect.left;\r
+ p1.y = current_rect.top;\r
+\r
+ p2.x = current_rect.right;\r
+ p2.y = current_rect.bottom;\r
+\r
+ ScreenToClient(hWndParent, &p1);\r
+ ScreenToClient(hWndParent, &p2);\r
+\r
+ // 位置を調整\r
+ AdjustDialogXY(&p1.x, &p1.y, dlgfont_x, dlgfont_y);\r
+ AdjustDialogXY(&p2.x, &p2.y, dlgfont_x, dlgfont_y);\r
+\r
+ if (is_image)\r
+ {\r
+ p2.x = p1.x + (current_rect.right - current_rect.left);\r
+ p2.y = p1.y + (current_rect.bottom - current_rect.top);\r
+ }\r
+\r
+ // 移動\r
+ MoveWindow(h, p1.x, p1.y, p2.x - p1.x, p2.y - p1.y, false);\r
+ }\r
+ }\r
+\r
+ FreeWindowList(o);\r
+}\r
+\r
+// x と y の値をフォントに応じて調整する\r
+void AdjustDialogXY(UINT *x, UINT *y, UINT dlgfont_x, UINT dlgfont_y)\r
+{\r
+ if (x != NULL)\r
+ {\r
+ *x = (UINT)(((double)*x) * (double)WINUI_DEFAULT_DIALOG_UNIT_X / (double)dlgfont_x);\r
+ }\r
+\r
+ if (y != NULL)\r
+ {\r
+ *y = (UINT)(((double)*y) * (double)WINUI_DEFAULT_DIALOG_UNIT_Y / (double)dlgfont_y);\r
+ }\r
+}\r
+\r
+// ダイアログボックスの国際化対応処理を行う\r
+void InitDialogInternational(HWND hWnd, void *param)\r
+{\r
+ LIST *o;\r
+ UINT i;\r
+ bool is_managed_dialog = false;\r
+ char caption[MAX_PATH];\r
+ char *dialog_name;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ AdjustWindowAndControlSize(hWnd);\r
+\r
+ GetTxtA(hWnd, 0, caption, sizeof(caption));\r
+ if (caption[0] == '@')\r
+ {\r
+ dialog_name = &caption[1];\r
+\r
+ is_managed_dialog = true;\r
+ }\r
+\r
+ // すべてのウインドウハンドルを列挙する\r
+ o = EnumAllChildWindow(hWnd);\r
+\r
+ for (i = 0;i < LIST_NUM(o);i++)\r
+ {\r
+ HWND hControl = *((HWND *)LIST_DATA(o, i));\r
+\r
+ if (hControl != NULL)\r
+ {\r
+ HFONT hFont = GetDialogDefaultFontEx(param && ((DIALOG_PARAM *)param)->meiryo);\r
+\r
+ SetFont(hControl, 0, hFont);\r
+\r
+ if (MsIsVista())\r
+ {\r
+ char classname[MAX_PATH];\r
+ GetClassNameA(hControl, classname, sizeof(classname));\r
+\r
+ if (StrCmpi(classname, "syslistview32") == 0)\r
+ {\r
+ InitVistaWindowTheme(hControl);\r
+ }\r
+ }\r
+\r
+ if (is_managed_dialog)\r
+ {\r
+ char str[MAX_PATH];\r
+\r
+ GetTxtA(hControl, 0, str, sizeof(str));\r
+ if (str[0] == '@')\r
+ {\r
+ char *control_name = &str[1];\r
+ char tmp[MAX_PATH];\r
+ wchar_t *ret;\r
+\r
+ StrCpy(tmp, sizeof(tmp), dialog_name);\r
+ StrCat(tmp, sizeof(tmp), "@");\r
+\r
+ if (hWnd == hControl)\r
+ {\r
+ StrCat(tmp, sizeof(tmp), "CAPTION");\r
+ }\r
+ else\r
+ {\r
+ StrCat(tmp, sizeof(tmp), control_name);\r
+ }\r
+\r
+ ret = _UU(tmp);\r
+\r
+ if (ret != NULL && UniIsEmptyStr(ret) == false)\r
+ {\r
+ SetText(hControl, 0, ret);\r
+ }\r
+ }\r
+ }\r
+ }\r
+ }\r
+\r
+ FreeWindowList(o);\r
+}\r
+\r
+// 子ウインドウ列挙プロシージャ\r
+// ダイアログ初期化\r
+void StringDlgInit(HWND hWnd, STRING_DLG *s)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || s == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetText(hWnd, E_STRING, s->String);\r
+\r
+ SetIcon(hWnd, S_ICON, s->Icon);\r
+ SetText(hWnd, S_INFO, s->Info);\r
+ SetText(hWnd, 0, s->Title);\r
+\r
+ FocusEx(hWnd, E_STRING);\r
+\r
+ StringDlgUpdate(hWnd, s);\r
+}\r
+\r
+// ダイアログコントロール更新\r
+void StringDlgUpdate(HWND hWnd, STRING_DLG *s)\r
+{\r
+ wchar_t *tmp;\r
+ bool b = true;\r
+ // 引数チェック\r
+ if (hWnd == NULL || s == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ tmp = GetText(hWnd, E_STRING);\r
+\r
+ if (tmp != NULL)\r
+ {\r
+ if (s->AllowEmpty == false)\r
+ {\r
+ if (UniIsEmptyStr(tmp))\r
+ {\r
+ b = false;\r
+ }\r
+ }\r
+\r
+ if (s->AllowUnsafe == false)\r
+ {\r
+ if (IsSafeUniStr(tmp) == false)\r
+ {\r
+ b = false;\r
+ }\r
+ }\r
+\r
+ Free(tmp);\r
+ }\r
+\r
+ SetEnable(hWnd, IDOK, b);\r
+}\r
+\r
+// 文字列ダイアログプロシージャ\r
+UINT StringDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ STRING_DLG *s = (STRING_DLG *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ StringDlgInit(hWnd, s);\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case E_STRING:\r
+ StringDlgUpdate(hWnd, s);\r
+ break;\r
+ }\r
+\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ GetTxt(hWnd, E_STRING, s->String, sizeof(s->String));\r
+ EndDialog(hWnd, true);\r
+ break;\r
+\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// 文字列ダイアログを表示する\r
+wchar_t *StringDlg(HWND hWnd, wchar_t *title, wchar_t *info, wchar_t *def, UINT icon, bool allow_empty, bool allow_unsafe)\r
+{\r
+ STRING_DLG s;\r
+ // 引数チェック\r
+ if (title == NULL)\r
+ {\r
+ title = _UU("DLG_STRING_DEFTITLE");\r
+ }\r
+ if (info == NULL)\r
+ {\r
+ info = _UU("DLG_STRING_DEFINFO");\r
+ }\r
+ if (def == NULL)\r
+ {\r
+ def = L"";\r
+ }\r
+ if (icon == 0)\r
+ {\r
+ icon = ICO_NULL;\r
+ }\r
+\r
+ Zero(&s, sizeof(s));\r
+ s.Icon = icon;\r
+ s.Info = info;\r
+ s.Title = title;\r
+ s.Icon = icon;\r
+ UniStrCpy(s.String, sizeof(s.String), def);\r
+ s.AllowEmpty = allow_empty;\r
+ s.AllowUnsafe = allow_unsafe;\r
+\r
+ if (Dialog(hWnd, D_STRING, StringDlgProc, &s) == false)\r
+ {\r
+ return NULL;\r
+ }\r
+ else\r
+ {\r
+ return CopyUniStr(s.String);\r
+ }\r
+}\r
+char *StringDlgA(HWND hWnd, wchar_t *title, wchar_t *info, char *def, UINT icon, bool allow_empty, bool allow_unsafe)\r
+{\r
+ wchar_t unidef[MAX_SIZE];\r
+ wchar_t *tmp;\r
+ char *ret;\r
+ if (def == NULL)\r
+ {\r
+ def = "";\r
+ }\r
+\r
+ StrToUni(unidef, sizeof(unidef), def);\r
+\r
+ tmp = StringDlg(hWnd, title, info, unidef, icon, allow_empty, allow_unsafe);\r
+ if (tmp == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ ret = CopyUniToStr(tmp);\r
+ Free(tmp);\r
+\r
+ return ret;\r
+}\r
+\r
+// 再起動ダイアログ\r
+UINT Win9xRebootDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ WIN9X_REBOOT_DLG *d = (WIN9X_REBOOT_DLG *)param;\r
+ UINT64 now;\r
+ wchar_t tmp[MAX_PATH];\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ d->StartTime = Tick64();\r
+ SetRange(hWnd, P_PROGRESS, 0, d->TotalTime);\r
+ SetTimer(hWnd, 1, 100, NULL);\r
+ goto UPDATE;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+UPDATE:\r
+ now = Tick64();\r
+ if ((d->StartTime + (UINT64)d->TotalTime) <= now)\r
+ {\r
+ KillTimer(hWnd, 1);\r
+ UniStrCpy(tmp, sizeof(tmp), _UU("DLG_REBOOT_INFO_2"));\r
+ SetText(hWnd, S_INFO, tmp);\r
+ if (MsShutdown(true, false) == false)\r
+ {\r
+ MsgBox(hWnd, MB_ICONSTOP, _UU("DLG_REBOOT_ERROR"));\r
+ }\r
+ EndDialog(hWnd, 0);\r
+ }\r
+ else\r
+ {\r
+ SetPos(hWnd, P_PROGRESS, (UINT)(now - d->StartTime));\r
+ UniFormat(tmp, sizeof(tmp), _UU("DLG_REBOOT_INFO"),\r
+ (UINT)((UINT64)d->TotalTime - (now - d->StartTime)) / 1000 + 1);\r
+ SetText(hWnd, S_INFO, tmp);\r
+ }\r
+\r
+ break;\r
+ }\r
+ break;\r
+ }\r
+ return 0;\r
+}\r
+\r
+// 再起動用スレッド\r
+void Win9xRebootThread(THREAD *t, void *p)\r
+{\r
+ // 引数チェック\r
+ if (t == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Win9xReboot(NULL);\r
+}\r
+\r
+// 自動的に再起動する\r
+void Win9xReboot(HWND hWnd)\r
+{\r
+ WIN9X_REBOOT_DLG d;\r
+\r
+ Zero(&d, sizeof(d));\r
+ d.TotalTime = 10 * 1000;\r
+\r
+ Dialog(hWnd, D_WIN9X_REBOOT, Win9xRebootDlgProc, &d);\r
+}\r
+\r
+// バージョン情報の初期化\r
+void AboutDlgInit(HWND hWnd, WINUI_ABOUT *a)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hWnd == NULL || a == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ UniFormat(tmp, sizeof(tmp), _UU("ABOUT_CAPTION"), a->ProductName);\r
+ SetText(hWnd, 0, tmp);\r
+\r
+ SetFont(hWnd, S_VERSION, GetFont(NULL, 15, true, false, false, false));\r
+\r
+ SetTextA(hWnd, S_VERSION, a->ProductName);\r
+\r
+ SetFont(hWnd, S_VERSION2, GetFont("Verdana", 13, false, false, false, false));\r
+ UniFormat(tmp, sizeof(tmp),\r
+ L"Version %u.%02u Build %u ",\r
+ a->Cedar->Version / 100, a->Cedar->Version % 100,\r
+ a->Cedar->Build);\r
+ SetText(hWnd, S_VERSION2, tmp);\r
+\r
+ SetFont(hWnd, S_BUILD, GetFont("Verdana", 11, false, false, true, false));\r
+ SetTextA(hWnd, S_BUILD, a->Cedar->BuildInfo);\r
+\r
+ SendMsg(hWnd, S_LOGO, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)LoadBitmap(hDll, MAKEINTRESOURCE(a->Bitmap)));\r
+}\r
+\r
+// バージョン情報プロシージャ\r
+UINT AboutDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ WINUI_ABOUT *a = (WINUI_ABOUT *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ AboutDlgInit(hWnd, a);\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ case IDCANCEL:\r
+ if ((GetKeyState(VK_SHIFT) & 0x8000) &&\r
+ (GetKeyState(VK_CONTROL) & 0x8000) &&\r
+ (GetKeyState(VK_MENU) & 0x8000))\r
+ {\r
+ ShowEasterEgg(hWnd);\r
+ }\r
+ EndDialog(hWnd, true);\r
+ break;\r
+ case B_WEB:\r
+ ShellExecute(hWnd, "open", _SS("SE_COMPANY_URL"), NULL, NULL, SW_SHOW);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// バージョン情報 (古い形式)\r
+void About(HWND hWnd, CEDAR *cedar, char *product_name, UINT bitmap)\r
+{\r
+ WINUI_ABOUT a;\r
+ // 引数チェック\r
+ if (cedar == NULL || product_name == NULL || bitmap == 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&a, sizeof(a));\r
+ a.Bitmap = bitmap;\r
+ a.Cedar = cedar;\r
+ a.ProductName = product_name;\r
+\r
+ Dialog(hWnd, D_ABOUT, AboutDlgProc, &a);\r
+}\r
+\r
+// テスト\r
+void UiTest()\r
+{\r
+}\r
+\r
+// IP アドレスが入力されているフィルード数を調べる\r
+UINT IpGetFilledNum(HWND hWnd, UINT id)\r
+{\r
+ UINT ret;\r
+ DWORD value;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, IPM_GETADDRESS, 0, (LPARAM)&value);\r
+\r
+ return ret;\r
+}\r
+\r
+// IP アドレスが入力されているかどうか調べる\r
+bool IpIsFilled(HWND hWnd, UINT id)\r
+{\r
+ UINT ret;\r
+ DWORD value;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, IPM_GETADDRESS, 0, (LPARAM)&value);\r
+\r
+ if (ret != 4)\r
+ {\r
+ return false;\r
+ }\r
+ else\r
+ {\r
+ return true;\r
+ }\r
+}\r
+\r
+// IP アドレスのクリア\r
+void IpClear(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, IPM_CLEARADDRESS, 0, 0);\r
+}\r
+\r
+// IP アドレスの取得\r
+UINT IpGet(HWND hWnd, UINT id)\r
+{\r
+ UINT ret;\r
+ DWORD value;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, IPM_GETADDRESS, 0, (LPARAM)&value);\r
+\r
+ if (ret != 4)\r
+ {\r
+ return 0;\r
+ }\r
+ else\r
+ {\r
+ return Endian32((UINT)value);\r
+ }\r
+}\r
+\r
+// IP アドレスのセット\r
+void IpSet(HWND hWnd, UINT id, UINT ip)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, IPM_SETADDRESS, 0, Endian32(ip));\r
+}\r
+\r
+// レジストリに候補を書き込む\r
+void WriteCandidateToReg(UINT root, char *key, LIST *o, char *name)\r
+{\r
+ BUF *b;\r
+ // 引数チェック\r
+ if (key == NULL || o == NULL || name == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ b = CandidateToBuf(o);\r
+ if (b == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ MsRegWriteBin(root, key, name, b->Buf, b->Size);\r
+\r
+ FreeBuf(b);\r
+}\r
+\r
+// レジストリから候補を読み込む\r
+LIST *ReadCandidateFromReg(UINT root, char *key, char *name)\r
+{\r
+ BUF *b;\r
+ // 引数チェック\r
+ if (key == NULL || name == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ b = MsRegReadBin(root, key, name);\r
+ if (b == NULL)\r
+ {\r
+ return NewCandidateList();\r
+ }\r
+ else\r
+ {\r
+ LIST *o = BufToCandidate(b);\r
+ FreeBuf(b);\r
+\r
+ return o;\r
+ }\r
+}\r
+\r
+// リモート接続ダイアログ初期化\r
+void RemoteDlgInit(HWND hWnd, WINUI_REMOTE *r)\r
+{\r
+ LIST *o;\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL || r == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetIcon(hWnd, 0, r->Icon);\r
+\r
+ SetText(hWnd, 0, r->Caption);\r
+ SetText(hWnd, S_TITLE, r->Title);\r
+ SetIcon(hWnd, S_ICON, r->Icon);\r
+\r
+ // 候補を読み込む\r
+ o = ReadCandidateFromReg(REG_CURRENT_USER, r->RegKeyName, "RemoteHostCandidate");\r
+ r->CandidateList = o;\r
+\r
+ // 候補を表示する\r
+ for (i = 0;i < LIST_NUM(o);i++)\r
+ {\r
+ CANDIDATE *c = LIST_DATA(o, i);\r
+ CbAddStr(hWnd, C_HOSTNAME, c->Str, 0);\r
+ }\r
+\r
+ if (r->DefaultHostname != NULL)\r
+ {\r
+ SetTextA(hWnd, C_HOSTNAME, r->DefaultHostname);\r
+ }\r
+\r
+ FocusEx(hWnd, C_HOSTNAME);\r
+\r
+ RemoteDlgRefresh(hWnd, r);\r
+}\r
+\r
+// リモート接続ダイアログ更新\r
+void RemoteDlgRefresh(HWND hWnd, WINUI_REMOTE *r)\r
+{\r
+ char *s;\r
+ bool ok = true;\r
+ bool localhost_mode = false;\r
+ // 引数チェック\r
+ if (hWnd == NULL || r == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ s = GetTextA(hWnd, C_HOSTNAME);\r
+ if (s != NULL)\r
+ {\r
+ Trim(s);\r
+ if (StrCmpi(s, "localhost") == 0 || StartWith(s, "127."))\r
+ {\r
+ localhost_mode = true;\r
+ }\r
+ Free(s);\r
+ }\r
+\r
+ if (localhost_mode == false)\r
+ {\r
+ Enable(hWnd, C_HOSTNAME);\r
+ Enable(hWnd, S_HOSTNAME);\r
+ Check(hWnd, R_LOCAL, false);\r
+ }\r
+ else\r
+ {\r
+ if (r->Title != _UU("NM_CONNECT_TITLE"))\r
+ {\r
+ Disable(hWnd, C_HOSTNAME);\r
+ Disable(hWnd, S_HOSTNAME);\r
+ }\r
+ Check(hWnd, R_LOCAL, true);\r
+ SetTextA(hWnd, C_HOSTNAME, "localhost");\r
+\r
+ if (r->flag1 == false)\r
+ {\r
+ Focus(hWnd, IDOK);\r
+ }\r
+ }\r
+\r
+ if (IsEmpty(hWnd, C_HOSTNAME))\r
+ {\r
+ ok = false;\r
+ }\r
+\r
+ SetEnable(hWnd, IDOK, ok);\r
+\r
+ r->flag1 = true;\r
+}\r
+\r
+// リモート接続ダイアログ OK ボタン\r
+void RemoteDlgOnOk(HWND hWnd, WINUI_REMOTE *r)\r
+{\r
+ char *hostname;\r
+ wchar_t *s;\r
+ LIST *o;\r
+ // 引数チェック\r
+ if (hWnd == NULL || r == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // 入力されているホスト名を取得\r
+ hostname = GetTextA(hWnd, C_HOSTNAME);\r
+ if (hostname == NULL)\r
+ {\r
+ return;\r
+ }\r
+ Trim(hostname);\r
+\r
+ // 候補を追加\r
+ o = r->CandidateList;\r
+ s = CopyStrToUni(hostname);\r
+ AddCandidate(o, s, 64);\r
+ Free(s);\r
+\r
+ // 候補を書き込む\r
+ WriteCandidateToReg(REG_CURRENT_USER, r->RegKeyName, o, "RemoteHostCandidate");\r
+ FreeCandidateList(o);\r
+\r
+ r->Hostname = hostname;\r
+\r
+ EndDialog(hWnd, true);\r
+}\r
+\r
+// リモート接続ダイアログプロシージャ\r
+UINT RemoteDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ WINUI_REMOTE *r = (WINUI_REMOTE *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ RemoteDlgInit(hWnd, r);\r
+ SetTimer(hWnd, 1, 100, NULL);\r
+ break;\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ KillTimer(hWnd, 1);\r
+ RemoteDlgRefresh(hWnd, r);\r
+ SetTimer(hWnd, 1, 100, NULL);\r
+ break;\r
+ }\r
+ break;\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case R_LOCAL:\r
+ if (IsChecked(hWnd, R_LOCAL) == false)\r
+ {\r
+ SetTextA(hWnd, C_HOSTNAME, "");\r
+ RemoteDlgRefresh(hWnd, r);\r
+ FocusEx(hWnd, C_HOSTNAME);\r
+ }\r
+ else\r
+ {\r
+ SetTextA(hWnd, C_HOSTNAME, "localhost");\r
+ RemoteDlgRefresh(hWnd, r);\r
+ Focus(hWnd, IDOK);\r
+ }\r
+ break;\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ case IDOK:\r
+ RemoteDlgOnOk(hWnd, r);\r
+ break;\r
+ }\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case R_LOCAL:\r
+ case C_HOSTNAME:\r
+ RemoteDlgRefresh(hWnd, r);\r
+ break;\r
+ }\r
+ break;\r
+ case WM_CLOSE:\r
+ FreeCandidateList(r->CandidateList);\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// リモート接続ダイアログ\r
+char *RemoteDlg(HWND hWnd, char *regkey, UINT icon, wchar_t *caption, wchar_t *title, char *default_host)\r
+{\r
+ WINUI_REMOTE r;\r
+ // 引数チェック\r
+ if (regkey == NULL)\r
+ {\r
+ regkey = "Software\\SoftEther Corporation\\SoftEther UT-VPN\\WinUI Common Module";\r
+ }\r
+ if (caption == NULL)\r
+ {\r
+ caption = _UU("REMOTE_DEF_CAPTION");\r
+ }\r
+ if (title == NULL)\r
+ {\r
+ title = _UU("REMOTE_DEF_TITLE");\r
+ }\r
+ if (icon == 0)\r
+ {\r
+ icon = ICO_INTERNET;\r
+ }\r
+\r
+ Zero(&r, sizeof(r));\r
+ r.RegKeyName = regkey;\r
+ r.Caption = caption;\r
+ r.Title = title;\r
+ r.Icon = icon;\r
+ r.DefaultHostname = default_host;\r
+\r
+ if (Dialog(hWnd, D_REMOTE, RemoteDlgProc, &r) == false)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return r.Hostname;\r
+}\r
+\r
+// ウインドウの検索プロシージャ\r
+bool CALLBACK SearchWindowEnumProc(HWND hWnd, LPARAM lParam)\r
+{\r
+ if (hWnd != NULL && lParam != 0)\r
+ {\r
+ wchar_t *s = GetText(hWnd, 0);\r
+ SEARCH_WINDOW_PARAM *p = (SEARCH_WINDOW_PARAM *)lParam;\r
+ if (s != NULL)\r
+ {\r
+ if (UniStrCmpi(p->caption, s) == 0)\r
+ {\r
+ p->hWndFound = hWnd;\r
+ }\r
+ Free(s);\r
+ }\r
+ }\r
+ return true;\r
+}\r
+\r
+// ウインドウの検索\r
+HWND SearchWindow(wchar_t *caption)\r
+{\r
+ SEARCH_WINDOW_PARAM p;\r
+ // 引数チェック\r
+ if (caption == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ Zero(&p, sizeof(p));\r
+ p.caption = caption;\r
+ p.hWndFound = NULL;\r
+\r
+ EnumWindows(SearchWindowEnumProc, (LPARAM)&p);\r
+\r
+ return p.hWndFound;\r
+}\r
+\r
+// 指定したプロセスにフォアグラウンドウインドウになることを許可\r
+void AllowFGWindow(UINT process_id)\r
+{\r
+ if (process_id == 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (OS_IS_WINDOWS_NT(GetOsInfo()->OsType) &&\r
+ GET_KETA(GetOsInfo()->OsType, 100) >= 2)\r
+ {\r
+ AllowSetForegroundWindow(process_id);\r
+ }\r
+}\r
+\r
+// アイテムのリネーム\r
+void LvRename(HWND hWnd, UINT id, UINT pos)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || pos == INFINITE)\r
+ {\r
+ return;\r
+ }\r
+\r
+ ListView_EditLabel(DlgItem(hWnd, id), pos);\r
+}\r
+\r
+// メニューを表示する\r
+void PrintMenu(HWND hWnd, HMENU hMenu)\r
+{\r
+ POINT p;\r
+ // 引数チェック\r
+ if (hMenu == NULL || hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ GetCursorPos(&p);\r
+\r
+ TrackPopupMenu(hMenu, TPM_LEFTALIGN, p.x, p.y, 0, hWnd, NULL);\r
+}\r
+\r
+// メニューからショートカット文字列を削除する\r
+void RemoveShortcutKeyStrFromMenu(HMENU hMenu)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hMenu == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ num = GetMenuNum(hMenu);\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ wchar_t *str = GetMenuStr(hMenu, i);\r
+ if (str != NULL)\r
+ {\r
+ UINT j, len;\r
+ len = UniStrLen(str);\r
+ for (j = 0;j < len;j++)\r
+ {\r
+ if (str[j] == L'\t')\r
+ {\r
+ str[j] = 0;\r
+ }\r
+ }\r
+ SetMenuStr(hMenu, i, str);\r
+ Free(str);\r
+ }\r
+ }\r
+}\r
+\r
+// メニュー内の項目数を取得する\r
+UINT GetMenuNum(HMENU hMenu)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hMenu == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ ret = GetMenuItemCount(hMenu);\r
+ if (ret == INFINITE)\r
+ {\r
+ return 0;\r
+ }\r
+ else\r
+ {\r
+ return ret;\r
+ }\r
+}\r
+\r
+// メニュー内の文字列を設定する\r
+void SetMenuStr(HMENU hMenu, UINT pos, wchar_t *str)\r
+{\r
+ MENUITEMINFOW info;\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ SetMenuStrA(hMenu, pos, s);\r
+ Free(s);\r
+ return;\r
+ }\r
+\r
+ Zero(&info, sizeof(info));\r
+ info.cbSize = sizeof(info);\r
+ info.fMask = MIIM_STRING;\r
+ info.dwTypeData = str;\r
+ SetMenuItemInfoW(hMenu, pos, true, &info);\r
+}\r
+void SetMenuStrA(HMENU hMenu, UINT pos, char *str)\r
+{\r
+ MENUITEMINFOA info;\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&info, sizeof(info));\r
+ info.cbSize = sizeof(info);\r
+ info.fMask = MIIM_STRING;\r
+ info.dwTypeData = str;\r
+ SetMenuItemInfoA(hMenu, pos, true, &info);\r
+}\r
+\r
+// メニュー内の文字列を取得する\r
+wchar_t *GetMenuStr(HMENU hMenu, UINT pos)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE)\r
+ {\r
+ return NULL;\r
+ }\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = GetMenuStrA(hMenu, pos);\r
+ if (s == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+ else\r
+ {\r
+ wchar_t *ret = CopyStrToUni(s);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+ }\r
+\r
+ if (GetMenuStringW(hMenu, pos, tmp, sizeof(tmp), MF_BYPOSITION) == 0)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return UniCopyStr(tmp);\r
+}\r
+char *GetMenuStrA(HMENU hMenu, UINT pos)\r
+{\r
+ char tmp[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ if (GetMenuString(hMenu, pos, tmp, sizeof(tmp), MF_BYPOSITION) == 0)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return CopyStr(tmp);\r
+}\r
+\r
+// メニュー項目を太字にする\r
+void SetMenuItemBold(HMENU hMenu, UINT pos, bool bold)\r
+{\r
+ MENUITEMINFO info;\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&info, sizeof(info));\r
+ info.cbSize = sizeof(info);\r
+ info.fMask = MIIM_STATE;\r
+\r
+ if (GetMenuItemInfo(hMenu, pos, true, &info) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (bold)\r
+ {\r
+ info.fState |= MFS_DEFAULT;\r
+ }\r
+ else\r
+ {\r
+ info.fState = info.fState & ~MFS_DEFAULT;\r
+ }\r
+\r
+ SetMenuItemInfo(hMenu, pos, true, &info);\r
+}\r
+\r
+// メニュー項目を有効 / 無効にする\r
+void SetMenuItemEnable(HMENU hMenu, UINT pos, bool enable)\r
+{\r
+ MENUITEMINFO info;\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&info, sizeof(info));\r
+ info.cbSize = sizeof(info);\r
+ info.fMask = MIIM_STATE;\r
+\r
+ if (GetMenuItemInfo(hMenu, pos, true, &info) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (enable)\r
+ {\r
+ info.fState |= MFS_ENABLED;\r
+ info.fState = info.fState & ~MFS_DISABLED;\r
+ }\r
+ else\r
+ {\r
+ info.fState |= MFS_DISABLED;\r
+ info.fState = info.fState & ~MFS_ENABLED;\r
+ }\r
+\r
+ SetMenuItemInfo(hMenu, pos, true, &info);\r
+}\r
+\r
+// メニュー項目を削除する\r
+void DeleteMenuItem(HMENU hMenu, UINT pos)\r
+{\r
+ // 引数チェック\r
+ if (hMenu == NULL || pos == INFINITE)\r
+ {\r
+ return;\r
+ }\r
+\r
+ DeleteMenu(hMenu, pos, MF_BYPOSITION);\r
+}\r
+\r
+// メニュー内の ID から位置を取得する\r
+UINT GetMenuItemPos(HMENU hMenu, UINT id)\r
+{\r
+ UINT num, i;\r
+ // 引数チェック\r
+ if (hMenu == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ num = GetMenuItemCount(hMenu);\r
+ if (num == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ if (GetMenuItemID(hMenu, i) == id)\r
+ {\r
+ return i;\r
+ }\r
+ }\r
+\r
+ return INFINITE;\r
+}\r
+\r
+// サブメニューを取得\r
+HMENU LoadSubMenu(UINT menu_id, UINT pos, HMENU *parent_menu)\r
+{\r
+ HMENU h = LoadMenu(hDll, MAKEINTRESOURCE(menu_id));\r
+ HMENU ret;\r
+ if (h == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ ret = GetSubMenu(h, pos);\r
+\r
+ if (parent_menu != NULL)\r
+ {\r
+ *parent_menu = h;\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// ユーザーインターフェイスの DLL を取得\r
+HINSTANCE GetUiDll()\r
+{\r
+ return hDll;\r
+}\r
+\r
+// 接続エラーダイアログプロシージャ\r
+UINT ConnectErrorDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ UI_CONNECTERROR_DLG *p = (UI_CONNECTERROR_DLG *)param;\r
+ wchar_t tmp[1024];\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ if (p->Err == ERR_DISCONNECTED || p->Err == ERR_SESSION_TIMEOUT)\r
+ {\r
+ // 接続が切断された旨のメッセージ\r
+ SetText(hWnd, S_TITLE, _UU("ERRDLG_DISCONNECTED_MSG"));\r
+ }\r
+ if (p->HideWindow)\r
+ {\r
+ Hide(hWnd, R_HIDE);\r
+ }\r
+ FormatText(hWnd, 0, p->AccountName);\r
+ FormatText(hWnd, S_TITLE, p->ServerName);\r
+ UniFormat(tmp, sizeof(tmp), _UU("ERRDLG_ERRMSG"), p->Err, _E(p->Err));\r
+ SetText(hWnd, E_ERROR, tmp);\r
+\r
+ SetIcon(hWnd, 0, ICO_SERVER_OFFLINE);\r
+\r
+ if (p->RetryIntervalSec == 0)\r
+ {\r
+ SetText(hWnd, S_COUNTDOWN, _UU("ERRDLG_INFORMATION"));\r
+ Hide(hWnd, P_PROGRESS);\r
+ Hide(hWnd, S_RETRYINFO);\r
+ }\r
+ else\r
+ {\r
+ if (p->RetryLimit != INFINITE)\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("ERRDLG_RETRY_INFO_1"), p->CurrentRetryCount, p->RetryLimit);\r
+ }\r
+ else\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("ERRDLG_RETRY_INFO_2"), p->CurrentRetryCount);\r
+ }\r
+ SetText(hWnd, S_RETRYINFO, tmp);\r
+ SetRange(hWnd, P_PROGRESS, 0, p->RetryIntervalSec);\r
+ SetPos(hWnd, P_PROGRESS, 0);\r
+ SetTimer(hWnd, 1, 10, NULL);\r
+ p->StartTick = Tick64();\r
+ }\r
+ SetTimer(hWnd, 2, 10, NULL);\r
+ Focus(hWnd, IDOK);\r
+ break;\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ if (p->RetryIntervalSec != 0)\r
+ {\r
+ UINT64 start, end, now;\r
+ now = Tick64();\r
+ start = p->StartTick;\r
+ end = start + (UINT64)p->RetryIntervalSec;\r
+\r
+ if (end > now)\r
+ {\r
+ SetPos(hWnd, P_PROGRESS, (UINT)(now - start));\r
+ UniFormat(tmp, sizeof(tmp), _UU("ERRDLG_RETRYCOUNT"), ((UINT)(end - now)) / 1000);\r
+ SetText(hWnd, S_COUNTDOWN, tmp);\r
+ }\r
+ else\r
+ {\r
+ Command(hWnd, IDOK);\r
+ }\r
+ }\r
+ break;\r
+ case 2:\r
+ if (p->CancelEvent != NULL)\r
+ {\r
+ if (WaitForSingleObject((HANDLE)p->CancelEvent->pData, 0) != WAIT_TIMEOUT)\r
+ {\r
+ // 強制キャンセル\r
+ Close(hWnd);\r
+ }\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+ case WM_COMMAND:\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case R_HIDE:\r
+ p->HideWindow = IsChecked(hWnd, R_HIDE);\r
+ break;\r
+ }\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ EndDialog(hWnd, true);\r
+ break;\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// 接続エラーダイアログを表示\r
+bool ConnectErrorDlg(UI_CONNECTERROR_DLG *p)\r
+{\r
+ // 引数チェック\r
+ if (p == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ return DialogEx2(NULL, D_CONNECTERROR, ConnectErrorDlgProc, p, true, true);\r
+}\r
+\r
+// 証明書の内容を表示する\r
+void PrintCheckCertInfo(HWND hWnd, UI_CHECKCERT *p)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ char tmp2[MAX_SIZE];\r
+ UCHAR md5[MD5_SIZE];\r
+ UCHAR sha1[SHA1_SIZE];\r
+ X *x;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ x = p->x;\r
+\r
+ GetAllNameFromNameEx(tmp, sizeof(tmp), x->subject_name);\r
+ SetText(hWnd, E_SUBJECT, tmp);\r
+\r
+ GetAllNameFromNameEx(tmp, sizeof(tmp), x->issuer_name);\r
+ SetText(hWnd, E_ISSUER, tmp);\r
+\r
+ GetDateTimeStrEx64(tmp, sizeof(tmp), SystemToLocal64(x->notAfter), NULL);\r
+ SetText(hWnd, E_EXPIRES, tmp);\r
+\r
+ GetXDigest(x, md5, false);\r
+ BinToStr(tmp2, sizeof(tmp2), md5, sizeof(md5));\r
+ SetTextA(hWnd, E_MD5, tmp2);\r
+\r
+ GetXDigest(x, sha1, true);\r
+ BinToStr(tmp2, sizeof(tmp2), sha1, sizeof(sha1));\r
+ SetTextA(hWnd, E_SHA1, tmp2);\r
+\r
+ SetFont(hWnd, E_MD5, GetFont("Arial", 8, false, false, false, false));\r
+ SetFont(hWnd, E_SHA1, GetFont("Arial", 8, false, false, false, false));\r
+}\r
+\r
+// 証明書が相違する旨を警告する\r
+void ShowDlgDiffWarning(HWND hWnd, UI_CHECKCERT *p)\r
+{\r
+ UCHAR sha1_new[SHA1_SIZE], sha1_old[SHA1_SIZE];\r
+ UCHAR md5_new[MD5_SIZE], md5_old[MD5_SIZE];\r
+ char sha1_new_str[MAX_SIZE], sha1_old_str[MAX_SIZE];\r
+ char md5_new_str[MAX_SIZE], md5_old_str[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL || p->x == NULL || p->old_x == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ GetXDigest(p->x, sha1_new, true);\r
+ GetXDigest(p->x, md5_new, false);\r
+\r
+ GetXDigest(p->old_x, sha1_old, true);\r
+ GetXDigest(p->old_x, md5_old, false);\r
+\r
+ BinToStrEx(sha1_new_str, sizeof(sha1_new_str), sha1_new, sizeof(sha1_new));\r
+ BinToStrEx(md5_new_str, sizeof(md5_new_str), md5_new, sizeof(md5_new));\r
+ BinToStrEx(sha1_old_str, sizeof(sha1_old_str), sha1_old, sizeof(sha1_old));\r
+ BinToStrEx(md5_old_str, sizeof(md5_old_str), md5_old, sizeof(md5_old));\r
+\r
+ MsgBoxEx(hWnd, MB_ICONEXCLAMATION, _UU("CC_DANGEROUS_MSG"),\r
+ p->ServerName, md5_old_str, sha1_old_str, md5_new_str, sha1_new_str);\r
+}\r
+\r
+// [OK] ボタンが押された\r
+void CheckCertDialogOnOk(HWND hWnd, UI_CHECKCERT *p)\r
+{\r
+ UCHAR sha1_new[SHA1_SIZE];\r
+ UCHAR md5_new[MD5_SIZE];\r
+ char sha1_new_str[MAX_SIZE];\r
+ char md5_new_str[MAX_SIZE];\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ GetXDigest(p->x, sha1_new, true);\r
+ GetXDigest(p->x, md5_new, false);\r
+ BinToStrEx(sha1_new_str, sizeof(sha1_new_str), sha1_new, sizeof(sha1_new));\r
+ BinToStrEx(md5_new_str, sizeof(md5_new_str), md5_new, sizeof(md5_new));\r
+\r
+ ret = MsgBoxEx(hWnd, MB_ICONQUESTION | MB_YESNOCANCEL | MB_DEFBUTTON2,\r
+ _UU("CC_WARNING_MSG"),\r
+ p->AccountName, sha1_new_str, md5_new_str);\r
+\r
+ if (ret == IDYES)\r
+ {\r
+ p->SaveServerCert = true;\r
+ }\r
+\r
+ if (ret == IDCANCEL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ p->Ok = true;\r
+ EndDialog(hWnd, true);\r
+}\r
+\r
+// 証明書ダイアログプロシージャ\r
+UINT CheckCertDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ UI_CHECKCERT *p = (UI_CHECKCERT *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL || param == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ FormatText(hWnd, 0, p->AccountName);\r
+ FormatText(hWnd, S_TITLE, p->ServerName);\r
+ FormatText(hWnd, S_MSG1, p->ServerName);\r
+\r
+ PrintCheckCertInfo(hWnd, p);\r
+\r
+ Focus(hWnd, IDCANCEL);\r
+\r
+ SetIcon(hWnd, 0, ICO_WARNING);\r
+\r
+ if (p->DiffWarning)\r
+ {\r
+ SetTimer(hWnd, 1, 1, NULL);\r
+ }\r
+\r
+ SetTimer(hWnd, 2, 100, NULL);\r
+\r
+ break;\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ KillTimer(hWnd, 1);\r
+ ShowDlgDiffWarning(hWnd, p);\r
+ break;\r
+ case 2:\r
+ if ((p->Session != NULL && p->Session->Halt) ||\r
+ (p->Halt))\r
+ {\r
+ p->Ok = false;\r
+ EndDialog(hWnd, false);\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case B_SHOW:\r
+ CertDlg(hWnd, p->x, p->parent_x, false);\r
+ break;\r
+ case IDOK:\r
+ CheckCertDialogOnOk(hWnd, p);\r
+ break;\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+ case WM_CLOSE:\r
+ p->Ok = false;\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// 証明書のチェックダイアログ\r
+void CheckCertDlg(UI_CHECKCERT *p)\r
+{\r
+ // 引数チェック\r
+ if (p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Dialog(NULL, D_CHECKCERT, CheckCertDlgProc, p);\r
+}\r
+\r
+// アイコン ID からイメージリスト ID を取得する\r
+UINT GetIcon(UINT icon_id)\r
+{\r
+ IMAGELIST_ICON *c, t;\r
+ t.id = icon_id;\r
+\r
+ c = Search(icon_list, &t);\r
+ if (c == NULL)\r
+ {\r
+ if (icon_id != ICO_NULL)\r
+ {\r
+ return GetIcon(ICO_NULL);\r
+ }\r
+ else\r
+ {\r
+ return INFINITE;\r
+ }\r
+ }\r
+ else\r
+ {\r
+ return c->Index;\r
+ }\r
+}\r
+\r
+// イメージリスト用にアイコンをロードする\r
+IMAGELIST_ICON *LoadIconForImageList(UINT id)\r
+{\r
+ IMAGELIST_ICON *ret = ZeroMalloc(sizeof(IMAGELIST_ICON));\r
+ HICON small_icon, large_icon;\r
+\r
+ ret->id = id;\r
+\r
+ large_icon = LoadLargeIcon(id);\r
+ if (large_icon == NULL)\r
+ {\r
+ large_icon = LoadSmallIcon(id);\r
+ }\r
+\r
+ small_icon = LoadSmallIcon(id);\r
+ if (small_icon == NULL)\r
+ {\r
+ small_icon = LoadLargeIcon(id);\r
+ }\r
+\r
+ ret->hSmallImage = small_icon;\r
+ ret->hLargeImage = large_icon;\r
+ ret->Index = ImageList_AddIcon(large_image_list, large_icon);\r
+ ImageList_AddIcon(small_image_list, small_icon);\r
+\r
+ return ret;\r
+}\r
+\r
+// イメージリストアイコンの比較\r
+int CompareImageListIcon(void *p1, void *p2)\r
+{\r
+ IMAGELIST_ICON *c1, *c2;\r
+ if (p1 == NULL || p2 == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+ c1 = *(IMAGELIST_ICON **)p1;\r
+ c2 = *(IMAGELIST_ICON **)p2;\r
+ if (c1 == NULL || c2 == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ if (c1->id > c2->id)\r
+ {\r
+ return 1;\r
+ }\r
+ else if (c1->id < c2->id)\r
+ {\r
+ return -1;\r
+ }\r
+ else\r
+ {\r
+ return 0;\r
+ }\r
+}\r
+\r
+// イメージリストの初期化\r
+void InitImageList()\r
+{\r
+ large_image_list = ImageList_Create(32, 32, ILC_COLOR32 | ILC_MASK, 1, 0);\r
+ ImageList_SetBkColor(large_image_list, RGB(255, 255, 255));\r
+ small_image_list = ImageList_Create(16, 16, ILC_COLOR32 | ILC_MASK, 1, 0);\r
+ ImageList_SetBkColor(small_image_list, RGB(255, 255, 255));\r
+ icon_list = NewList(CompareImageListIcon);\r
+\r
+ // 列挙\r
+ EnumResourceNames(hDll, RT_GROUP_ICON, EnumResNameProc, 0);\r
+}\r
+\r
+// アイコンリソース列挙プロシージャ\r
+BOOL CALLBACK EnumResNameProc(HMODULE hModule, LPCTSTR lpszType, LPTSTR lpszName, LONG_PTR lParam)\r
+{\r
+ if (IS_INTRESOURCE(lpszName))\r
+ {\r
+ UINT icon_id = (UINT)lpszName;\r
+ IMAGELIST_ICON *img = LoadIconForImageList(icon_id);\r
+\r
+ Add(icon_list, img);\r
+ }\r
+\r
+ return TRUE;\r
+}\r
+\r
+// イメージリストの解放\r
+void FreeImageList()\r
+{\r
+ UINT i;\r
+ ImageList_Destroy(large_image_list);\r
+ ImageList_Destroy(small_image_list);\r
+ large_image_list = small_image_list = NULL;\r
+\r
+ for (i = 0;i < LIST_NUM(icon_list);i++)\r
+ {\r
+ IMAGELIST_ICON *c = LIST_DATA(icon_list, i);\r
+ Free(c);\r
+ }\r
+\r
+ ReleaseList(icon_list);\r
+ icon_list = NULL;\r
+}\r
+\r
+// カラムの横幅の取得\r
+UINT LvGetColumnWidth(HWND hWnd, UINT id, UINT index)\r
+{\r
+ return ListView_GetColumnWidth(DlgItem(hWnd, id), index);\r
+}\r
+\r
+// カラムの挿入\r
+void LvInsertColumn(HWND hWnd, UINT id, UINT index, wchar_t *str, UINT width)\r
+{\r
+ LVCOLUMNW c;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&c, sizeof(c));\r
+ c.mask = LVCF_FMT | LVCF_SUBITEM | LVCF_TEXT | LVCF_WIDTH;\r
+\r
+ c.pszText = str;\r
+ c.iSubItem = index;\r
+ c.cx = width;\r
+\r
+ SendMsg(hWnd, id, LVM_INSERTCOLUMNW, index, (LPARAM)&c);\r
+}\r
+\r
+// すべてのアイテムを削除\r
+void LvReset(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ ListView_DeleteAllItems(DlgItem(hWnd, id));\r
+}\r
+\r
+// リストビューを初期化\r
+void LvInitEx(HWND hWnd, UINT id, bool no_image)\r
+{\r
+ LvInitEx2(hWnd, id, no_image, false);\r
+}\r
+void LvInitEx2(HWND hWnd, UINT id, bool no_image, bool large_icon)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ ListView_SetUnicodeFormat(DlgItem(hWnd, id), true);\r
+\r
+ if (no_image == false)\r
+ {\r
+ ListView_SetImageList(DlgItem(hWnd, id), large_image_list, LVSIL_NORMAL);\r
+ ListView_SetImageList(DlgItem(hWnd, id), large_icon ? large_image_list : small_image_list, LVSIL_SMALL);\r
+ }\r
+\r
+ ListView_SetExtendedListViewStyle(DlgItem(hWnd, id), LVS_EX_FULLROWSELECT);\r
+\r
+ if (MsIsVista())\r
+ {\r
+ LvSetStyle(hWnd, id, LVS_EX_DOUBLEBUFFER);\r
+ }\r
+}\r
+void LvInit(HWND hWnd, UINT id)\r
+{\r
+ LvInitEx(hWnd, id, false);\r
+}\r
+\r
+// バッチ追加処理完了 (高速)\r
+void LvInsertEnd(LVB *b, HWND hWnd, UINT id)\r
+{\r
+ LvInsertEndEx(b, hWnd, id, false);\r
+}\r
+void LvInsertEndEx(LVB *b, HWND hWnd, UINT id, bool force_reset)\r
+{\r
+ UINT i, num;\r
+ LIST *new_list, *exist_list;\r
+ wchar_t *last_selected = NULL;\r
+ // 引数チェック\r
+ if (b == NULL || hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ new_list = NewListFast(CompareUniStr);\r
+\r
+ for (i = 0;i < LIST_NUM(b->ItemList);i++)\r
+ {\r
+ LVB_ITEM *t = LIST_DATA(b->ItemList, i);\r
+ Add(new_list, t->Strings[0]);\r
+ }\r
+\r
+ Sort(new_list);\r
+\r
+ if ((LIST_NUM(b->ItemList) >= LV_INSERT_RESET_ALL_ITEM_MIN) || force_reset)\r
+ {\r
+ last_selected = LvGetFocusedStr(hWnd, id, 0);\r
+ LvReset(hWnd, id);\r
+ }\r
+\r
+ exist_list = NewListFast(CompareUniStr);\r
+\r
+ num = LvNum(hWnd, id);\r
+\r
+ // 既存項目のうちバッチリスト内に存在していない項目を削除する\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ bool exists = false;\r
+ wchar_t *s = LvGetStr(hWnd, id, i, 0);\r
+ if (Search(new_list, s) != NULL)\r
+ {\r
+ exists = true;\r
+ }\r
+ if (exists == false)\r
+ {\r
+ // 追加予定バッチリスト内に存在しない項目はリストビューから削除する\r
+ LvDeleteItem(hWnd, id, i);\r
+ num = LvNum(hWnd, id);\r
+ i--;\r
+ Free(s);\r
+ }\r
+ else\r
+ {\r
+ Add(exist_list, s);\r
+ }\r
+ }\r
+\r
+ Sort(exist_list);\r
+\r
+ // バッチ内の項目を 1 つずつ追加していく\r
+ for (i = 0;i < LIST_NUM(b->ItemList);i++)\r
+ {\r
+ LVB_ITEM *t = LIST_DATA(b->ItemList, i);\r
+ UINT index;\r
+ UINT j;\r
+ bool exists = false;\r
+\r
+ if (Search(exist_list, t->Strings[0]) != NULL)\r
+ {\r
+ index = LvSearchStr(hWnd, id, 0, t->Strings[0]);\r
+ }\r
+ else\r
+ {\r
+ index = INFINITE;\r
+ }\r
+\r
+ if (index != INFINITE)\r
+ {\r
+ UINT j;\r
+ // 追加しようとする項目と同じ文字列の項目がすでに存在する場合は\r
+ // 追加ではなく更新を行う\r
+ for (j = 0;j < t->NumStrings;j++)\r
+ {\r
+ LvSetItem(hWnd, id, index, j, t->Strings[j]);\r
+ }\r
+ LvSetItemImageByImageListId(hWnd, id, index, t->Image);\r
+ LvSetItemParam(hWnd, id, index, t->Param);\r
+ }\r
+ else\r
+ {\r
+ // 新しく追加を行う\r
+ UINT index = INFINITE;\r
+ UINT j;\r
+ for (j = 0;j < t->NumStrings;j++)\r
+ {\r
+ if (j == 0)\r
+ {\r
+ index = LvInsertItemByImageListId(hWnd, id, t->Image, t->Param, t->Strings[j]);\r
+ }\r
+ else\r
+ {\r
+ LvSetItem(hWnd, id, index, j, t->Strings[j]);\r
+ }\r
+ }\r
+ }\r
+\r
+ // メモリを解放する\r
+ for (j = 0;j < t->NumStrings;j++)\r
+ {\r
+ Free(t->Strings[j]);\r
+ }\r
+ Free(t->Strings);\r
+ Free(t);\r
+ }\r
+\r
+ // リストを解放する\r
+ ReleaseList(b->ItemList);\r
+\r
+ // メモリを解放する\r
+ Free(b);\r
+\r
+ ReleaseList(new_list);\r
+\r
+ for (i = 0;i < LIST_NUM(exist_list);i++)\r
+ {\r
+ Free(LIST_DATA(exist_list, i));\r
+ }\r
+ ReleaseList(exist_list);\r
+\r
+ if (last_selected != NULL)\r
+ {\r
+ UINT pos = LvSearchStr(hWnd, id, 0, last_selected);\r
+\r
+ if (pos != INFINITE)\r
+ {\r
+ LvSelect(hWnd, id, pos);\r
+ }\r
+\r
+ Free(last_selected);\r
+ }\r
+}\r
+\r
+// カラム数の取得\r
+UINT LvGetColumnNum(HWND hWnd, UINT id)\r
+{\r
+ UINT i;\r
+ LVCOLUMN c;\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ for (i = 0;;i++)\r
+ {\r
+ Zero(&c, sizeof(c));\r
+ c.mask = LVCF_SUBITEM;\r
+ if (ListView_GetColumn(DlgItem(hWnd, id), i, &c) == false)\r
+ {\r
+ break;\r
+ }\r
+ }\r
+\r
+ return i;\r
+}\r
+\r
+// ソート関数\r
+int CALLBACK LvSortProc(LPARAM param1, LPARAM param2, LPARAM sort_param)\r
+{\r
+ WINUI_LV_SORT *sort = (WINUI_LV_SORT *)sort_param;\r
+ HWND hWnd;\r
+ UINT id;\r
+ UINT i1, i2;\r
+ int ret = 0;\r
+ wchar_t *s1, *s2;\r
+ if (sort == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ hWnd = sort->hWnd;\r
+ id = sort->id;\r
+\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ i1 = (UINT)param1;\r
+ i2 = (UINT)param2;\r
+\r
+ s1 = LvGetStr(hWnd, id, i1, sort->subitem);\r
+ if (s1 == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ s2 = LvGetStr(hWnd, id, i2, sort->subitem);\r
+ if (s2 == NULL)\r
+ {\r
+ Free(s1);\r
+ return 0;\r
+ }\r
+\r
+ if (sort->numeric == false)\r
+ {\r
+ if (UniStrCmpi(s1, _UU("CM_NEW_ICON")) == 0)\r
+ {\r
+ ret = -1;\r
+ }\r
+ else if (UniStrCmpi(s1, _UU("CM_ASP")) == 0)\r
+ {\r
+ ret = -1;\r
+ }\r
+ else if (UniStrCmpi(s2, _UU("CM_NEW_ICON")) == 0)\r
+ {\r
+ ret = 1;\r
+ }\r
+ else if (UniStrCmpi(s2, _UU("CM_ASP")) == 0)\r
+ {\r
+ return 1;\r
+ }\r
+ else\r
+ {\r
+ ret = UniStrCmpi(s1, s2);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ UINT64 v1, v2;\r
+ v1 = UniToInt64(s1);\r
+ v2 = UniToInt64(s2);\r
+ if (v1 > v2)\r
+ {\r
+ ret = 1;\r
+ }\r
+ else if (v1 < v2)\r
+ {\r
+ ret = -1;\r
+ }\r
+ else\r
+ {\r
+ ret = 0;\r
+ }\r
+ }\r
+\r
+ Free(s1);\r
+ Free(s2);\r
+\r
+ if (sort->desc)\r
+ {\r
+ ret = -ret;\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// 標準的なハンドラ\r
+void LvStandardHandler(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, UINT id)\r
+{\r
+ NMHDR *n;\r
+ NMLVKEYDOWN *key;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ LvSortHander(hWnd, msg, wParam, lParam, id);\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_NOTIFY:\r
+ n = (NMHDR *)lParam;\r
+ if (n->idFrom == id)\r
+ {\r
+ switch (n->code)\r
+ {\r
+ case NM_DBLCLK:\r
+ Command(hWnd, IDOK);\r
+ break;\r
+ case LVN_KEYDOWN:\r
+ key = (NMLVKEYDOWN *)n;\r
+ if (key != NULL)\r
+ {\r
+ UINT code = key->wVKey;\r
+ switch (code)\r
+ {\r
+ case VK_DELETE:\r
+ Command(hWnd, B_DELETE);\r
+ break;\r
+\r
+ case VK_RETURN:\r
+ Command(hWnd, IDOK);\r
+ break;\r
+\r
+ case VK_F5:\r
+ Command(hWnd, B_REFRESH);\r
+ break;\r
+ }\r
+ }\r
+ break;\r
+ }\r
+ }\r
+ break;\r
+ }\r
+}\r
+\r
+// ソートヘッダハンドラ\r
+void LvSortHander(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, UINT id)\r
+{\r
+ NMHDR *nmhdr;\r
+ UINT subitem;\r
+ bool desc;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_NOTIFY:\r
+ nmhdr = (NMHDR *)lParam;\r
+\r
+ if (nmhdr != NULL)\r
+ {\r
+ if (nmhdr->idFrom == id)\r
+ {\r
+ NMLISTVIEW *v;\r
+ switch (nmhdr->code)\r
+ {\r
+ case LVN_COLUMNCLICK:\r
+ desc = false;\r
+ v = (NMLISTVIEW *)lParam;\r
+ subitem = v->iSubItem;\r
+\r
+ if ((GetStyle(hWnd, id) & LVS_SORTDESCENDING) == 0)\r
+ {\r
+ desc = true;\r
+ SetStyle(hWnd, id, LVS_SORTDESCENDING);\r
+ RemoveStyle(hWnd, id, LVS_SORTASCENDING);\r
+ }\r
+ else\r
+ {\r
+ SetStyle(hWnd, id, LVS_SORTASCENDING);\r
+ RemoveStyle(hWnd, id, LVS_SORTDESCENDING);\r
+ }\r
+\r
+ LvSort(hWnd, id, subitem, desc);\r
+ break;\r
+ }\r
+ }\r
+ }\r
+ break;\r
+ }\r
+}\r
+\r
+// ソートを行う\r
+void LvSort(HWND hWnd, UINT id, UINT subitem, bool desc)\r
+{\r
+ UINT i, num;\r
+ bool numeric = true;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ num = LvNum(hWnd, id);\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ wchar_t *s = LvGetStr(hWnd, id, i, subitem);\r
+ if (s != NULL)\r
+ {\r
+ if (UniIsNum(s) == false)\r
+ {\r
+ numeric = false;\r
+ Free(s);\r
+ break;\r
+ }\r
+ Free(s);\r
+ }\r
+ else\r
+ {\r
+ numeric = false;\r
+ break;\r
+ }\r
+ }\r
+\r
+ LvSortEx(hWnd, id, subitem, desc, numeric);\r
+}\r
+\r
+void LvSortEx(HWND hWnd, UINT id, UINT subitem, bool desc, bool numeric)\r
+{\r
+ WINUI_LV_SORT s;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+ if (subitem >= LvGetColumnNum(hWnd, id))\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&s, sizeof(s));\r
+ s.desc = desc;\r
+ s.numeric = numeric;\r
+ s.id = id;\r
+ s.hWnd = hWnd;\r
+ s.subitem = subitem;\r
+\r
+ ListView_SortItemsEx(DlgItem(hWnd, id), LvSortProc, (LPARAM)&s);\r
+}\r
+\r
+// 項目追加バッチへの追加\r
+void LvInsertAdd(LVB *b, UINT icon, void *param, UINT num_str, ...)\r
+{\r
+ UINT i;\r
+ va_list va;\r
+ UINT index = 0;\r
+ LVB_ITEM *t;\r
+ // 引数チェック\r
+ if (b == NULL || num_str == 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ t = ZeroMalloc(sizeof(LVB_ITEM));\r
+\r
+ va_start(va, num_str);\r
+\r
+ t->Strings = (wchar_t **)ZeroMalloc(sizeof(wchar_t *) * num_str);\r
+ t->NumStrings = num_str;\r
+\r
+ for (i = 0;i < num_str;i++)\r
+ {\r
+ wchar_t *s = va_arg(va, wchar_t *);\r
+\r
+ t->Strings[i] = UniCopyStr(s);\r
+ }\r
+\r
+ t->Param = param;\r
+ t->Image = GetIcon(icon);\r
+\r
+ Add(b->ItemList, t);\r
+\r
+ va_end(va);\r
+}\r
+\r
+// 項目追加バッチの開始\r
+LVB *LvInsertStart()\r
+{\r
+ LVB *b = ZeroMalloc(sizeof(LVB));\r
+ b->ItemList = NewListFast(NULL);\r
+\r
+ return b;\r
+}\r
+\r
+// リストビューに項目を追加する\r
+void LvInsert(HWND hWnd, UINT id, UINT icon, void *param, UINT num_str, ...)\r
+{\r
+ UINT i;\r
+ va_list va;\r
+ UINT index = 0;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ va_start(va, num_str);\r
+\r
+ for (i = 0;i < num_str;i++)\r
+ {\r
+ wchar_t *s = va_arg(va, wchar_t *);\r
+ if (i == 0)\r
+ {\r
+ index = LvInsertItem(hWnd, id, icon, param, s);\r
+ }\r
+ else\r
+ {\r
+ LvSetItem(hWnd, id, index, i, s);\r
+ }\r
+ }\r
+\r
+ va_end(va);\r
+}\r
+\r
+// アイテムのサイズを自動調整する\r
+void LvAutoSize(HWND hWnd, UINT id)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ i = 0;\r
+ while (true)\r
+ {\r
+ if (ListView_SetColumnWidth(DlgItem(hWnd, id), i, LVSCW_AUTOSIZE) == false)\r
+ {\r
+ break;\r
+ }\r
+ i++;\r
+ }\r
+}\r
+\r
+// アイテムを追加する\r
+UINT LvInsertItem(HWND hWnd, UINT id, UINT icon, void *param, wchar_t *str)\r
+{\r
+ return LvInsertItemByImageListId(hWnd, id, GetIcon(icon), param, str);\r
+}\r
+UINT LvInsertItemByImageListId(HWND hWnd, UINT id, UINT image, void *param, wchar_t *str)\r
+{\r
+ LVITEMW t;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ UINT ret;\r
+ ret = LvInsertItemByImageListIdA(hWnd, id, image, param, s);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_IMAGE | LVIF_PARAM | LVIF_TEXT;\r
+ t.pszText = str;\r
+ t.iImage = image;\r
+ t.lParam = (LPARAM)param;\r
+ t.iItem = LvNum(hWnd, id);\r
+\r
+ return SendMsg(hWnd, id, LVM_INSERTITEMW, 0, (LPARAM)&t);\r
+}\r
+UINT LvInsertItemByImageListIdA(HWND hWnd, UINT id, UINT image, void *param, char *str)\r
+{\r
+ LVITEM t;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_IMAGE | LVIF_PARAM | LVIF_TEXT;\r
+ t.pszText = str;\r
+ t.iImage = image;\r
+ t.lParam = (LPARAM)param;\r
+ t.iItem = LvNum(hWnd, id);\r
+\r
+ return SendMsg(hWnd, id, LVM_INSERTITEM, 0, (LPARAM)&t);\r
+}\r
+\r
+// イメージを変更する\r
+void LvSetItemImage(HWND hWnd, UINT id, UINT index, UINT icon)\r
+{\r
+ LvSetItemImageByImageListId(hWnd, id, index, GetIcon(icon));\r
+}\r
+void LvSetItemImageByImageListId(HWND hWnd, UINT id, UINT index, UINT image)\r
+{\r
+ LVITEM t;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_IMAGE;\r
+ t.iImage = image;\r
+ t.iItem = index;\r
+\r
+ SendMsg(hWnd, id, LVM_SETITEM, 0, (LPARAM)&t);\r
+}\r
+\r
+// アイテムのパラメータを設定する\r
+void LvSetItemParam(HWND hWnd, UINT id, UINT index, void *param)\r
+{\r
+ LvSetItemParamEx(hWnd, id, index, 0, param);\r
+}\r
+void LvSetItemParamEx(HWND hWnd, UINT id, UINT index, UINT subitem, void *param)\r
+{\r
+ LVITEM t;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_PARAM;\r
+ t.iItem = index;\r
+ t.iSubItem = subitem;\r
+ t.lParam = (LPARAM)param;\r
+\r
+ SendMsg(hWnd, id, LVM_SETITEM, 0, (LPARAM)&t);\r
+}\r
+\r
+// アイテムを設定する\r
+void LvSetItem(HWND hWnd, UINT id, UINT index, UINT pos, wchar_t *str)\r
+{\r
+ LVITEMW t;\r
+ wchar_t *old_str;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ LvSetItemA(hWnd, id, index, pos, s);\r
+ Free(s);\r
+ return;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_TEXT;\r
+ t.pszText = str;\r
+ t.iItem = index;\r
+ t.iSubItem = pos;\r
+\r
+ old_str = LvGetStr(hWnd, id, index, pos);\r
+\r
+ if (UniStrCmp(old_str, str) != 0)\r
+ {\r
+ SendMsg(hWnd, id, LVM_SETITEMW, 0, (LPARAM)&t);\r
+ }\r
+\r
+ Free(old_str);\r
+}\r
+void LvSetItemA(HWND hWnd, UINT id, UINT index, UINT pos, char *str)\r
+{\r
+ LVITEM t;\r
+ wchar_t *old_str;\r
+ char *old_str_2;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_TEXT;\r
+ t.pszText = str;\r
+ t.iItem = index;\r
+ t.iSubItem = pos;\r
+\r
+ old_str = LvGetStr(hWnd, id, index, pos);\r
+ old_str_2 = CopyUniToStr(old_str);\r
+\r
+ if (StrCmp(old_str_2, str) != 0)\r
+ {\r
+ SendMsg(hWnd, id, LVM_SETITEM, 0, (LPARAM)&t);\r
+ }\r
+\r
+ Free(old_str_2);\r
+ Free(old_str);\r
+}\r
+\r
+// リストボックスのビューを設定\r
+void LvSetView(HWND hWnd, UINT id, bool details)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (details)\r
+ {\r
+ RemoveStyle(hWnd, id, LVS_ICON);\r
+ SetStyle(hWnd, id, LVS_REPORT);\r
+ }\r
+ else\r
+ {\r
+ RemoveStyle(hWnd, id, LVS_REPORT);\r
+ SetStyle(hWnd, id, LVS_ICON);\r
+ }\r
+}\r
+\r
+// 指定したアイテムが必ず表示されるようにする\r
+void LvShow(HWND hWnd, UINT id, UINT index)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ ListView_EnsureVisible(DlgItem(hWnd, id), index, false);\r
+}\r
+\r
+// 現在選択されている項目が存在するかどうかを取得する\r
+bool LvIsSelected(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ if (LvGetSelected(hWnd, id) == INFINITE)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ return true;\r
+}\r
+\r
+// 現在選択されている項目を取得する\r
+UINT LvGetFocused(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return ListView_GetNextItem(DlgItem(hWnd, id), -1, LVNI_FOCUSED);\r
+}\r
+\r
+// 現在選択されている文字列を取得する\r
+wchar_t *LvGetFocusedStr(HWND hWnd, UINT id, UINT pos)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ i = LvGetFocused(hWnd, id);\r
+ if (i == INFINITE)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return LvGetStr(hWnd, id, i, pos);\r
+}\r
+\r
+// 現在選択されている項目を取得する\r
+UINT LvGetSelected(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return ListView_GetNextItem(DlgItem(hWnd, id), -1, LVNI_FOCUSED | LVNI_SELECTED);\r
+}\r
+\r
+// 現在選択されている文字列を取得する\r
+wchar_t *LvGetSelectedStr(HWND hWnd, UINT id, UINT pos)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ i = LvGetSelected(hWnd, id);\r
+ if (i == INFINITE)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return LvGetStr(hWnd, id, i, pos);\r
+}\r
+char *LvGetSelectedStrA(HWND hWnd, UINT id, UINT pos)\r
+{\r
+ char *ret;\r
+ wchar_t *tmp = LvGetSelectedStr(hWnd, id, pos);\r
+ if (tmp == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+ ret = CopyUniToStr(tmp);\r
+ Free(tmp);\r
+ return ret;\r
+}\r
+\r
+// 2 つ以上の項目がマスクされているかどうかを取得する\r
+bool LvIsMultiMasked(HWND hWnd, UINT id)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ i = INFINITE;\r
+ i = LvGetNextMasked(hWnd, id, i);\r
+ if (i != INFINITE)\r
+ {\r
+ if (LvGetNextMasked(hWnd, id, i) != INFINITE)\r
+ {\r
+ return true;\r
+ }\r
+ }\r
+\r
+ return false;\r
+}\r
+\r
+// ただ 1 つの項目だけが選択されているかどうか調べる\r
+bool LvIsSingleSelected(HWND hWnd, UINT id)\r
+{\r
+ return LvIsSelected(hWnd, id) && (LvIsMultiMasked(hWnd, id) == false);\r
+}\r
+\r
+// 現在マスクされている項目が存在するかどうかを取得する\r
+bool LvIsMasked(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ if (LvGetNextMasked(hWnd, id, INFINITE) == INFINITE)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ return true;\r
+}\r
+\r
+// 現在マスクされている項目数を取得する\r
+UINT LvGetMaskedNum(HWND hWnd, UINT id)\r
+{\r
+ UINT i = INFINITE;\r
+ UINT num = 0;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ while (true)\r
+ {\r
+ i = LvGetNextMasked(hWnd, id, i);\r
+ if (i == INFINITE)\r
+ {\r
+ break;\r
+ }\r
+\r
+ num++;\r
+ }\r
+\r
+ return num;\r
+}\r
+\r
+// 現在マスクされている項目を取得する\r
+UINT LvGetNextMasked(HWND hWnd, UINT id, UINT start)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return ListView_GetNextItem(DlgItem(hWnd, id), start, LVNI_SELECTED);\r
+}\r
+\r
+// 指定した文字列を持つ項目を検索する\r
+UINT LvSearchStr_(HWND hWnd, UINT id, UINT pos, wchar_t *str)\r
+{\r
+ UINT ret;\r
+ LVFINDINFOW t;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.flags = LVFI_STRING;\r
+ t.psz = str;\r
+ t.vkDirection = VK_DOWN;\r
+\r
+ ret = SendMsg(hWnd, id, LVM_FINDITEMW, -1, (LPARAM)&t);\r
+\r
+ return ret;\r
+}\r
+\r
+// 指定した文字列を持つ項目を検索する\r
+UINT LvSearchStr(HWND hWnd, UINT id, UINT pos, wchar_t *str)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ num = LvNum(hWnd, id);\r
+\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ wchar_t *s = LvGetStr(hWnd, id, i, pos);\r
+ if (s != NULL)\r
+ {\r
+ if (UniStrCmpi(s, str) == 0)\r
+ {\r
+ Free(s);\r
+ return i;\r
+ }\r
+ else\r
+ {\r
+ Free(s);\r
+ }\r
+ }\r
+ }\r
+\r
+ return INFINITE;\r
+}\r
+UINT LvSearchStrA(HWND hWnd, UINT id, UINT pos, char *str)\r
+{\r
+ wchar_t *tmp = CopyStrToUni(str);\r
+ UINT ret = LvSearchStr(hWnd, id, pos, tmp);\r
+ Free(tmp);\r
+ return ret;\r
+}\r
+\r
+// 指定した param を持つ項目を検索する\r
+UINT LvSearchParam(HWND hWnd, UINT id, void *param)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ num = LvNum(hWnd, id);\r
+\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ if (LvGetParam(hWnd, id, i) == param)\r
+ {\r
+ return i;\r
+ }\r
+ }\r
+\r
+ return INFINITE;\r
+}\r
+\r
+// 項目数を取得する\r
+UINT LvNum(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ return ListView_GetItemCount(DlgItem(hWnd, id));\r
+}\r
+\r
+// 項目を削除する\r
+void LvDeleteItem(HWND hWnd, UINT id, UINT index)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ ListView_DeleteItem(DlgItem(hWnd, id), index);\r
+\r
+ i = LvGetSelected(hWnd, id);\r
+ if (i != INFINITE)\r
+ {\r
+ LvSelect(hWnd, id, i);\r
+ }\r
+}\r
+\r
+// 項目からデータを取得する\r
+void *LvGetParam(HWND hWnd, UINT id, UINT index)\r
+{\r
+ return LvGetParamEx(hWnd, id, index, 0);\r
+}\r
+void *LvGetParamEx(HWND hWnd, UINT id, UINT index, UINT subitem)\r
+{\r
+ LVITEM t;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+ if (index == INFINITE)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_PARAM;\r
+ t.iItem = index;\r
+ t.iSubItem = subitem;\r
+\r
+ if (ListView_GetItem(DlgItem(hWnd, id), &t) == false)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return (void *)t.lParam;\r
+}\r
+\r
+// 項目の文字列を取得する\r
+wchar_t *LvGetStr(HWND hWnd, UINT id, UINT index, UINT pos)\r
+{\r
+ wchar_t *tmp;\r
+ UINT size;\r
+ LVITEMW t;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = LvGetStrA(hWnd, id, index, pos);\r
+ if (s == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+ else\r
+ {\r
+ wchar_t *ret = CopyStrToUni(s);\r
+ Free(s);\r
+\r
+ return ret;\r
+ }\r
+ }\r
+\r
+ size = 65536;\r
+ tmp = Malloc(size);\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_TEXT;\r
+ t.iItem = index;\r
+ t.iSubItem = pos;\r
+ t.pszText = tmp;\r
+ t.cchTextMax = size;\r
+\r
+ if (SendMsg(hWnd, id, LVM_GETITEMTEXTW, index, (LPARAM)&t) <= 0)\r
+ {\r
+ Free(tmp);\r
+ return UniCopyStr(L"");\r
+ }\r
+ else\r
+ {\r
+ wchar_t *ret = UniCopyStr(tmp);\r
+ Free(tmp);\r
+ return ret;\r
+ }\r
+}\r
+char *LvGetStrA(HWND hWnd, UINT id, UINT index, UINT pos)\r
+{\r
+ char *tmp;\r
+ UINT size;\r
+ LVITEM t;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ size = 65536;\r
+ tmp = Malloc(size);\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.mask = LVIF_TEXT;\r
+ t.iItem = index;\r
+ t.iSubItem = pos;\r
+ t.pszText = tmp;\r
+ t.cchTextMax = size;\r
+\r
+ if (SendMsg(hWnd, id, LVM_GETITEMTEXT, index, (LPARAM)&t) <= 0)\r
+ {\r
+ Free(tmp);\r
+ return CopyStr("");\r
+ }\r
+ else\r
+ {\r
+ char *ret = CopyStr(tmp);\r
+ Free(tmp);\r
+ return ret;\r
+ }\r
+}\r
+\r
+// スタイルを設定する\r
+void LvSetStyle(HWND hWnd, UINT id, UINT style)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if ((ListView_GetExtendedListViewStyle(DlgItem(hWnd, id)) & style) == 0)\r
+ {\r
+ ListView_SetExtendedListViewStyleEx(DlgItem(hWnd, id), style, style);\r
+ }\r
+}\r
+\r
+// スタイルを削除する\r
+void LvRemoveStyle(HWND hWnd, UINT id, UINT style)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if ((ListView_GetExtendedListViewStyle(DlgItem(hWnd, id)) & style) != 0)\r
+ {\r
+ ListView_SetExtendedListViewStyleEx(DlgItem(hWnd, id), style, 0);\r
+ }\r
+}\r
+\r
+// 項目の選択を反転する\r
+void LvSwitchSelect(HWND hWnd, UINT id)\r
+{\r
+ UINT i, num;\r
+ bool *states;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ num = LvNum(hWnd, id);\r
+ states = ZeroMalloc(sizeof(bool) * num);\r
+\r
+ i = INFINITE;\r
+ while (true)\r
+ {\r
+ i = LvGetNextMasked(hWnd, id, i);\r
+ if (i == INFINITE)\r
+ {\r
+ break;\r
+ }\r
+\r
+ states[i] = true;\r
+ }\r
+\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ if (states[i] == false)\r
+ {\r
+ ListView_SetItemState(DlgItem(hWnd, id), i, LVIS_SELECTED, LVIS_SELECTED);\r
+ }\r
+ else\r
+ {\r
+ ListView_SetItemState(DlgItem(hWnd, id), i, 0, LVIS_SELECTED);\r
+ }\r
+ }\r
+\r
+ Free(states);\r
+}\r
+\r
+// すべての項目を選択する\r
+void LvSelectAll(HWND hWnd, UINT id)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ num = LvNum(hWnd, id);\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ ListView_SetItemState(DlgItem(hWnd, id), i, LVIS_SELECTED, LVIS_SELECTED);\r
+ }\r
+}\r
+\r
+// 項目を選択する\r
+void LvSelect(HWND hWnd, UINT id, UINT index)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (index == INFINITE)\r
+ {\r
+ UINT i, num;\r
+ // すべて選択解除する\r
+ num = LvNum(hWnd, id);\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ ListView_SetItemState(DlgItem(hWnd, id), i, 0, LVIS_SELECTED);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ // 選択する\r
+ ListView_SetItemState(DlgItem(hWnd, id), index, LVIS_FOCUSED | LVIS_SELECTED, LVIS_FOCUSED | LVIS_SELECTED);\r
+ ListView_EnsureVisible(DlgItem(hWnd, id), index, true);\r
+ }\r
+}\r
+\r
+// 証明書情報を表示する\r
+void PrintCertInfo(HWND hWnd, CERT_DLG *p)\r
+{\r
+ X *x;\r
+ char *serial_tmp;\r
+ UINT serial_size;\r
+ wchar_t *wchar_tmp;\r
+ wchar_t tmp[1024 * 5];\r
+ UCHAR md5[MD5_SIZE];\r
+ UCHAR sha1[SHA1_SIZE];\r
+ char *s_tmp;\r
+ K *k;\r
+ // 引数チェック\r
+ if (p == NULL || hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ x = p->x;\r
+\r
+ // シリアル番号\r
+ if (x->serial != NULL)\r
+ {\r
+ serial_size = x->serial->size * 3 + 1;\r
+ serial_tmp = ZeroMalloc(serial_size);\r
+ BinToStrEx(serial_tmp, serial_size, x->serial->data, x->serial->size);\r
+ wchar_tmp = CopyStrToUni(serial_tmp);\r
+ Free(serial_tmp);\r
+ }\r
+ else\r
+ {\r
+ wchar_tmp = CopyUniStr(_UU("CERT_NO_SERIAL"));\r
+ }\r
+ LvInsert(hWnd, L_CERTINFO, ICO_CERT, NULL, 2, _UU("CERT_SERIAL"), wchar_tmp);\r
+\r
+ // 発行者\r
+ GetAllNameFromName(tmp, sizeof(tmp), x->issuer_name);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_CERT, NULL, 2, _UU("CERT_ISSUER"), tmp);\r
+\r
+ // サブジェクト\r
+ GetAllNameFromName(tmp, sizeof(tmp), x->subject_name);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_CERT, NULL, 2, _UU("CERT_SUBJECT"), tmp);\r
+\r
+ // 有効期限の開始\r
+ GetDateTimeStrEx64(tmp, sizeof(tmp), SystemToLocal64(x->notBefore), NULL);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_CERT, NULL, 2, _UU("CERT_NOT_BEFORE"), tmp);\r
+\r
+ // 有効期限の終了\r
+ GetDateTimeStrEx64(tmp, sizeof(tmp), SystemToLocal64(x->notAfter), NULL);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_CERT, NULL, 2, _UU("CERT_NOT_AFTER"), tmp);\r
+\r
+ // ビット数\r
+ if (x->is_compatible_bit)\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("CERT_BITS_FORMAT"), x->bits);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_CERT, NULL, 2, _UU("CERT_BITS"), tmp);\r
+ }\r
+\r
+ // 公開鍵\r
+ k = GetKFromX(x);\r
+ if (k != NULL)\r
+ {\r
+ BUF *b = KToBuf(k, false, NULL);\r
+ s_tmp = CopyBinToStrEx(b->Buf, b->Size);\r
+ StrToUni(tmp, sizeof(tmp), s_tmp);\r
+ Free(s_tmp);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_KEY, NULL, 2, _UU("CERT_PUBLIC_KEY"), tmp);\r
+ FreeBuf(b);\r
+ }\r
+ FreeK(k);\r
+\r
+ GetXDigest(x, md5, false);\r
+ GetXDigest(x, sha1, true);\r
+\r
+ // ダイジェスト (MD5)\r
+ s_tmp = CopyBinToStrEx(md5, sizeof(md5));\r
+ StrToUni(tmp, sizeof(tmp), s_tmp);\r
+ Free(s_tmp);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_KEY, NULL, 2, _UU("CERT_DIGEST_MD5"), tmp);\r
+\r
+ // ダイジェスト (SHA-1)\r
+ s_tmp = CopyBinToStrEx(sha1, sizeof(sha1));\r
+ StrToUni(tmp, sizeof(tmp), s_tmp);\r
+ Free(s_tmp);\r
+ LvInsert(hWnd, L_CERTINFO, ICO_KEY, NULL, 2, _UU("CERT_DIGEST_SHA1"), tmp);\r
+\r
+ Free(wchar_tmp);\r
+\r
+ LvSelect(hWnd, L_CERTINFO, 0);\r
+}\r
+\r
+// 表示の更新\r
+void CertDlgUpdate(HWND hWnd, CERT_DLG *p)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (LvIsSelected(hWnd, L_CERTINFO) == false)\r
+ {\r
+ SetText(hWnd, E_DETAIL, L"");\r
+ }\r
+ else\r
+ {\r
+ UINT i = LvGetSelected(hWnd, L_CERTINFO);\r
+ wchar_t *tmp = LvGetStr(hWnd, L_CERTINFO, i, 1);\r
+ SetText(hWnd, E_DETAIL, tmp);\r
+ Free(tmp);\r
+ }\r
+}\r
+\r
+// 証明書の保存\r
+void CertDlgSave(HWND hWnd, CERT_DLG *p)\r
+{\r
+ wchar_t *name;\r
+ X *x;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // 保存\r
+ name = SaveDlg(hWnd, _UU("DLG_CERT_FILES"), _UU("DLG_SAVE_CERT"), NULL, L".cer");\r
+ x = p->x;\r
+ if (name != NULL)\r
+ {\r
+ char str[MAX_SIZE];\r
+ UniToStr(str, sizeof(str), name);\r
+ if (XToFile(x, str, true))\r
+ {\r
+ MsgBox(hWnd, MB_ICONINFORMATION, _UU("DLG_CERT_SAVE_OK"));\r
+ }\r
+ else\r
+ {\r
+ MsgBox(hWnd, MB_ICONSTOP, _UU("DLG_CERT_SAVE_ERROR"));\r
+ }\r
+ Free(name);\r
+ }\r
+}\r
+\r
+// 証明書表示ダイアログプロシージャ\r
+UINT CertDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ CERT_DLG *p = (CERT_DLG *)param;\r
+ X *x;\r
+ wchar_t tmp[MAX_SIZE];\r
+ NMHDR *n;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ SetIcon(hWnd, 0, ICO_CERT);\r
+ x = p->x;\r
+ GetAllNameFromNameEx(tmp, sizeof(tmp), x->subject_name);\r
+ SetText(hWnd, E_SUBJECT, tmp);\r
+ GetAllNameFromNameEx(tmp, sizeof(tmp), x->issuer_name);\r
+ SetText(hWnd, E_ISSUER, tmp);\r
+ GetDateStrEx64(tmp, sizeof(tmp), SystemToLocal64(x->notAfter), NULL);\r
+ SetText(hWnd, E_EXPIRES, tmp);\r
+ SetFont(hWnd, E_SUBJECT, Font(0, 1));\r
+ SetFont(hWnd, E_ISSUER, Font(0, 1));\r
+ SetFont(hWnd, E_EXPIRES, Font(0, 1));\r
+ SetIcon(hWnd, B_PARENT, ICO_CERT);\r
+ if (x->root_cert)\r
+ {\r
+ // ルート証明書\r
+ Hide(hWnd, S_WARNING_ICON);\r
+ SetText(hWnd, S_PARENT, _UU("CERT_ROOT"));\r
+ Hide(hWnd, B_PARENT);\r
+ Hide(hWnd, S_PARENT_BUTTON_STR);\r
+ }\r
+ else if (p->issuer_x != NULL)\r
+ {\r
+ // 親証明書がある\r
+ Hide(hWnd, S_WARNING_ICON);\r
+ }\r
+ else\r
+ {\r
+ // 親証明書が無い\r
+ Hide(hWnd, S_CERT_ICON);\r
+ Hide(hWnd, B_PARENT);\r
+ Hide(hWnd, S_PARENT_BUTTON_STR);\r
+ SetText(hWnd, S_PARENT, _UU("CERT_NOT_FOUND"));\r
+ if (p->ManagerMode)\r
+ {\r
+ Hide(hWnd, IDC_STATIC1);\r
+ Hide(hWnd, S_PARENT);\r
+ Hide(hWnd, S_WARNING_ICON);\r
+ Hide(hWnd, S_CERT_ICON);\r
+ Hide(hWnd, B_PARENT);\r
+ Hide(hWnd, S_PARENT_BUTTON_STR);\r
+ }\r
+ }\r
+\r
+\r
+ LvInit(hWnd, L_CERTINFO);\r
+ LvInsertColumn(hWnd, L_CERTINFO, 0, _UU("CERT_LV_C1"), 130);\r
+ LvInsertColumn(hWnd, L_CERTINFO, 1, _UU("CERT_LV_C2"), 250);\r
+\r
+ PrintCertInfo(hWnd, p);\r
+ Focus(hWnd, L_CERTINFO);\r
+\r
+ CertDlgUpdate(hWnd, p);\r
+\r
+ if (p->ManagerMode)\r
+ {\r
+ Show(hWnd, B_SAVE);\r
+ }\r
+ else\r
+ {\r
+ // セキュリティのため非表示にする\r
+ Hide(hWnd, B_SAVE);\r
+ }\r
+\r
+ break;\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ case B_PARENT:\r
+ CertDlg(hWnd, p->issuer_x, NULL, p->ManagerMode);\r
+ break;\r
+ case B_SAVE:\r
+ // ファイルに保存\r
+ CertDlgSave(hWnd, p);\r
+ break;\r
+ }\r
+ break;\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ case WM_NOTIFY:\r
+ n = (NMHDR *)lParam;\r
+ switch (n->idFrom)\r
+ {\r
+ case L_CERTINFO:\r
+ switch (n->code)\r
+ {\r
+ case LVN_ITEMCHANGED:\r
+ CertDlgUpdate(hWnd, p);\r
+ break;\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+ }\r
+\r
+ LvSortHander(hWnd, msg, wParam, lParam, L_CERTINFO);\r
+\r
+ return 0;\r
+}\r
+\r
+// 証明書表示ダイアログ\r
+void CertDlg(HWND hWnd, X *x, X *issuer_x, bool manager)\r
+{\r
+ CERT_DLG p;\r
+ // 引数チェック\r
+ if (x == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Zero(&p, sizeof(p));\r
+ p.x = x;\r
+ if (CompareX(x, issuer_x) == false)\r
+ {\r
+ p.issuer_x = issuer_x;\r
+ }\r
+ p.ManagerMode = manager;\r
+ Dialog(hWnd, D_CERT, CertDlgProc, &p);\r
+}\r
+\r
+// ステータスウインドウダイアログ\r
+UINT StatusPrinterWindowDlg(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ STATUS_WINDOW_PARAM *p = (STATUS_WINDOW_PARAM *)param;\r
+ PACK *pack;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ // 初期化\r
+ SetIcon(hWnd, 0, ICO_SERVER_ONLINE);\r
+ RemoveExStyle(hWnd, 0, WS_EX_APPWINDOW);\r
+ p->hWnd = hWnd;\r
+ NoticeThreadInit(p->Thread);\r
+ FormatText(hWnd, 0, p->AccountName);\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ case IDCANCEL:\r
+ // キャンセルボタン\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_APP + 1:\r
+ // 文字列を設定\r
+ SetText(hWnd, S_STATUS, (wchar_t *)lParam);\r
+ break;\r
+\r
+ case WM_APP + 2:\r
+ // このウインドウを閉じる\r
+ EndDialog(hWnd, false);\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ // セッションを終了する\r
+ pack = NewPack();\r
+ SendPack(p->Sock, pack);\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// ステータスウインドウ制御用スレッド\r
+void StatusPrinterWindowThread(THREAD *thread, void *param)\r
+{\r
+ STATUS_WINDOW_PARAM *p = (STATUS_WINDOW_PARAM *)param;\r
+ // 引数チェック\r
+ if (thread == NULL || param == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ p->Thread = thread;\r
+ DialogEx2(NULL, D_STATUS, StatusPrinterWindowDlg, p, true, true);\r
+\r
+ Free(p);\r
+}\r
+\r
+// ステータスウインドウにメッセージを表示する\r
+void StatusPrinterWindowPrint(STATUS_WINDOW *sw, wchar_t *str)\r
+{\r
+ // 引数チェック\r
+ if (sw == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMessage(sw->hWnd, WM_APP + 1, 0, (LPARAM)str);\r
+}\r
+\r
+// ステータスウインドウの終了と解放\r
+void StatusPrinterWindowStop(STATUS_WINDOW *sw)\r
+{\r
+ // 引数チェック\r
+ if (sw == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // 停止メッセージを送信\r
+ SendMessage(sw->hWnd, WM_APP + 2, 0, 0);\r
+\r
+ // スレッド停止まで待機\r
+ WaitThread(sw->Thread, INFINITE);\r
+\r
+ // メモリ解放\r
+ ReleaseThread(sw->Thread);\r
+ Free(sw);\r
+}\r
+\r
+// ステータスウインドウの初期化\r
+STATUS_WINDOW *StatusPrinterWindowStart(SOCK *s, wchar_t *account_name)\r
+{\r
+ STATUS_WINDOW_PARAM *p;\r
+ STATUS_WINDOW *sw;\r
+ THREAD *t;\r
+ // 引数チェック\r
+ if (s == NULL || account_name == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ p = ZeroMalloc(sizeof(STATUS_WINDOW_PARAM));\r
+ p->Sock = s;\r
+ UniStrCpy(p->AccountName, sizeof(p->AccountName), account_name);\r
+\r
+ // スレッド作成\r
+ t = NewThread(StatusPrinterWindowThread, p);\r
+ WaitThreadInit(t);\r
+\r
+ sw = ZeroMalloc(sizeof(STATUS_WINDOW));\r
+ sw->hWnd = p->hWnd;\r
+ sw->Thread = t;\r
+\r
+ return sw;\r
+}\r
+\r
+// 文字列を取得\r
+wchar_t *LbGetStr(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return GetText(hWnd, id);\r
+}\r
+\r
+// 文字列検索\r
+UINT LbFindStr(HWND hWnd, UINT id, wchar_t *str)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, LB_FINDSTRING, -1, (LPARAM)str);\r
+\r
+ return ret;\r
+}\r
+\r
+// 項目数を取得\r
+UINT LbNum(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return SendMsg(hWnd, id, LB_GETCOUNT, 0, 0);\r
+}\r
+\r
+// 文字列追加\r
+UINT LbAddStr(HWND hWnd, UINT id, wchar_t *str, UINT data)\r
+{\r
+ UINT ret;\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ ret = LbAddStrA(hWnd, id, s, data);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, LB_ADDSTRING, 0, (LPARAM)str);\r
+ SendMsg(hWnd, id, LB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (LbNum(hWnd, id) == 1)\r
+ {\r
+ LbSelectIndex(hWnd, id, 0);\r
+ }\r
+\r
+ return ret;\r
+}\r
+UINT LbAddStrA(HWND hWnd, UINT id, char *str, UINT data)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, LB_ADDSTRING, 0, (LPARAM)str);\r
+ SendMsg(hWnd, id, LB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (LbNum(hWnd, id) == 1)\r
+ {\r
+ LbSelectIndex(hWnd, id, 0);\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// 文字列挿入\r
+UINT LbInsertStr(HWND hWnd, UINT id, UINT index, wchar_t *str, UINT data)\r
+{\r
+ UINT ret;\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ ret = LbInsertStrA(hWnd, id, index, s, data);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, LB_INSERTSTRING, index, (LPARAM)str);\r
+ SendMsg(hWnd, id, LB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (LbNum(hWnd, id) == 1)\r
+ {\r
+ LbSelect(hWnd, id, 0);\r
+ }\r
+\r
+ return ret;\r
+}\r
+UINT LbInsertStrA(HWND hWnd, UINT id, UINT index, char *str, UINT data)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, LB_INSERTSTRING, index, (LPARAM)str);\r
+ SendMsg(hWnd, id, LB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (LbNum(hWnd, id) == 1)\r
+ {\r
+ LbSelect(hWnd, id, 0);\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// すべて削除\r
+void LbReset(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, LB_RESETCONTENT, 0, 0);\r
+}\r
+\r
+// インデックスを指定して選択\r
+void LbSelectIndex(HWND hWnd, UINT id, UINT index)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, LB_SETCURSEL, index, 0);\r
+}\r
+\r
+// データを取得\r
+UINT LbGetData(HWND hWnd, UINT id, UINT index)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || index == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return SendMsg(hWnd, id, LB_GETITEMDATA, index, 0);\r
+}\r
+\r
+// データを検索\r
+UINT LbFindData(HWND hWnd, UINT id, UINT data)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ num = LbNum(hWnd, id);\r
+ if (num == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ if (LbGetData(hWnd, id, i) == data)\r
+ {\r
+ return i;\r
+ }\r
+ }\r
+\r
+ return INFINITE;\r
+}\r
+\r
+// アイテムの高さを設定\r
+void LbSetHeight(HWND hWnd, UINT id, UINT value)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, LB_SETITEMHEIGHT, 0, value);\r
+}\r
+\r
+// データを指定して検索\r
+void LbSelect(HWND hWnd, UINT id, int data)\r
+{\r
+ UINT index;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (data == INFINITE)\r
+ {\r
+ // 最初の項目を取得\r
+ LbSelectIndex(hWnd, id, 0);\r
+ return;\r
+ }\r
+\r
+ index = LbFindData(hWnd, id, data);\r
+ if (index == INFINITE)\r
+ {\r
+ // 発見できなかった\r
+ return;\r
+ }\r
+\r
+ // 選択する\r
+ LbSelectIndex(hWnd, id, index);\r
+}\r
+\r
+// 現在選択されている項目を取得\r
+UINT LbGetSelectIndex(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return SendMsg(hWnd, id, LB_GETCURSEL, 0, 0);\r
+}\r
+\r
+// 現在選択されている値を取得\r
+UINT LbGetSelect(HWND hWnd, UINT id)\r
+{\r
+ UINT index;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ index = LbGetSelectIndex(hWnd, id);\r
+ if (index == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return LbGetData(hWnd, id, index);\r
+}\r
+\r
+// パスワード入力ダイアログ状態変化\r
+void PasswordDlgProcChange(HWND hWnd, UI_PASSWORD_DLG *p)\r
+{\r
+ bool b;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ b = true;\r
+ if (IsEmpty(hWnd, E_USERNAME))\r
+ {\r
+ b = false;\r
+ }\r
+\r
+ SetEnable(hWnd, IDOK, b);\r
+\r
+ p->StartTick = Tick64();\r
+ if (p->RetryIntervalSec)\r
+ {\r
+ KillTimer(hWnd, 1);\r
+ Hide(hWnd, P_PROGRESS);\r
+ Hide(hWnd, S_COUNTDOWN);\r
+ }\r
+}\r
+\r
+// 文字列を取得\r
+wchar_t *CbGetStr(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ return GetText(hWnd, id);\r
+}\r
+\r
+// 文字列検索\r
+UINT CbFindStr(HWND hWnd, UINT id, wchar_t *str)\r
+{\r
+ UINT ret;\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *tmp = CopyUniToStr(str);\r
+ ret = CbFindStr9xA(hWnd, id, tmp);\r
+ Free(tmp);\r
+ return ret;\r
+ }\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, CB_FINDSTRINGEXACT, -1, (LPARAM)str);\r
+\r
+ return ret;\r
+}\r
+UINT CbFindStr9xA(HWND hWnd, UINT id, char *str)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, CB_FINDSTRINGEXACT, -1, (LPARAM)str);\r
+\r
+ return ret;\r
+}\r
+\r
+// 項目数を取得\r
+UINT CbNum(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return SendMsg(hWnd, id, CB_GETCOUNT, 0, 0);\r
+}\r
+\r
+// 文字列追加\r
+UINT CbAddStrA(HWND hWnd, UINT id, char *str, UINT data)\r
+{\r
+ wchar_t *tmp;\r
+ UINT ret;\r
+ // 引く数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+ tmp = CopyStrToUni(str);\r
+ ret = CbAddStr(hWnd, id, tmp, data);\r
+ Free(tmp);\r
+ return ret;\r
+}\r
+UINT CbAddStr(HWND hWnd, UINT id, wchar_t *str, UINT data)\r
+{\r
+ UINT ret;\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ ret = CbAddStr9xA(hWnd, id, s, data);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, CB_ADDSTRING, 0, (LPARAM)str);\r
+ SendMsg(hWnd, id, CB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (CbNum(hWnd, id) == 1)\r
+ {\r
+ wchar_t tmp[MAX_SIZE];\r
+ GetTxt(hWnd, id, tmp, sizeof(tmp));\r
+ if (UniStrLen(tmp) == 0)\r
+ {\r
+ CbSelectIndex(hWnd, id, 0);\r
+ }\r
+ }\r
+\r
+ return ret;\r
+}\r
+UINT CbAddStr9xA(HWND hWnd, UINT id, char *str, UINT data)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, CB_ADDSTRING, 0, (LPARAM)str);\r
+ SendMsg(hWnd, id, CB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (CbNum(hWnd, id) == 1)\r
+ {\r
+ wchar_t tmp[MAX_SIZE];\r
+ GetTxt(hWnd, id, tmp, sizeof(tmp));\r
+ if (UniStrLen(tmp) == 0)\r
+ {\r
+ CbSelectIndex(hWnd, id, 0);\r
+ }\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// 文字列挿入\r
+UINT CbInsertStrA(HWND hWnd, UINT id, UINT index, char *str, UINT data)\r
+{\r
+ wchar_t *tmp;\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+ tmp = CopyStrToUni(str);\r
+ ret = CbInsertStr(hWnd, id, index, tmp, data);\r
+ Free(tmp);\r
+ return ret;\r
+}\r
+UINT CbInsertStr(HWND hWnd, UINT id, UINT index, wchar_t *str, UINT data)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = CopyUniToStr(str);\r
+ ret = CbInsertStr9xA(hWnd, id, index, s, data);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, CB_INSERTSTRING, index, (LPARAM)str);\r
+ SendMsg(hWnd, id, CB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (CbNum(hWnd, id) == 1)\r
+ {\r
+ CbSelect(hWnd, id, 0);\r
+ }\r
+\r
+ return ret;\r
+}\r
+UINT CbInsertStr9xA(HWND hWnd, UINT id, UINT index, char *str, UINT data)\r
+{\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ ret = SendMsg(hWnd, id, CB_INSERTSTRING, index, (LPARAM)str);\r
+ SendMsg(hWnd, id, CB_SETITEMDATA, ret, (LPARAM)data);\r
+\r
+ if (CbNum(hWnd, id) == 1)\r
+ {\r
+ CbSelect(hWnd, id, 0);\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// すべて削除\r
+void CbReset(HWND hWnd, UINT id)\r
+{\r
+ wchar_t *s;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ s = GetText(hWnd, id);\r
+\r
+ SendMsg(hWnd, id, CB_RESETCONTENT, 0, 0);\r
+\r
+ if (s != NULL)\r
+ {\r
+ SetText(hWnd, id, s);\r
+ Free(s);\r
+ }\r
+}\r
+\r
+// インデックスを指定して選択\r
+void CbSelectIndex(HWND hWnd, UINT id, UINT index)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, CB_SETCURSEL, index, 0);\r
+}\r
+\r
+// データを取得\r
+UINT CbGetData(HWND hWnd, UINT id, UINT index)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || index == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return SendMsg(hWnd, id, CB_GETITEMDATA, index, 0);\r
+}\r
+\r
+// データを検索\r
+UINT CbFindData(HWND hWnd, UINT id, UINT data)\r
+{\r
+ UINT i, num;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ num = CbNum(hWnd, id);\r
+ if (num == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ for (i = 0;i < num;i++)\r
+ {\r
+ if (CbGetData(hWnd, id, i) == data)\r
+ {\r
+ return i;\r
+ }\r
+ }\r
+\r
+ return INFINITE;\r
+}\r
+\r
+// アイテムの高さを設定\r
+void CbSetHeight(HWND hWnd, UINT id, UINT value)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, CB_SETITEMHEIGHT, 0, value);\r
+}\r
+\r
+// データを指定して検索\r
+void CbSelect(HWND hWnd, UINT id, int data)\r
+{\r
+ UINT index;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (data == INFINITE)\r
+ {\r
+ // 最初の項目を取得\r
+ CbSelectIndex(hWnd, id, 0);\r
+ return;\r
+ }\r
+\r
+ index = CbFindData(hWnd, id, data);\r
+ if (index == INFINITE)\r
+ {\r
+ // 発見できなかった\r
+ return;\r
+ }\r
+\r
+ // 選択する\r
+ CbSelectIndex(hWnd, id, index);\r
+}\r
+\r
+// 現在選択されている項目を取得\r
+UINT CbGetSelectIndex(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return SendMsg(hWnd, id, CB_GETCURSEL, 0, 0);\r
+}\r
+\r
+// 現在選択されている値を取得\r
+UINT CbGetSelect(HWND hWnd, UINT id)\r
+{\r
+ UINT index;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ index = CbGetSelectIndex(hWnd, id);\r
+ if (index == INFINITE)\r
+ {\r
+ return INFINITE;\r
+ }\r
+\r
+ return CbGetData(hWnd, id, index);\r
+}\r
+\r
+// OK ボタンが押された\r
+void PasswordDlgOnOk(HWND hWnd, UI_PASSWORD_DLG *p)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ GetTxtA(hWnd, E_USERNAME, p->Username, sizeof(p->Username));\r
+ GetTxtA(hWnd, E_PASSWORD, p->Password, sizeof(p->Password));\r
+ p->Type = CbGetSelect(hWnd, C_TYPE);\r
+\r
+ if (p->ShowNoSavePassword)\r
+ {\r
+ p->NoSavePassword = IsChecked(hWnd, R_NO_SAVE_PASSWORD);\r
+ }\r
+\r
+ EndDialog(hWnd, true);\r
+}\r
+\r
+// パスワード入力ダイアログプロシージャ\r
+UINT PasswordDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ UI_PASSWORD_DLG *p = (UI_PASSWORD_DLG *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ SetIcon(hWnd, 0, ICO_KEY);\r
+ CbSetHeight(hWnd, C_TYPE, 18);\r
+ if (p->ServerName != NULL)\r
+ {\r
+ FormatText(hWnd, 0, p->ServerName);\r
+ }\r
+ else\r
+ {\r
+ SetText(hWnd, 0, _UU("PW_LOGIN_DLG_TITLE"));\r
+ }\r
+\r
+ if (p->ProxyServer == false)\r
+ {\r
+ FormatText(hWnd, S_TITLE, p->ServerName == NULL ? "" : p->ServerName);\r
+ }\r
+ else\r
+ {\r
+ wchar_t tmp[MAX_SIZE];\r
+ UniFormat(tmp, sizeof(tmp), _UU("PW_MSG_PROXY"), p->ServerName == NULL ? "" : p->ServerName);\r
+ SetText(hWnd, S_TITLE, tmp);\r
+ }\r
+\r
+ // 接続方法の列挙\r
+ SendMsg(hWnd, C_TYPE, CBEM_SETUNICODEFORMAT, true, 0);\r
+\r
+ if (StrCmpi(p->Username, WINUI_PASSWORD_NULL_USERNAME) != 0)\r
+ {\r
+ SetTextA(hWnd, E_USERNAME, p->Username);\r
+ SetTextA(hWnd, E_PASSWORD, p->Password);\r
+ }\r
+ else\r
+ {\r
+ p->RetryIntervalSec = 0;\r
+ SetTextA(hWnd, E_USERNAME, "");\r
+ SetTextA(hWnd, E_PASSWORD, "");\r
+ }\r
+\r
+ if (p->AdminMode == false)\r
+ {\r
+ if (p->ProxyServer == false)\r
+ {\r
+ CbAddStr(hWnd, C_TYPE, _UU("PW_TYPE_1"), CLIENT_AUTHTYPE_PASSWORD);\r
+ CbAddStr(hWnd, C_TYPE, _UU("PW_TYPE_2"), CLIENT_AUTHTYPE_PLAIN_PASSWORD);\r
+ }\r
+ else\r
+ {\r
+ CbAddStr(hWnd, C_TYPE, _UU("PW_TYPE_PROXY"), 0);\r
+ Disable(hWnd, C_TYPE);\r
+ }\r
+\r
+ CbSelect(hWnd, C_TYPE, p->Type);\r
+ }\r
+ else\r
+ {\r
+ CbAddStr(hWnd, C_TYPE, _UU("SM_PASSWORD_TYPE_STR"), 0);\r
+ Disable(hWnd, C_TYPE);\r
+ SetTextA(hWnd, E_USERNAME, "Administrator");\r
+ Disable(hWnd, E_USERNAME);\r
+ }\r
+\r
+ if (IsEmpty(hWnd, E_USERNAME))\r
+ {\r
+ FocusEx(hWnd, E_USERNAME);\r
+ }\r
+ else\r
+ {\r
+ FocusEx(hWnd, E_PASSWORD);\r
+ }\r
+ LimitText(hWnd, E_USERNAME, MAX_USERNAME_LEN);\r
+ LimitText(hWnd, E_PASSWORD, MAX_PASSWORD_LEN);\r
+\r
+ PasswordDlgProcChange(hWnd, p);\r
+\r
+ if (p->RetryIntervalSec != 0)\r
+ {\r
+ SetTimer(hWnd, 1, 50, NULL);\r
+ FormatText(hWnd, S_COUNTDOWN, p->RetryIntervalSec);\r
+ Show(hWnd, S_COUNTDOWN);\r
+ Show(hWnd, P_PROGRESS);\r
+ SetRange(hWnd, P_PROGRESS, 0, p->RetryIntervalSec * 1000);\r
+ }\r
+ else\r
+ {\r
+ Hide(hWnd, S_COUNTDOWN);\r
+ Hide(hWnd, P_PROGRESS);\r
+ }\r
+\r
+ if (p->ShowNoSavePassword)\r
+ {\r
+ Show(hWnd, R_NO_SAVE_PASSWORD);\r
+ Check(hWnd, R_NO_SAVE_PASSWORD, p->NoSavePassword);\r
+ }\r
+ else\r
+ {\r
+ Hide(hWnd, R_NO_SAVE_PASSWORD);\r
+ }\r
+\r
+ p->StartTick = Tick64();\r
+\r
+ if (p->CancelEvent != NULL)\r
+ {\r
+ SetTimer(hWnd, 2, 50, NULL);\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ if (p->RetryIntervalSec != 0)\r
+ {\r
+ wchar_t tmp[MAX_SIZE];\r
+ UINT64 end, now, start;\r
+ start = p->StartTick;\r
+ end = p->StartTick + (UINT64)(p->RetryIntervalSec * 1000);\r
+ now = Tick64();\r
+\r
+ if (now <= end)\r
+ {\r
+ UniFormat(tmp, sizeof(tmp), _UU("PW_RETRYCOUNT"), (UINT)((end - now) / 1000));\r
+ SetText(hWnd, S_COUNTDOWN, tmp);\r
+ SetPos(hWnd, P_PROGRESS, (UINT)(now - start));\r
+ }\r
+ else\r
+ {\r
+ EndDialog(hWnd, true);\r
+ }\r
+ }\r
+ break;\r
+\r
+ case 2:\r
+ if (p->CancelEvent != NULL)\r
+ {\r
+ // 終了イベントを待機する\r
+ HANDLE hEvent = (HANDLE)p->CancelEvent->pData;\r
+ UINT ret = WaitForSingleObject(hEvent, 0);\r
+ if (ret != WAIT_TIMEOUT)\r
+ {\r
+ // 強制終了イベントがセットされた\r
+ Close(hWnd);\r
+ }\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ PasswordDlgOnOk(hWnd, p);\r
+ break;\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ switch (HIWORD(wParam))\r
+ {\r
+ case EN_CHANGE:\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case E_USERNAME:\r
+ case E_PASSWORD:\r
+ PasswordDlgProcChange(hWnd, p);\r
+ break;\r
+ }\r
+ break;\r
+ case CBN_SELCHANGE:\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case C_TYPE:\r
+ PasswordDlgProcChange(hWnd, p);\r
+ if (IsEmpty(hWnd, E_USERNAME))\r
+ {\r
+ FocusEx(hWnd, E_USERNAME);\r
+ }\r
+ else\r
+ {\r
+ FocusEx(hWnd, E_PASSWORD);\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+ }\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// プログレスバーの位置を設定\r
+void SetPos(HWND hWnd, UINT id, UINT pos)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, PBM_SETPOS, pos, 0);\r
+}\r
+\r
+// プログレスバーの範囲を設定\r
+void SetRange(HWND hWnd, UINT id, UINT start, UINT end)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, PBM_SETRANGE32, start, end);\r
+}\r
+\r
+// パスワード入力ダイアログ\r
+bool PasswordDlg(HWND hWnd, UI_PASSWORD_DLG *p)\r
+{\r
+ // 引数チェック\r
+ if (p == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ p->StartTick = Tick64();\r
+\r
+ return Dialog(hWnd, D_PASSWORD, PasswordDlgProc, p);\r
+}\r
+\r
+// パスフレーズ入力ダイアログ\r
+bool PassphraseDlg(HWND hWnd, char *pass, UINT pass_size, BUF *buf, bool p12)\r
+{\r
+ PASSPHRASE_DLG p;\r
+ // 引数チェック\r
+ if (pass == NULL || buf == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ Zero(&p, sizeof(PASSPHRASE_DLG));\r
+\r
+ p.buf = buf;\r
+ p.p12 = p12;\r
+\r
+ // まず暗号化されているかどうかを調べる\r
+ if (p12 == false)\r
+ {\r
+ // 秘密鍵\r
+ if (IsEncryptedK(buf, true) == false)\r
+ {\r
+ // 暗号化されていない\r
+ StrCpy(pass, pass_size, "");\r
+ return true;\r
+ }\r
+ }\r
+ else\r
+ {\r
+ // PKCS#12\r
+ P12 *p12 = BufToP12(buf);\r
+ if (p12 == NULL)\r
+ {\r
+ // 不明な形式だが暗号化されていない\r
+ StrCpy(pass, pass_size, "");\r
+ return true;\r
+ }\r
+\r
+ if (IsEncryptedP12(p12) == false)\r
+ {\r
+ // 暗号化されていない\r
+ StrCpy(pass, pass_size, "");\r
+ FreeP12(p12);\r
+ return true;\r
+ }\r
+ FreeP12(p12);\r
+ }\r
+\r
+ // ダイアログ表示\r
+ if (Dialog(hWnd, D_PASSPHRASE, PassphraseDlgProc, &p) == false)\r
+ {\r
+ // キャンセル\r
+ return false;\r
+ }\r
+\r
+ StrCpy(pass, pass_size, p.pass);\r
+\r
+ return true;\r
+}\r
+\r
+// WM_COMMAND ハンドラ\r
+void PassphraseDlgProcCommand(HWND hWnd, PASSPHRASE_DLG *p)\r
+{\r
+ char *pass;\r
+ bool ok;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ pass = GetTextA(hWnd, E_PASSPHRASE);\r
+ if (pass == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ ok = false;\r
+\r
+ if (p->p12 == false)\r
+ {\r
+ K *k;\r
+ k = BufToK(p->buf, true, true, pass);\r
+ if (k != NULL)\r
+ {\r
+ ok = true;\r
+ FreeK(k);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ X *x;\r
+ K *k;\r
+ P12 *p12;\r
+ p12 = BufToP12(p->buf);\r
+ if (p12 != NULL)\r
+ {\r
+ if (ParseP12(p12, &x, &k, pass))\r
+ {\r
+ FreeX(x);\r
+ FreeK(k);\r
+ ok = true;\r
+ }\r
+ FreeP12(p12);\r
+ }\r
+ }\r
+\r
+ Free(pass);\r
+\r
+ SetEnable(hWnd, IDOK, ok);\r
+}\r
+\r
+// パスフレーズ入力ダイアログプロシージャ\r
+UINT PassphraseDlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ PASSPHRASE_DLG *p = (PASSPHRASE_DLG *)param;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ PassphraseDlgProcCommand(hWnd, p);\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ GetTxtA(hWnd, E_PASSPHRASE, p->pass, sizeof(p->pass));\r
+ EndDialog(hWnd, true);\r
+ break;\r
+\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+\r
+ switch (LOWORD(wParam))\r
+ {\r
+ case E_PASSPHRASE:\r
+ PassphraseDlgProcCommand(hWnd, p);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, false);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// PKCS ユーティリティ\r
+void PkcsUtil()\r
+{\r
+ InitWinUi(_UU("PKCS_UTIL_TITLE"), _SS("DEFAULT_FONT"), _II("DEFAULT_FONT_SIZE"));\r
+ Dialog(NULL, D_PKCSUTIL, PkcsUtilProc, NULL);\r
+ FreeWinUi();\r
+}\r
+\r
+// PKCS 書き込み\r
+void PkcsUtilWrite(HWND hWnd)\r
+{\r
+ wchar_t *filename;\r
+ BUF *in_buf;\r
+ char filename_ansi[MAX_SIZE];\r
+ char pass[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ filename = OpenDlg(hWnd, _UU("DLG_PKCS12_FILTER"), _UU("PKCS_UTIL_SAVEDLG_TITLE"));\r
+ if (filename == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ UniToStr(filename_ansi, sizeof(filename_ansi), filename);\r
+\r
+ in_buf = ReadDump(filename_ansi);\r
+\r
+ if (in_buf == NULL)\r
+ {\r
+ MsgBoxEx(hWnd, MB_ICONEXCLAMATION, _UU("PKCS_UTIL_READ_ERROR"), filename);\r
+ }\r
+ else\r
+ {\r
+ if (PassphraseDlg(hWnd, pass, sizeof(pass), in_buf, true))\r
+ {\r
+ P12 *p12 = BufToP12(in_buf);\r
+ if (p12 == NULL)\r
+ {\r
+ MsgBox(hWnd, MB_ICONEXCLAMATION, _UU("PKCS_UTIL_BAD_FILE"));\r
+ }\r
+ else\r
+ {\r
+ X *x = NULL;\r
+ K *k = NULL;\r
+ BUF *b;\r
+ ParseP12(p12, &x, &k, pass);\r
+ FreeP12(p12);\r
+ p12 = NewP12(x, k, NULL);\r
+ FreeX(x);\r
+ FreeK(k);\r
+ b = P12ToBuf(p12);\r
+ FreeP12(p12);\r
+ if (b != NULL)\r
+ {\r
+ // バッチ処理\r
+ WINUI_SECURE_BATCH batch[] =\r
+ {\r
+ {WINUI_SECURE_WRITE_DATA, _SS("PKCS_UTIL_SECA_FILENAME"), false,\r
+ b, NULL, NULL, NULL, NULL, NULL},\r
+ };\r
+\r
+ if (SecureDeviceWindow(hWnd, batch, sizeof(batch) / sizeof(batch[0]), 2, 0))\r
+ {\r
+ MsgBoxEx(hWnd, MB_ICONINFORMATION, _UU("PKCS_UTIL_WRITE_OK_MSG"), filename);\r
+ }\r
+ }\r
+ FreeBuf(b);\r
+ }\r
+ }\r
+\r
+ FreeBuf(in_buf);\r
+ }\r
+\r
+ Free(filename);\r
+}\r
+\r
+// PKCS 消去\r
+void PkcsUtilErase(HWND hWnd)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (MsgBox(hWnd, MB_ICONQUESTION | MB_YESNO | MB_DEFBUTTON2,\r
+ _UU("PKCS_MAKE_SURE")) == IDYES)\r
+ {\r
+ // バッチ処理\r
+ WINUI_SECURE_BATCH batch[] =\r
+ {\r
+ {WINUI_SECURE_DELETE_OBJECT, _SS("PKCS_UTIL_SECA_FILENAME"), false,\r
+ NULL, NULL, NULL, NULL, NULL, NULL},\r
+ };\r
+\r
+ if (SecureDeviceWindow(hWnd, batch, sizeof(batch) / sizeof(batch[0]), 2, 0))\r
+ {\r
+ MsgBox(hWnd, MB_ICONINFORMATION, _UU("PKCS_UTIL_DELETE_OK_MSG"));\r
+ }\r
+ }\r
+}\r
+\r
+// PKCS ユーティリティ ダイアログ\r
+UINT PkcsUtilProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ DlgFont(hWnd, S_TITLE, 12, true);\r
+ SetIcon(hWnd, 0, ICO_CERT);\r
+ SetFont(hWnd, S_COPYRIGHT, GetFont("Arial", 8, false, false, false, false));\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case B_WRITE:\r
+ PkcsUtilWrite(hWnd);\r
+ break;\r
+\r
+ case B_ERASE:\r
+ PkcsUtilErase(hWnd);\r
+ break;\r
+\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// [ファイルを保存する] ダイアログ\r
+wchar_t *SaveDlg(HWND hWnd, wchar_t *filter, wchar_t *title, wchar_t *default_name, wchar_t *default_ext)\r
+{\r
+ wchar_t *filter_str;\r
+ wchar_t tmp[MAX_SIZE];\r
+ OPENFILENAMEW o;\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *ret, *s1, *s2, *s3, *s4;\r
+ wchar_t *wr;\r
+ s1 = CopyUniToStr(filter);\r
+ s2 = CopyUniToStr(title);\r
+ s3 = CopyUniToStr(default_name);\r
+ s4 = CopyUniToStr(default_ext);\r
+ ret = SaveDlgA(hWnd, s1, s2, s3, s4);\r
+ Free(s1);\r
+ Free(s2);\r
+ Free(s3);\r
+ Free(s4);\r
+ wr = CopyStrToUni(ret);\r
+ Free(ret);\r
+ return wr;\r
+ }\r
+\r
+ // 引数チェック\r
+ if (filter == NULL)\r
+ {\r
+ filter = _UU("DLG_ALL_FILES");\r
+ }\r
+\r
+ filter_str = MakeFilter(filter);\r
+\r
+ Zero(&o, sizeof(o));\r
+ Zero(tmp, sizeof(tmp));\r
+\r
+ if (default_name != NULL)\r
+ {\r
+ UniStrCpy(tmp, sizeof(tmp), default_name);\r
+ }\r
+\r
+ o.lStructSize = sizeof(o);\r
+ \r
+ if (OS_IS_WINDOWS_9X(GetOsInfo()->OsType) || (OS_IS_WINDOWS_NT(GetOsInfo()->OsType) && GET_KETA(GetOsInfo()->OsType, 100) <= 1))\r
+ {\r
+ o.lStructSize = OPENFILENAME_SIZE_VERSION_400W;\r
+ }\r
+\r
+ o.hwndOwner = hWnd;\r
+ o.hInstance = GetModuleHandleA(NULL);\r
+ o.lpstrFile = tmp;\r
+ o.lpstrTitle = title;\r
+ o.lpstrFilter = filter_str;\r
+ o.nMaxFile = sizeof(tmp);\r
+ o.Flags = OFN_OVERWRITEPROMPT;\r
+ o.lpstrDefExt = default_ext;\r
+\r
+ if (GetSaveFileNameW(&o) == false)\r
+ {\r
+ Free(filter_str);\r
+ return NULL;\r
+ }\r
+\r
+ Free(filter_str);\r
+\r
+ return UniCopyStr(tmp);\r
+}\r
+char *SaveDlgA(HWND hWnd, char *filter, char *title, char *default_name, char *default_ext)\r
+{\r
+ char *filter_str;\r
+ char tmp[MAX_SIZE];\r
+ OPENFILENAME o;\r
+ // 引数チェック\r
+ if (filter == NULL)\r
+ {\r
+ filter = _SS("DLG_ALL_FILES");\r
+ }\r
+\r
+ filter_str = MakeFilterA(filter);\r
+\r
+ Zero(&o, sizeof(o));\r
+ Zero(tmp, sizeof(tmp));\r
+\r
+ if (default_name != NULL)\r
+ {\r
+ StrCpy(tmp, sizeof(tmp), default_name);\r
+ }\r
+\r
+ o.lStructSize = sizeof(o);\r
+ \r
+ if (OS_IS_WINDOWS_9X(GetOsInfo()->OsType) || (OS_IS_WINDOWS_NT(GetOsInfo()->OsType) && GET_KETA(GetOsInfo()->OsType, 100) <= 1))\r
+ {\r
+ o.lStructSize = OPENFILENAME_SIZE_VERSION_400A;\r
+ }\r
+\r
+ o.hwndOwner = hWnd;\r
+ o.hInstance = GetModuleHandleA(NULL);\r
+ o.lpstrFile = tmp;\r
+ o.lpstrTitle = title;\r
+ o.lpstrFilter = filter_str;\r
+ o.nMaxFile = sizeof(tmp);\r
+ o.Flags = OFN_OVERWRITEPROMPT;\r
+ o.lpstrDefExt = default_ext;\r
+\r
+ if (GetSaveFileName(&o) == false)\r
+ {\r
+ Free(filter_str);\r
+ return NULL;\r
+ }\r
+\r
+ Free(filter_str);\r
+\r
+ return CopyStr(tmp);\r
+}\r
+\r
+// [ファイルを開く] ダイアログ\r
+wchar_t *OpenDlg(HWND hWnd, wchar_t *filter, wchar_t *title)\r
+{\r
+ wchar_t *filter_str;\r
+ wchar_t tmp[MAX_SIZE];\r
+ OPENFILENAMEW o;\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *ret;\r
+ char *filter_a;\r
+ char *title_a;\r
+ wchar_t *w;\r
+ filter_a = CopyUniToStr(filter);\r
+ title_a = CopyUniToStr(title);\r
+ ret = OpenDlgA(hWnd, filter_a, title_a);\r
+ Free(filter_a);\r
+ Free(title_a);\r
+ w = CopyStrToUni(ret);\r
+ Free(ret);\r
+ return w;\r
+ }\r
+\r
+ // 引数チェック\r
+ if (filter == NULL)\r
+ {\r
+ filter = _UU("DLG_ALL_FILES");\r
+ }\r
+\r
+ filter_str = MakeFilter(filter);\r
+\r
+ Zero(&o, sizeof(OPENFILENAMEW));\r
+ Zero(tmp, sizeof(tmp));\r
+\r
+ o.lStructSize = sizeof(o);\r
+\r
+\r
+ if (OS_IS_WINDOWS_9X(GetOsInfo()->OsType) || (OS_IS_WINDOWS_NT(GetOsInfo()->OsType) && GET_KETA(GetOsInfo()->OsType, 100) <= 1))\r
+ {\r
+ o.lStructSize = OPENFILENAME_SIZE_VERSION_400W;\r
+ }\r
+\r
+\r
+ o.hwndOwner = hWnd;\r
+ o.hInstance = GetModuleHandleA(NULL);\r
+ o.lpstrFilter = filter_str;\r
+ o.lpstrFile = tmp;\r
+ o.nMaxFile = sizeof(tmp);\r
+ o.lpstrTitle = title;\r
+ o.Flags = OFN_FILEMUSTEXIST | OFN_HIDEREADONLY;\r
+\r
+ if (GetOpenFileNameW(&o) == false)\r
+ {\r
+ Free(filter_str);\r
+ return NULL;\r
+ }\r
+\r
+ Free(filter_str);\r
+\r
+ return UniCopyStr(tmp);\r
+}\r
+char *OpenDlgA(HWND hWnd, char *filter, char *title)\r
+{\r
+ char *filter_str;\r
+ char tmp[MAX_SIZE];\r
+ OPENFILENAME o;\r
+ // 引数チェック\r
+ if (filter == NULL)\r
+ {\r
+ filter = _SS("DLG_ALL_FILES");\r
+ }\r
+\r
+ filter_str = MakeFilterA(filter);\r
+\r
+ Zero(&o, sizeof(OPENFILENAME));\r
+ Zero(tmp, sizeof(tmp));\r
+\r
+ o.lStructSize = sizeof(o);\r
+\r
+ if (OS_IS_WINDOWS_9X(GetOsInfo()->OsType) || (OS_IS_WINDOWS_NT(GetOsInfo()->OsType) && GET_KETA(GetOsInfo()->OsType, 100) <= 1))\r
+ {\r
+ o.lStructSize = OPENFILENAME_SIZE_VERSION_400A;\r
+ }\r
+\r
+ o.hwndOwner = hWnd;\r
+ o.hInstance = GetModuleHandleA(NULL);\r
+ o.lpstrFilter = filter_str;\r
+ o.lpstrFile = tmp;\r
+ o.nMaxFile = sizeof(tmp);\r
+ o.lpstrTitle = title;\r
+ o.Flags = OFN_FILEMUSTEXIST | OFN_HIDEREADONLY;\r
+\r
+ if (GetOpenFileName(&o) == false)\r
+ {\r
+ Free(filter_str);\r
+ return NULL;\r
+ }\r
+\r
+ Free(filter_str);\r
+\r
+ return CopyStr(tmp);\r
+}\r
+\r
+// フィルタ文字列の生成\r
+wchar_t *MakeFilter(wchar_t *str)\r
+{\r
+ UINT i;\r
+ wchar_t *ret;\r
+ // 引数チェック\r
+ if (str == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ ret = ZeroMalloc(UniStrSize(str) + 32);\r
+\r
+ for (i = 0;i < UniStrLen(str);i++)\r
+ {\r
+ if (str[i] == L'|')\r
+ {\r
+ ret[i] = L'\0';\r
+ }\r
+ else\r
+ {\r
+ ret[i] = str[i];\r
+ }\r
+ }\r
+\r
+ return ret;\r
+}\r
+char *MakeFilterA(char *str)\r
+{\r
+ UINT i;\r
+ char *ret;\r
+ // 引数チェック\r
+ if (str == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ ret = ZeroMalloc(StrSize(str) + 32);\r
+\r
+ for (i = 0;i < StrLen(str);i++)\r
+ {\r
+ if (str[i] == '|')\r
+ {\r
+ ret[i] = '\0';\r
+ }\r
+ else\r
+ {\r
+ ret[i] = str[i];\r
+ }\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// バッチの実行\r
+bool ExecuteSecureDeviceBatch(HWND hWnd, SECURE *sec, SECURE_DEVICE_THREAD *p, SECURE_DEVICE *dev, WINUI_SECURE_BATCH *batch)\r
+{\r
+ LIST *o;\r
+ void *buf;\r
+ UINT size = 10 * 1024; // データの最大サイズ\r
+ UINT type = INFINITE;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL || dev == NULL || batch == NULL || sec == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ switch (batch->Type)\r
+ {\r
+ case WINUI_SECURE_DELETE_CERT:\r
+ type = SEC_X;\r
+ goto DELETE_OBJECT;\r
+\r
+ case WINUI_SECURE_DELETE_KEY:\r
+ type = SEC_K;\r
+ goto DELETE_OBJECT;\r
+\r
+ case WINUI_SECURE_DELETE_DATA:\r
+ type = SEC_DATA;\r
+ goto DELETE_OBJECT;\r
+\r
+ case WINUI_SECURE_DELETE_OBJECT:\r
+ // オブジェクトの削除\r
+DELETE_OBJECT:\r
+ SetText(hWnd, S_STATUS, _UU("SEC_DELETE"));\r
+ if (DeleteSecObjectByName(sec, batch->Name, type) == false)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(_UU("SEC_ERROR_DELETE"));\r
+ return false;\r
+ }\r
+ break;\r
+\r
+ case WINUI_SECURE_ENUM_OBJECTS:\r
+ // オブジェクトの列挙\r
+ SetText(hWnd, S_STATUS, _UU("SEC_ENUM"));\r
+ o = EnumSecObject(sec);\r
+ if (o == NULL)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(_UU("SEC_ERROR_ENUM"));\r
+ return false;\r
+ }\r
+\r
+ batch->EnumList = o;\r
+ break;\r
+\r
+ case WINUI_SECURE_WRITE_DATA:\r
+ // データの書き込み\r
+ SetText(hWnd, S_STATUS, _UU("SEC_WRITE_DATA"));\r
+ if (WriteSecData(sec, batch->Private, batch->Name, batch->InputData->Buf, batch->InputData->Size) == false)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(dev->Type != SECURE_USB_TOKEN ?\r
+ _UU("SEC_ERROR_WRITE_1") : _UU("SEC_ERROR_WRITE_2"));\r
+ return false;\r
+ }\r
+ break;\r
+\r
+ case WINUI_SECURE_READ_DATA:\r
+ // データの読み込み\r
+ SetText(hWnd, S_STATUS, _UU("SEC_READ_DATA"));\r
+ buf = MallocEx(size, true);\r
+ size = ReadSecData(sec, batch->Name, buf, size);\r
+ if (size == 0)\r
+ {\r
+ Free(buf);\r
+ p->ErrorMessage = UniCopyStr(dev->Type != SECURE_USB_TOKEN ?\r
+ _UU("SEC_ERROR_NOT_FOUND_1") : _UU("SEC_ERROR_NOT_FOUND_2"));\r
+ return false;\r
+ }\r
+ batch->OutputData = NewBuf();\r
+ WriteBuf(batch->OutputData, buf, size);\r
+ SeekBuf(batch->OutputData, 0, 0);\r
+ Free(buf);\r
+ break;\r
+\r
+ case WINUI_SECURE_WRITE_CERT:\r
+ // 証明書の書き込み\r
+ SetText(hWnd, S_STATUS, _UU("SEC_WRITE_CERT"));\r
+ if (WriteSecCert(sec, batch->Private, batch->Name, batch->InputX) == false)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(dev->Type != SECURE_USB_TOKEN ?\r
+ _UU("SEC_ERROR_WRITE_1") : _UU("SEC_ERROR_WRITE_2"));\r
+ return false;\r
+ }\r
+ break;\r
+\r
+ case WINUI_SECURE_READ_CERT:\r
+ // 証明書の読み込み\r
+ SetText(hWnd, S_STATUS, _UU("SEC_READ_CERT"));\r
+ batch->OutputX = ReadSecCert(sec, batch->Name);\r
+ if (batch->OutputX == NULL)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(dev->Type != SECURE_USB_TOKEN ?\r
+ _UU("SEC_ERROR_NOT_FOUND_1") : _UU("SEC_ERROR_NOT_FOUND_2"));\r
+ return false;\r
+ }\r
+ break;\r
+\r
+ case WINUI_SECURE_WRITE_KEY:\r
+ // 秘密鍵の書き込み\r
+ SetText(hWnd, S_STATUS, _UU("SEC_WRITE_KEY"));\r
+ if (WriteSecKey(sec, batch->Private, batch->Name, batch->InputK) == false)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(dev->Type != SECURE_USB_TOKEN ?\r
+ _UU("SEC_ERROR_WRITE_1") : _UU("SEC_ERROR_WRITE_2"));\r
+ return false;\r
+ }\r
+ break;\r
+\r
+ case WINUI_SECURE_SIGN_WITH_KEY:\r
+ // 署名\r
+ SetText(hWnd, S_STATUS, _UU("SEC_SIGN"));\r
+ if (SignSec(sec, batch->Name, batch->OutputSign, batch->InputData->Buf, batch->InputData->Size) == false)\r
+ {\r
+ p->ErrorMessage = UniCopyStr(dev->Type != SECURE_USB_TOKEN ?\r
+ _UU("SEC_ERROR_SIGN_1") : _UU("SEC_ERROR_SIGN_2"));\r
+ return false;\r
+ }\r
+ break;\r
+ }\r
+\r
+ return true;\r
+}\r
+\r
+// セキュアデバイス操作をバッチ処理で実行する\r
+void SecureDeviceBatch(HWND hWnd, SECURE *sec, SECURE_DEVICE_THREAD *p, SECURE_DEVICE *dev)\r
+{\r
+ UINT i;\r
+ // 引数チェック\r
+ if (hWnd == NULL || p == NULL || dev == NULL || sec == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // 逐次処理を行う\r
+ for (i = 0;i < p->w->num_batch;i++)\r
+ {\r
+ WINUI_SECURE_BATCH *batch = &p->w->batch[i];\r
+\r
+ if (ExecuteSecureDeviceBatch(hWnd, sec, p, dev, batch) == false)\r
+ {\r
+ // 1 つでも失敗したら直ちに中断する\r
+ return;\r
+ }\r
+ }\r
+\r
+ // すべてのバッチ処理が成功した\r
+ p->Succeed = true;\r
+}\r
+\r
+// セキュアデバイス操作を行うスレッド\r
+void SecureDeviceThread(THREAD *t, void *param)\r
+{\r
+ SECURE *sec;\r
+ SECURE_DEVICE_THREAD *p = (SECURE_DEVICE_THREAD *)param;\r
+ SECURE_DEVICE *dev;\r
+ HWND hWnd;\r
+ // 引数チェック\r
+ if (t == NULL || param == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ p->Succeed = false;\r
+ p->ErrorMessage = NULL;\r
+\r
+ hWnd = p->hWnd;\r
+\r
+ // デバイスを開く\r
+ dev = GetSecureDevice(p->w->device_id);\r
+ SetText(hWnd, S_STATUS, _UU("SEC_OPENING"));\r
+ sec = OpenSec(p->w->device_id);\r
+ if (sec == NULL)\r
+ {\r
+ // デバイスオープン失敗\r
+ if (p->w->device_id != 9)\r
+ {\r
+ p->ErrorMessage = CopyUniFormat(_UU("SEC_ERROR_OPEN_DEVICE"), dev->DeviceName);\r
+ }\r
+ else\r
+ {\r
+ p->ErrorMessage = CopyUniFormat(_UU("SEC_ERROR_OPEN_DEVICEEX"), dev->DeviceName);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ // セッションを開く\r
+ SetText(hWnd, S_STATUS, _UU("SEC_OPEN_SESSION"));\r
+ if (OpenSecSession(sec, 0) == false)\r
+ {\r
+ // セッション初期化失敗\r
+ p->ErrorMessage = CopyUniFormat(_UU("SEC_ERROR_OPEN_SESSION"), dev->DeviceName);\r
+ }\r
+ else\r
+ {\r
+ // ログイン\r
+ SetText(hWnd, S_STATUS, _UU("SEC_LOGIN"));\r
+ if (LoginSec(sec, p->pin) == false)\r
+ {\r
+ // ログイン失敗\r
+ p->ErrorMessage =UniCopyStr(_UU("SEC_ERROR_LOGIN"));\r
+ }\r
+ else\r
+ {\r
+ // バッチ処理メイン\r
+ SetText(hWnd, S_STATUS, _UU("SEC_INIT_BATCH"));\r
+ SecureDeviceBatch(hWnd, sec, p, dev);\r
+\r
+ // ログアウト\r
+ SetText(hWnd, S_STATUS, _UU("SEC_LOGOUT"));\r
+ LogoutSec(sec);\r
+ }\r
+\r
+ // セッションを閉じる\r
+ SetText(hWnd, S_STATUS, _UU("SEC_CLOSE_SESSION"));\r
+ CloseSecSession(sec);\r
+ }\r
+\r
+ // デバイスを閉じる\r
+ SetText(hWnd, S_STATUS, _UU("SEC_CLOSING"));\r
+ CloseSec(sec);\r
+ }\r
+\r
+ if (p->Succeed)\r
+ {\r
+ // 成功した場合は 150ms メッセージを表示する (サービス)\r
+ SetText(hWnd, S_STATUS, _UU("SEC_FINISHED"));\r
+ SleepThread(150);\r
+ }\r
+\r
+ SendMessage(p->hWnd, WM_APP + 1, 0, 0);\r
+}\r
+\r
+// セキュアデバイス操作を開始する\r
+void StartSecureDevice(HWND hWnd, SECURE_DEVICE_WINDOW *w)\r
+{\r
+ SECURE_DEVICE_THREAD *p;\r
+ // 引数チェック\r
+ if (hWnd == NULL || w == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // コントロールを無効にする\r
+ EnableSecureDeviceWindowControls(hWnd, false);\r
+\r
+ // スレッドを開始する\r
+ p = ZeroMalloc(sizeof(SECURE_DEVICE_THREAD));\r
+ p->w = w;\r
+ p->hWnd = hWnd;\r
+ w->p = p;\r
+ p->pin = GetTextA(hWnd, E_PIN);\r
+ ReleaseThread(NewThread(SecureDeviceThread, p));\r
+}\r
+\r
+// セキュアデバイス操作用ウインドウのコントロールを有効・無効化する\r
+void EnableSecureDeviceWindowControls(HWND hWnd, bool enable)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (enable)\r
+ {\r
+ Show(hWnd, S_PIN_CODE);\r
+ Show(hWnd, E_PIN);\r
+ Show(hWnd, S_WARNING);\r
+ }\r
+ else\r
+ {\r
+ Hide(hWnd, S_PIN_CODE);\r
+ Hide(hWnd, E_PIN);\r
+ Hide(hWnd, S_WARNING);\r
+ }\r
+\r
+ SetEnable(hWnd, IDOK, enable);\r
+ SetEnable(hWnd, IDCANCEL, enable);\r
+ SetEnable(hWnd, S_TITLE, enable);\r
+ SetEnable(hWnd, S_DEVICE_INFO, enable);\r
+ SetEnable(hWnd, S_INSERT_SECURE, enable);\r
+\r
+ if (enable == false)\r
+ {\r
+ DisableClose(hWnd);\r
+ SetText(hWnd, S_STATUS, L"");\r
+ Show(hWnd, S_STATUS);\r
+ PlayAvi(hWnd, A_PROGRESS, true);\r
+ }\r
+ else\r
+ {\r
+ EnableClose(hWnd);\r
+ SetText(hWnd, S_STATUS, L"");\r
+ Hide(hWnd, S_STATUS);\r
+ StopAvi(hWnd, A_PROGRESS);\r
+ }\r
+}\r
+\r
+// セキュアデバイス操作用ウインドウプロシージャ\r
+UINT SecureDeviceWindowProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, void *param)\r
+{\r
+ SECURE_DEVICE_WINDOW *w = (SECURE_DEVICE_WINDOW *)param;\r
+ SECURE_DEVICE *dev = GetSecureDevice(w->device_id);\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ if (dev == NULL)\r
+ {\r
+ MsgBoxEx(hWnd, MB_ICONEXCLAMATION, _UU("SEC_ERROR_INVALID_ID"), w->device_id);\r
+ EndDialog(hWnd, 0);\r
+ break;\r
+ }\r
+\r
+ if (IsJPKI(dev->Id))\r
+ {\r
+ // 住基カード\r
+ Hide(hWnd, S_IMAGE);\r
+ Show(hWnd, S_IMAGE2);\r
+ Hide(hWnd, S_IMAGE_TSUKUBA);\r
+ }\r
+ else\r
+ {\r
+ // 普通のカード\r
+ Hide(hWnd, S_IMAGE2);\r
+\r
+ if (w->BitmapId != 0)\r
+ {\r
+ // 筑波大学用\r
+ Hide(hWnd, S_IMAGE);\r
+ Show(hWnd, S_IMAGE_TSUKUBA);\r
+ }\r
+ else\r
+ {\r
+ // 一般用\r
+ Show(hWnd, S_IMAGE);\r
+ Hide(hWnd, S_IMAGE_TSUKUBA);\r
+ }\r
+ }\r
+\r
+ FormatText(hWnd, 0, dev->Type != SECURE_USB_TOKEN ? _UU("SEC_SMART_CARD") : _UU("SEC_USB_TOKEN"),\r
+ dev->DeviceName);\r
+ FormatText(hWnd, S_TITLE, dev->DeviceName);\r
+ FormatText(hWnd, S_INSERT_SECURE,\r
+ dev->Type != SECURE_USB_TOKEN ? _UU("SEC_INIT_MSG_1") : _UU("SEC_INIT_MSG_2"));\r
+ FormatText(hWnd, S_DEVICE_INFO,\r
+ dev->DeviceName, dev->Manufacturer, dev->ModuleName);\r
+\r
+ DlgFont(hWnd, S_SOFTWARE_TITLE, 11, 0);\r
+ SetText(hWnd, S_SOFTWARE_TITLE, title_bar);\r
+\r
+ DlgFont(hWnd, S_TITLE, 14, true);\r
+ DlgFont(hWnd, S_DEVICE_INFO, 11, false);\r
+ DlgFont(hWnd, S_STATUS, 13, true);\r
+ EnableSecureDeviceWindowControls(hWnd, true);\r
+ OpenAvi(hWnd, A_PROGRESS, AVI_PROGRESS);\r
+\r
+ SetIcon(hWnd, 0, ICO_KEY);\r
+\r
+ // 初期 PIN\r
+ if ((w->default_pin != NULL && StrLen(w->default_pin) != 0) || (cached_pin_code_expires >= Tick64()))\r
+ {\r
+ if (w->default_pin != NULL && StrLen(w->default_pin) != 0)\r
+ {\r
+ SetTextA(hWnd, E_PIN, w->default_pin);\r
+ }\r
+ else\r
+ {\r
+ SetTextA(hWnd, E_PIN, cached_pin_code);\r
+ }\r
+ SetTimer(hWnd, 1, 1, NULL);\r
+ }\r
+\r
+ break;\r
+\r
+ case WM_TIMER:\r
+ switch (wParam)\r
+ {\r
+ case 1:\r
+ KillTimer(hWnd, 1);\r
+ Command(hWnd, IDOK);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_COMMAND:\r
+ switch (wParam)\r
+ {\r
+ case IDOK:\r
+ StartSecureDevice(hWnd, w);\r
+ break;\r
+\r
+ case IDCANCEL:\r
+ Close(hWnd);\r
+ break;\r
+ }\r
+ break;\r
+\r
+ case WM_CLOSE:\r
+ if (IsEnable(hWnd, IDCANCEL))\r
+ {\r
+ CloseAvi(hWnd, A_PROGRESS);\r
+ EndDialog(hWnd, false);\r
+ }\r
+ break;\r
+\r
+ case WM_APP + 1:\r
+ // スレッドから応答があった\r
+ if (w->p != NULL)\r
+ {\r
+ if (w->p->Succeed)\r
+ {\r
+ // 成功\r
+ if (w->default_pin != NULL)\r
+ {\r
+ StrCpy(w->default_pin, 128, w->p->pin);\r
+ }\r
+ StrCpy(cached_pin_code, sizeof(cached_pin_code), w->p->pin);\r
+ cached_pin_code_expires = Tick64() + (UINT64)WINUI_SECUREDEVICE_PIN_CACHE_TIME;\r
+ Free(w->p->pin);\r
+ Free(w->p);\r
+ EndDialog(hWnd, true);\r
+ }\r
+ else\r
+ {\r
+ // 失敗\r
+ cached_pin_code_expires = 0;\r
+ EnableSecureDeviceWindowControls(hWnd, true);\r
+ FocusEx(hWnd, E_PIN);\r
+ MsgBox(hWnd, MB_ICONEXCLAMATION, w->p->ErrorMessage);\r
+ Free(w->p->pin);\r
+ Free(w->p->ErrorMessage);\r
+ Free(w->p);\r
+ }\r
+ }\r
+ break;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// WM_COMMAND を送信する\r
+void Command(HWND hWnd, UINT id)\r
+{\r
+ SendMessage(hWnd, WM_COMMAND, id, 0);\r
+}\r
+\r
+// セキュアデバイスウインドウを表示する\r
+bool SecureDeviceWindow(HWND hWnd, WINUI_SECURE_BATCH *batch, UINT num_batch, UINT device_id, UINT bitmap_id)\r
+{\r
+ SECURE_DEVICE_WINDOW w;\r
+ UINT i;\r
+ // 引数チェック\r
+ if (batch == NULL || num_batch == 0 || device_id == 0)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ // 成功フラグを初期化\r
+ for (i = 0;i < num_batch;i++)\r
+ {\r
+ batch[i].Succeed = false;\r
+ }\r
+\r
+ Zero(&w, sizeof(w));\r
+ w.batch = batch;\r
+ w.device_id = device_id;\r
+ w.num_batch = num_batch;\r
+ w.BitmapId = bitmap_id;\r
+\r
+ // ダイアログを開く\r
+ return (bool)Dialog(hWnd, D_SECURE, SecureDeviceWindowProc, &w);\r
+}\r
+\r
+// AVI を停止する\r
+void StopAvi(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Animate_Stop(DlgItem(hWnd, id));\r
+ Hide(hWnd, id);\r
+}\r
+\r
+// AVI を再生する\r
+void PlayAvi(HWND hWnd, UINT id, bool repeat)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Show(hWnd, id);\r
+ Animate_Play(DlgItem(hWnd, id), 0, -1, (repeat ? -1 : 0));\r
+}\r
+\r
+// AVI ファイルを閉じる\r
+void CloseAvi(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ StopAvi(hWnd, id);\r
+ Animate_Close(DlgItem(hWnd, id));\r
+}\r
+\r
+// AVI ファイルを開く\r
+void OpenAvi(HWND hWnd, UINT id, UINT avi_id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || avi_id == 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Hide(hWnd, id);\r
+ Animate_OpenEx(DlgItem(hWnd, id), hDll, MAKEINTRESOURCE(avi_id));\r
+}\r
+\r
+// フォントをコントロールに設定する\r
+void DlgFont(HWND hWnd, UINT id, UINT size, UINT bold)\r
+{\r
+ DIALOG_PARAM *param = (DIALOG_PARAM *)GetParam(hWnd);\r
+\r
+ if (param == NULL || param->meiryo == false)\r
+ {\r
+ SetFont(hWnd, id, Font(size, bold));\r
+ }\r
+ else\r
+ {\r
+ SetFont(hWnd, id, GetFont((_GETLANG() == 2 ? "Microsoft YaHei" : "Meiryo"), size, bold, false, false, false));\r
+ }\r
+}\r
+\r
+// 標準的なフォントを生成する\r
+HFONT Font(UINT size, UINT bold)\r
+{\r
+ return GetFont(NULL, size, bold, false, false, false);\r
+}\r
+\r
+// 内部管理用ダイアログプロシージャ\r
+UINT CALLBACK InternalDialogProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)\r
+{\r
+ DIALOG_PARAM *param = (DIALOG_PARAM *)GetParam(hWnd);\r
+ void *app_param = NULL;\r
+ bool white_flag = false;\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ if (msg == WM_INITDIALOG)\r
+ {\r
+ DoEvents(hWnd);\r
+ }\r
+\r
+ if (param == NULL)\r
+ {\r
+ if (msg == WM_INITDIALOG)\r
+ {\r
+ param = (void *)lParam;\r
+ InitDialogInternational(hWnd, param);\r
+ }\r
+ }\r
+ if (param != NULL)\r
+ {\r
+ app_param = param->param;\r
+ white_flag = param->white;\r
+ }\r
+\r
+ ret = DlgProc(hWnd, msg, wParam, lParam, white_flag);\r
+ if (ret != 0)\r
+ {\r
+ return ret;\r
+ }\r
+\r
+ ret = 0;\r
+\r
+ if (param != NULL)\r
+ {\r
+ if (param->proc != NULL)\r
+ {\r
+ ret = param->proc(hWnd, msg, wParam, lParam, app_param);\r
+ }\r
+ else\r
+ {\r
+ if (msg == WM_CLOSE)\r
+ {\r
+ EndDialog(hWnd, 0);\r
+ }\r
+ else if (msg == WM_COMMAND && (wParam == IDOK || wParam == IDCANCEL))\r
+ {\r
+ Close(hWnd);\r
+ }\r
+ }\r
+ }\r
+\r
+ if (msg == WM_INITDIALOG)\r
+ {\r
+ SetForegroundWindow(hWnd);\r
+ SetActiveWindow(hWnd);\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// ダイアログ ボックスを表示する\r
+UINT Dialog(HWND hWnd, UINT id, WINUI_DIALOG_PROC *proc, void *param)\r
+{\r
+ bool white = true;\r
+\r
+ return DialogEx(hWnd, id, proc, param, white);\r
+}\r
+UINT DialogEx(HWND hWnd, UINT id, WINUI_DIALOG_PROC *proc, void *param, bool white)\r
+{\r
+ return DialogEx2(hWnd, id, proc, param, white, false);\r
+}\r
+UINT DialogEx2(HWND hWnd, UINT id, WINUI_DIALOG_PROC *proc, void *param, bool white, bool meiryo)\r
+{\r
+ UINT ret;\r
+ DIALOG_PARAM p;\r
+ // 引数チェック\r
+ if (id == 0)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ Zero(&p, sizeof(p));\r
+ p.param = param;\r
+ p.white = white;\r
+ p.proc = proc;\r
+\r
+ if (MsIsVista())\r
+ {\r
+ p.meiryo = meiryo;\r
+ }\r
+\r
+ ret = DialogInternal(hWnd, id, InternalDialogProc, &p);\r
+\r
+ return ret;\r
+}\r
+\r
+// モードレスダイアログを作成する\r
+HWND DialogCreateEx(HWND hWnd, UINT id, WINUI_DIALOG_PROC *proc, void *param, bool white)\r
+{\r
+ HWND ret = NULL;\r
+ DIALOG_PARAM p;\r
+ // 引数チェック\r
+ if (id == 0)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ Zero(&p, sizeof(p));\r
+ p.param = param;\r
+ p.white = white;\r
+ p.proc = proc;\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ // Win9x\r
+ ret = CreateDialogParamA(hDll, MAKEINTRESOURCEA(id), hWnd,\r
+ (DLGPROC)proc, (LPARAM)param);\r
+ }\r
+ else\r
+ {\r
+ // WinNT\r
+ ret = CreateDialogParamW(hDll, MAKEINTRESOURCEW(id), hWnd,\r
+ (DLGPROC)proc, (LPARAM)param);\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// ビットマップをボタンに設定する\r
+void SetBitmap(HWND hWnd, UINT id, UINT bmp_id)\r
+{\r
+ HBITMAP bmp;\r
+ char *class_name;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ bmp = LoadImage(hDll, MAKEINTRESOURCE(bmp_id), IMAGE_BITMAP, 0, 0, (MsIsNt() ? LR_SHARED : 0) | LR_VGACOLOR);\r
+ if (bmp == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ class_name = GetClassA(hWnd, id);\r
+\r
+ if (StrCmpi(class_name, "Static") != 0)\r
+ {\r
+ SendMsg(hWnd, id, BM_SETIMAGE, IMAGE_BITMAP, (LPARAM)bmp);\r
+ }\r
+ else\r
+ {\r
+ SendMsg(hWnd, id, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)bmp);\r
+ }\r
+\r
+ Free(class_name);\r
+}\r
+\r
+// アイコンキャッシュの初期化\r
+void InitIconCache()\r
+{\r
+ if (icon_cache_list != NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ icon_cache_list = NewList(NULL);\r
+}\r
+\r
+// アイコンキャッシュの解放\r
+void FreeIconCache()\r
+{\r
+ UINT i;\r
+ if (icon_cache_list == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ for (i = 0;i < LIST_NUM(icon_cache_list);i++)\r
+ {\r
+ ICON_CACHE *c = LIST_DATA(icon_cache_list, i);\r
+ DestroyIcon(c->hIcon);\r
+ Free(c);\r
+ }\r
+\r
+ ReleaseList(icon_cache_list);\r
+ icon_cache_list = NULL;\r
+}\r
+\r
+// アイコン取得\r
+HICON LoadIconEx(UINT id, bool small_icon)\r
+{\r
+ HICON h = NULL;\r
+ UINT i;\r
+ if (icon_cache_list == NULL)\r
+ {\r
+ return small_icon == false ? LoadLargeIconInner(id) : LoadSmallIconInner(id);\r
+ }\r
+\r
+ LockList(icon_cache_list);\r
+ {\r
+ for (i = 0;i < LIST_NUM(icon_cache_list);i++)\r
+ {\r
+ ICON_CACHE *c = LIST_DATA(icon_cache_list, i);\r
+ if (c->id == id && c->small_icon == small_icon)\r
+ {\r
+ h = c->hIcon;\r
+ break;\r
+ }\r
+ }\r
+\r
+ if (h == NULL)\r
+ {\r
+ h = small_icon == false ? LoadLargeIconInner(id) : LoadSmallIconInner(id);\r
+ if (h != NULL)\r
+ {\r
+ ICON_CACHE *c = ZeroMalloc(sizeof(ICON_CACHE));\r
+ c->hIcon = h;\r
+ c->id = id;\r
+ c->small_icon = small_icon;\r
+ Add(icon_cache_list, c);\r
+ }\r
+ }\r
+ }\r
+ UnlockList(icon_cache_list);\r
+\r
+ return h;\r
+}\r
+\r
+// 大きいアイコン取得\r
+HICON LoadLargeIcon(UINT id)\r
+{\r
+ return LoadIconEx(id, false);\r
+}\r
+\r
+// 小さいアイコン取得\r
+HICON LoadSmallIcon(UINT id)\r
+{\r
+ return LoadIconEx(id, true);\r
+}\r
+\r
+// 大きいアイコンを取得する\r
+HICON LoadLargeIconInner(UINT id)\r
+{\r
+ HICON ret;\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 32, 32, 0);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 32, 32, LR_VGACOLOR);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, 0);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_VGACOLOR);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadIcon(hDll, MAKEINTRESOURCE(id));\r
+ }\r
+ }\r
+ }\r
+ }\r
+ return ret;\r
+}\r
+\r
+// 小さいアイコンを取得する\r
+HICON LoadSmallIconInner(UINT id)\r
+{\r
+ HICON ret;\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 16, 16, 0);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 16, 16, LR_VGACOLOR);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, 0);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadImage(hDll, MAKEINTRESOURCE(id), IMAGE_ICON, 0, 0, LR_VGACOLOR);\r
+ if (ret == NULL)\r
+ {\r
+ ret = LoadLargeIconInner(id);\r
+ }\r
+ }\r
+ }\r
+ }\r
+ return ret;\r
+}\r
+\r
+// アイコンをウインドウまたはボタンに設定する\r
+void SetIcon(HWND hWnd, UINT id, UINT icon_id)\r
+{\r
+ HICON icon1, icon2;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ icon1 = LoadLargeIcon(icon_id);\r
+ if (icon1 == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (id == 0)\r
+ {\r
+ SendMessage(hWnd, WM_SETICON, ICON_BIG, (LPARAM)icon1);\r
+ icon2 = LoadSmallIcon(icon_id);\r
+ if (icon2 == NULL)\r
+ {\r
+ icon2 = icon1;\r
+ }\r
+ SendMessage(hWnd, WM_SETICON, ICON_SMALL, (LPARAM)icon2);\r
+ }\r
+ else\r
+ {\r
+ bool is_btn = true;\r
+ wchar_t *s = GetClass(hWnd, id);\r
+ if (s != NULL)\r
+ {\r
+ if (UniStrCmpi(s, L"Static") == 0)\r
+ {\r
+ is_btn = false;\r
+ }\r
+ Free(s);\r
+ }\r
+\r
+ if (is_btn)\r
+ {\r
+ SendMsg(hWnd, id, BM_SETIMAGE, IMAGE_ICON, (LPARAM)icon1);\r
+ }\r
+ else\r
+ {\r
+ SendMsg(hWnd, id, STM_SETICON, (WPARAM)icon1, 0);\r
+ }\r
+ }\r
+}\r
+\r
+// ラジオボタンがチェックされているか確認する\r
+bool IsChecked(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ return IsDlgButtonChecked(hWnd, id) == BST_CHECKED ? true : false;\r
+}\r
+\r
+// ラジオボタンをチェック\r
+void Check(HWND hWnd, UINT id, bool b)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if ((!(!IsChecked(hWnd, id))) != (!(!b)))\r
+ {\r
+ CheckDlgButton(hWnd, id, b ? BST_CHECKED : BST_UNCHECKED);\r
+ }\r
+}\r
+\r
+// テキストボックスの文字サイズが指定されたサイズ以下であることを確認する\r
+bool CheckTextSize(HWND hWnd, UINT id, UINT size, bool unicode)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ if (GetTextSize(hWnd, id, unicode) <= size)\r
+ {\r
+ return true;\r
+ }\r
+ else\r
+ {\r
+ return false;\r
+ }\r
+}\r
+\r
+// テキストボックスに入っている文字列数が指定された文字列数以下であることを確認する\r
+bool CheckTextLen(HWND hWnd, UINT id, UINT len, bool unicode)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ if (GetTextLen(hWnd, id, unicode) <= len)\r
+ {\r
+ return true;\r
+ }\r
+ else\r
+ {\r
+ return false;\r
+ }\r
+}\r
+\r
+// テキストボックスに入力できる文字数を制限する\r
+void LimitText(HWND hWnd, UINT id, UINT count)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMsg(hWnd, id, EM_LIMITTEXT, count, 0);\r
+}\r
+\r
+// フォントの設定\r
+void SetFont(HWND hWnd, UINT id, HFONT hFont)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || hFont == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMessage(DlgItem(hWnd, id), WM_SETFONT, (WPARAM)hFont, true);\r
+}\r
+\r
+// フォントサイズの取得\r
+bool GetFontSize(HFONT hFont, UINT *x, UINT *y)\r
+{\r
+ bool ret = false;\r
+ UINT xx = 0;\r
+ UINT yy = 0;\r
+\r
+ // フォントハンドルを検索\r
+ LockList(font_list);\r
+ {\r
+ UINT i;\r
+\r
+ for (i = 0;i < LIST_NUM(font_list);i++)\r
+ {\r
+ FONT *f = LIST_DATA(font_list, i);\r
+\r
+ if (f->hFont == hFont)\r
+ {\r
+ xx = f->x;\r
+ yy = f->y;\r
+\r
+ ret = true;\r
+ break;\r
+ }\r
+ }\r
+ }\r
+ UnlockList(font_list);\r
+\r
+ if (ret == false)\r
+ {\r
+ ret = CalcFontSize(hFont, &xx, &yy);\r
+ }\r
+\r
+ if (xx == 0 || yy == 0)\r
+ {\r
+ xx = 8;\r
+ yy = 16;\r
+ }\r
+\r
+ if (x != NULL)\r
+ {\r
+ *x = xx;\r
+ }\r
+\r
+ if (y != NULL)\r
+ {\r
+ *y = yy;\r
+ }\r
+\r
+ return ret;\r
+}\r
+\r
+// フォントサイズの計算\r
+bool CalcFontSize(HFONT hFont, UINT *x, UINT *y)\r
+{\r
+ UINT xx = 0, yy = 0;\r
+ TEXTMETRIC tm;\r
+ SIZE sz;\r
+ bool ret = false;\r
+ HDC hDC;\r
+\r
+ hDC = CreateCompatibleDC(NULL);\r
+\r
+ SelectObject(hDC, hFont);\r
+\r
+ Zero(&tm, sizeof(tm));\r
+ Zero(&sz, sizeof(sz));\r
+\r
+ if (GetTextMetrics(hDC, &tm))\r
+ {\r
+ xx = tm.tmAveCharWidth;\r
+ yy = tm.tmHeight;\r
+\r
+ ret = true;\r
+\r
+ if (GetTextExtentPoint32(hDC,\r
+ "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz",\r
+ 52, &sz))\r
+ {\r
+ xx = (sz.cx / 26 + 1) / 2;\r
+ }\r
+ }\r
+\r
+ if (x != NULL)\r
+ {\r
+ *x = xx;\r
+ }\r
+\r
+ if (y != NULL)\r
+ {\r
+ *y = yy;\r
+ }\r
+\r
+ DeleteDC(hDC);\r
+\r
+ return ret;\r
+}\r
+\r
+// フォントの取得\r
+HFONT GetFont(char *name, UINT size, bool bold, bool italic, bool underline, bool strikeout)\r
+{\r
+ HFONT hFont;\r
+ HDC hDC;\r
+ // 引数チェック\r
+ if (name == NULL)\r
+ {\r
+ name = font_name;\r
+ }\r
+ if (size == 0)\r
+ {\r
+ size = font_size;\r
+ if (size == 0)\r
+ {\r
+ size = 9;\r
+ }\r
+ }\r
+\r
+ // 既存のフォントを探す\r
+ LockList(font_list);\r
+ {\r
+ FONT *f, t;\r
+ DWORD font_quality = ANTIALIASED_QUALITY;\r
+ OS_INFO *os = GetOsInfo();\r
+ UINT x = 0;\r
+ UINT y = 0;\r
+ int rotate = 0;\r
+\r
+ Zero(&t, sizeof(t));\r
+ t.Bold = bold;\r
+ t.Italic = italic;\r
+ t.Size = size;\r
+ t.StrikeOut = strikeout;\r
+ t.UnderLine = underline;\r
+ t.Name = CopyStr(name);\r
+ f = Search(font_list, &t);\r
+ Free(t.Name);\r
+\r
+ if (f != NULL)\r
+ {\r
+ // フォントを発見した\r
+ UnlockList(font_list);\r
+ return f->hFont;\r
+ }\r
+\r
+ // 新しいフォントを作成する\r
+ hDC = CreateCompatibleDC(NULL);\r
+\r
+ // Windows XP 以降では ClearType を指定する\r
+ if (OS_IS_WINDOWS_NT(os->OsType) && GET_KETA(os->OsType, 100) >= 3)\r
+ {\r
+ font_quality = CLEARTYPE_NATURAL_QUALITY;\r
+ rotate = 3600;\r
+ }\r
+\r
+ // フォント作成\r
+ hFont = CreateFontA(-MulDiv(size, GetDeviceCaps(hDC, LOGPIXELSY), 72),\r
+ 0, rotate, rotate, (bold == false ? 500 : FW_BOLD),\r
+ italic, underline, strikeout, DEFAULT_CHARSET, OUT_DEFAULT_PRECIS,\r
+ CLIP_DEFAULT_PRECIS, font_quality, DEFAULT_PITCH, name);\r
+\r
+ if (hFont == NULL)\r
+ {\r
+ // 失敗\r
+ DeleteDC(hDC);\r
+ UnlockList(font_list);\r
+\r
+ return NULL;\r
+ }\r
+\r
+ CalcFontSize(hFont, &x, &y);\r
+\r
+ // テーブルに追加\r
+ f = ZeroMalloc(sizeof(FONT));\r
+ f->Bold = bold;\r
+ f->hFont = hFont;\r
+ f->Italic = italic;\r
+ f->Name = CopyStr(name);\r
+ f->Size = size;\r
+ f->StrikeOut = strikeout;\r
+ f->UnderLine = underline;\r
+ f->x = x;\r
+ f->y = y;\r
+\r
+ Insert(font_list, f);\r
+\r
+ DeleteDC(hDC);\r
+ }\r
+ UnlockList(font_list);\r
+\r
+ return hFont;\r
+}\r
+\r
+// フォントの比較\r
+int CompareFont(void *p1, void *p2)\r
+{\r
+ FONT *f1, *f2;\r
+ UINT r;\r
+ if (p1 == NULL || p2 == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+ f1 = *(FONT **)p1;\r
+ f2 = *(FONT **)p2;\r
+ if (f1 == NULL || f2 == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+ r = StrCmpi(f1->Name, f2->Name);\r
+ if (r != 0)\r
+ {\r
+ return r;\r
+ }\r
+ else\r
+ {\r
+ if (f1->Bold > f2->Bold)\r
+ {\r
+ return 1;\r
+ }\r
+ else if (f1->Bold < f2->Bold)\r
+ {\r
+ return -1;\r
+ }\r
+ else if (f1->Italic > f2->Italic)\r
+ {\r
+ return 1;\r
+ }\r
+ else if (f1->Italic < f2->Italic)\r
+ {\r
+ return -1;\r
+ }\r
+ else if (f1->Size > f2->Size)\r
+ {\r
+ return 1;\r
+ }\r
+ else if (f1->Size < f2->Size)\r
+ {\r
+ return -1;\r
+ }\r
+ else if (f1->StrikeOut > f2->StrikeOut)\r
+ {\r
+ return 1;\r
+ }\r
+ else if (f1->StrikeOut < f2->StrikeOut)\r
+ {\r
+ return -1;\r
+ }\r
+ else if (f1->UnderLine > f2->UnderLine)\r
+ {\r
+ return 1;\r
+ }\r
+ else if (f1->UnderLine < f2->UnderLine)\r
+ {\r
+ return -1;\r
+ }\r
+ else\r
+ {\r
+ return 0;\r
+ }\r
+ }\r
+}\r
+\r
+// フォントの初期化\r
+void InitFont()\r
+{\r
+ if (font_list != NULL)\r
+ {\r
+ return;\r
+ }\r
+ font_list = NewList(CompareFont);\r
+}\r
+\r
+// フォントの解放\r
+void FreeFont()\r
+{\r
+ UINT i;\r
+ if (font_list == NULL)\r
+ {\r
+ return;\r
+ }\r
+ for (i = 0;i < LIST_NUM(font_list);i++)\r
+ {\r
+ FONT *f = LIST_DATA(font_list, i);\r
+ Free(f->Name);\r
+ DeleteObject((HGDIOBJ)f->hFont);\r
+ Free(f);\r
+ }\r
+ ReleaseList(font_list);\r
+ font_list = NULL;\r
+}\r
+\r
+// ウインドウを閉じるボタンを出す\r
+void EnableClose(HWND hWnd)\r
+{\r
+ HMENU h;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ h = GetSystemMenu(hWnd, false);\r
+ EnableMenuItem(h, SC_CLOSE, MF_ENABLED);\r
+ DrawMenuBar(hWnd);\r
+}\r
+\r
+// ウインドウを閉じるボタンを消す\r
+void DisableClose(HWND hWnd)\r
+{\r
+ HMENU h;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ h = GetSystemMenu(hWnd, false);\r
+ EnableMenuItem(h, SC_CLOSE, MF_GRAYED);\r
+ DrawMenuBar(hWnd);\r
+}\r
+\r
+// 親ウインドウの中央に移動する\r
+void CenterParent(HWND hWnd)\r
+{\r
+ RECT rp;\r
+ RECT r;\r
+ HWND hWndParent = GetParent(hWnd);\r
+ int win_x, win_y;\r
+ int x, y;\r
+\r
+ if (hWndParent == NULL || IsHide(hWndParent, 0) || IsIconic(hWndParent))\r
+ {\r
+ Center(hWnd);\r
+ return;\r
+ }\r
+\r
+ if (GetWindowRect(hWndParent, &rp) == false)\r
+ {\r
+ Center(hWnd);\r
+ return;\r
+ }\r
+\r
+ GetWindowRect(hWnd, &r);\r
+\r
+ win_x = r.right - r.left;\r
+ win_y = r.bottom - r.top;\r
+\r
+ x = (rp.right - rp.left - win_x) / 2 + rp.left;\r
+ y = (rp.bottom - rp.top - win_y) / 2 + rp.top;\r
+\r
+ x = MAX(x, 0);\r
+ y = MAX(y, 0);\r
+\r
+ SetWindowPos(hWnd, NULL, x, y, 0, 0, SWP_NOSIZE | SWP_NOACTIVATE);\r
+}\r
+\r
+// ウインドウを中央に移動する\r
+void Center(HWND hWnd)\r
+{\r
+ RECT screen;\r
+ RECT win;\r
+ UINT x, y;\r
+ UINT win_x, win_y;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (SystemParametersInfo(SPI_GETWORKAREA, 0, &screen, 0) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ GetWindowRect(hWnd, &win);\r
+ win_x = win.right - win.left;\r
+ win_y = win.bottom - win.top;\r
+\r
+ if (win_x < (UINT)(screen.right - screen.left))\r
+ {\r
+ x = (screen.right - screen.left - win_x) / 2;\r
+ }\r
+ else\r
+ {\r
+ x = 0;\r
+ }\r
+\r
+ if (win_y < (UINT)(screen.bottom - screen.top))\r
+ {\r
+ y = (screen.bottom - screen.top - win_y) / 2;\r
+ }\r
+ else\r
+ {\r
+ y = 0;\r
+ }\r
+\r
+ SetWindowPos(hWnd, NULL, x, y, 0, 0, SWP_NOSIZE | SWP_NOACTIVATE);\r
+}\r
+\r
+// ウインドウを中央に移動する 2\r
+void Center2(HWND hWnd)\r
+{\r
+ RECT screen;\r
+ RECT win;\r
+ UINT x, y;\r
+ UINT win_x, win_y;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (SystemParametersInfo(SPI_GETWORKAREA, 0, &screen, 0) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ GetWindowRect(hWnd, &win);\r
+ win_x = win.right - win.left;\r
+ win_y = win.bottom - win.top;\r
+\r
+ if (win_x < (UINT)(screen.right - screen.left))\r
+ {\r
+ x = (screen.right - screen.left - win_x) / 2;\r
+ }\r
+ else\r
+ {\r
+ x = 0;\r
+ }\r
+\r
+ if (win_y < (UINT)(screen.bottom - screen.top))\r
+ {\r
+ y = (screen.bottom - screen.top - win_y) / 4;\r
+ }\r
+ else\r
+ {\r
+ y = 0;\r
+ }\r
+\r
+ SetWindowPos(hWnd, NULL, x, y, 0, 0, SWP_NOSIZE | SWP_NOACTIVATE);\r
+}\r
+\r
+// モニタのサイズを取得する\r
+void GetMonitorSize(UINT *width, UINT *height)\r
+{\r
+ // 引数チェック\r
+ if (width == NULL || height == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ *width = GetSystemMetrics(SM_CXSCREEN);\r
+ *height = GetSystemMetrics(SM_CYSCREEN);\r
+}\r
+\r
+// ウインドウ内の文字列をフォーマットする\r
+void FormatText(HWND hWnd, UINT id, ...)\r
+{\r
+ va_list args;\r
+ wchar_t *buf;\r
+ UINT size;\r
+ wchar_t *str;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ str = GetText(hWnd, id);\r
+ if (str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ size = MAX(UniStrSize(str) * 10, MAX_SIZE * 10);\r
+ buf = MallocEx(size, true);\r
+\r
+ va_start(args, id);\r
+ UniFormatArgs(buf, size, str, args);\r
+\r
+ SetText(hWnd, id, buf);\r
+\r
+ Free(buf);\r
+\r
+ Free(str);\r
+ va_end(args);\r
+}\r
+void FormatTextA(HWND hWnd, UINT id, ...)\r
+{\r
+ va_list args;\r
+ char *buf;\r
+ UINT size;\r
+ char *str;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ str = GetTextA(hWnd, id);\r
+ if (str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ size = MAX(StrSize(str) * 10, MAX_SIZE * 10);\r
+ buf = MallocEx(size, true);\r
+\r
+ va_start(args, id);\r
+ FormatArgs(buf, size, str, args);\r
+\r
+ SetTextA(hWnd, id, buf);\r
+\r
+ Free(buf);\r
+\r
+ Free(str);\r
+ va_end(args);\r
+}\r
+\r
+// 可変長引数の文字列をウインドウに設定\r
+void SetTextEx(HWND hWnd, UINT id, wchar_t *str, ...)\r
+{\r
+ va_list args;\r
+ wchar_t *buf;\r
+ UINT size;\r
+ // 引数チェック\r
+ if (str == NULL || hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ size = MAX(UniStrSize(str) * 10, MAX_SIZE * 10);\r
+ buf = MallocEx(size, true);\r
+\r
+ va_start(args, str);\r
+ UniFormatArgs(buf, size, str, args);\r
+\r
+ SetText(hWnd, id, buf);\r
+\r
+ Free(buf);\r
+ va_end(args);\r
+}\r
+void SetTextExA(HWND hWnd, UINT id, char *str, ...)\r
+{\r
+ va_list args;\r
+ char *buf;\r
+ UINT size;\r
+ // 引数チェック\r
+ if (str == NULL || hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ size = MAX(StrSize(str) * 10, MAX_SIZE * 10);\r
+ buf = MallocEx(size, true);\r
+\r
+ va_start(args, str);\r
+ FormatArgs(buf, size, str, args);\r
+\r
+ SetTextA(hWnd, id, buf);\r
+\r
+ Free(buf);\r
+ va_end(args);\r
+}\r
+\r
+// 可変長メッセージボックスの表示\r
+UINT MsgBoxEx(HWND hWnd, UINT flag, wchar_t *msg, ...)\r
+{\r
+ va_list args;\r
+ wchar_t *buf;\r
+ UINT size;\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (msg == NULL)\r
+ {\r
+ msg = L"MessageBox";\r
+ }\r
+\r
+ size = MAX(UniStrSize(msg) * 10, MAX_SIZE * 10);\r
+ buf = MallocEx(size, true);\r
+\r
+ va_start(args, msg);\r
+ UniFormatArgs(buf, size, msg, args);\r
+\r
+ ret = MsgBox(hWnd, flag, buf);\r
+ Free(buf);\r
+ va_end(args);\r
+\r
+ return ret;\r
+}\r
+\r
+// メッセージボックスの表示\r
+UINT MsgBox(HWND hWnd, UINT flag, wchar_t *msg)\r
+{\r
+ UINT ret;\r
+ wchar_t *title;\r
+ // 引数チェック\r
+ if (msg == NULL)\r
+ {\r
+ msg = L"MessageBox";\r
+ }\r
+\r
+ if (title_bar != NULL)\r
+ {\r
+ title = CopyUniStr(title_bar);\r
+ }\r
+ else\r
+ {\r
+ title = CopyStrToUni(CEDAR_PRODUCT_STR);\r
+ }\r
+\r
+ if (hWnd)\r
+ {\r
+ // 親ウインドウが最上位ウインドウの場合はメッセージボックスも最上位にする\r
+ if (GetExStyle(hWnd, 0) & WS_EX_TOPMOST)\r
+ {\r
+ flag |= MB_SYSTEMMODAL;\r
+ }\r
+ }\r
+\r
+ ret = MessageBoxW(hWnd, msg, title, flag);\r
+\r
+ Free(title);\r
+\r
+ return ret;\r
+}\r
+\r
+// ダイアログの作成 (内部)\r
+UINT DialogInternal(HWND hWnd, UINT id, DIALOG_PROC *proc, void *param)\r
+{\r
+ // 引数チェック\r
+ if (proc == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ // Win9x\r
+ return (UINT)DialogBoxParam(hDll, MAKEINTRESOURCE(id), hWnd, (DLGPROC)proc, (LPARAM)param);\r
+ }\r
+ else\r
+ {\r
+ // WinNT\r
+ return (UINT)DialogBoxParamW(hDll, MAKEINTRESOURCEW(id), hWnd, (DLGPROC)proc, (LPARAM)param);\r
+ }\r
+}\r
+\r
+// システム設定が更新されたことを通知する\r
+void NoticeSettingChange()\r
+{\r
+ PostMessage(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0);\r
+ DoEvents(NULL);\r
+}\r
+\r
+// ウインドウを半透明にする\r
+void SetAplha(HWND hWnd, UINT value0_255)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ value0_255 = MAKESURE(value0_255, 0, 255);\r
+\r
+ if (true)\r
+ {\r
+ UINT os_type = GetOsInfo()->OsType;\r
+ if (OS_IS_WINDOWS_NT(os_type) && GET_KETA(os_type, 100) >= 2)\r
+ {\r
+ bool (WINAPI *_SetLayeredWindowAttributes)(HWND, COLORREF, BYTE, DWORD);\r
+ HINSTANCE hInst;\r
+\r
+ hInst = LoadLibrary("user32.dll");\r
+\r
+ _SetLayeredWindowAttributes =\r
+ (bool (__stdcall *)(HWND,COLORREF,BYTE,DWORD))\r
+ GetProcAddress(hInst, "SetLayeredWindowAttributes");\r
+\r
+ if (_SetLayeredWindowAttributes != NULL)\r
+ {\r
+ // Windows 2000 以降でのみ対応\r
+ SetExStyle(hWnd, 0, WS_EX_LAYERED);\r
+ _SetLayeredWindowAttributes(hWnd, 0, value0_255, LWA_ALPHA);\r
+ }\r
+\r
+ FreeLibrary(hInst);\r
+ }\r
+ }\r
+}\r
+\r
+// WinUi が管理するダイアログボックスプロシージャ\r
+UINT DlgProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam, bool white_color)\r
+{\r
+ void *param;\r
+ HWND hWndParent;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ switch (msg)\r
+ {\r
+ case WM_INITDIALOG:\r
+ param = (void *)lParam;\r
+ SetParam(hWnd, param);\r
+\r
+ // 親ウインドウが存在するかどうか調べる\r
+ hWndParent = GetParent(hWnd);\r
+ if (hWndParent == NULL || IsShow(hWndParent, 0) == false)\r
+ {\r
+ // 存在しない場合は中央に配置する\r
+ Center(hWnd);\r
+ }\r
+\r
+ if (UseAlpha)\r
+ {\r
+ SetAplha(hWnd, AlphaValue * 255 / 100);\r
+ }\r
+\r
+ break;\r
+ }\r
+\r
+ if (white_color)\r
+ {\r
+ if (IsNewStyleModeEnabled() == false)\r
+ {\r
+ switch (msg)\r
+ {\r
+ case WM_CTLCOLORBTN:\r
+ case WM_CTLCOLORDLG:\r
+ case WM_CTLCOLOREDIT:\r
+ case WM_CTLCOLORLISTBOX:\r
+ case WM_CTLCOLORMSGBOX:\r
+ case WM_CTLCOLORSCROLLBAR:\r
+ case WM_CTLCOLORSTATIC:\r
+ return (UINT)GetStockObject(WHITE_BRUSH);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ switch (msg)\r
+ {\r
+ case WM_CTLCOLORDLG:\r
+ // ダイアログの背景色\r
+ return (UINT)gdi_cache.BackgroundColorBrush;\r
+\r
+ case WM_CTLCOLORBTN:\r
+ // ボタンの背景色\r
+ SetTextColor((HDC)wParam, gdi_cache.ForegroundColor);\r
+ SetBkColor((HDC)wParam, gdi_cache.BackgroundColor);\r
+ return (UINT)gdi_cache.BackgroundColorBrush;\r
+\r
+ case WM_CTLCOLORSTATIC:\r
+ // ラベルの色\r
+ SetTextColor((HDC)wParam, gdi_cache.ForegroundColor);\r
+ SetBkColor((HDC)wParam, gdi_cache.BackgroundColor);\r
+ return (UINT)gdi_cache.BackgroundColorBrush;\r
+\r
+ case WM_CTLCOLOREDIT:\r
+ // エディットコントロールの色\r
+ return (UINT)gdi_cache.TextBoxBackgroundColorBrush;\r
+ }\r
+ }\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+// ダイアログボックスのパラメータの設定\r
+void SetParam(HWND hWnd, void *param)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowLongPtr(hWnd, DWLP_USER, (LONG_PTR)param);\r
+}\r
+\r
+// ダイアログボックスのパラメータの取得\r
+void *GetParam(HWND hWnd)\r
+{\r
+ void *ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ ret = (void *)GetWindowLongPtr(hWnd, DWLP_USER);\r
+ return ret;\r
+}\r
+\r
+// ウインドウを最前面でなくする\r
+void NoTop(HWND hWnd)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowPos(hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);\r
+}\r
+\r
+// ウインドウを最前面に表示する\r
+void Top(HWND hWnd)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowPos(hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);\r
+}\r
+\r
+// ウインドウを隠す\r
+void Hide(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (IsShow(hWnd, id))\r
+ {\r
+ ShowWindow(DlgItem(hWnd, id), SW_HIDE);\r
+ }\r
+}\r
+\r
+// ウインドウを表示する\r
+void Show(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (IsHide(hWnd, id))\r
+ {\r
+ ShowWindow(DlgItem(hWnd, id), SW_SHOW);\r
+ }\r
+}\r
+\r
+// 表示設定の変更\r
+void SetShow(HWND hWnd, UINT id, bool b)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (b)\r
+ {\r
+ Show(hWnd, id);\r
+ }\r
+ else\r
+ {\r
+ Hide(hWnd, id);\r
+ }\r
+}\r
+\r
+// ウインドウが表示されているかどうか取得する\r
+bool IsShow(HWND hWnd, UINT id)\r
+{\r
+ return IsHide(hWnd, id) ? false : true;\r
+}\r
+\r
+// ウインドウが隠れているかどうか取得する\r
+bool IsHide(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return true;\r
+ }\r
+\r
+ if (GetStyle(hWnd, id) & WS_VISIBLE)\r
+ {\r
+ return false;\r
+ }\r
+ else\r
+ {\r
+ return true;\r
+ }\r
+}\r
+\r
+// ウインドウスタイルを削除する\r
+void RemoveExStyle(HWND hWnd, UINT id, UINT style)\r
+{\r
+ UINT old;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ old = GetExStyle(hWnd, id);\r
+ if ((old & style) == 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowLong(DlgItem(hWnd, id), GWL_EXSTYLE, old & ~style);\r
+ Refresh(DlgItem(hWnd, id));\r
+}\r
+\r
+// ウインドウスタイルを設定する\r
+void SetExStyle(HWND hWnd, UINT id, UINT style)\r
+{\r
+ UINT old;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ old = GetExStyle(hWnd, id);\r
+ if (old & style)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowLong(DlgItem(hWnd, id), GWL_EXSTYLE, old | style);\r
+ Refresh(DlgItem(hWnd, id));\r
+}\r
+\r
+// ウインドウスタイルを取得する\r
+UINT GetExStyle(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ return GetWindowLong(DlgItem(hWnd, id), GWL_EXSTYLE);\r
+}\r
+\r
+// ウインドウスタイルを削除する\r
+void RemoveStyle(HWND hWnd, UINT id, UINT style)\r
+{\r
+ UINT old;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ old = GetStyle(hWnd, id);\r
+ if ((old & style) == 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowLong(DlgItem(hWnd, id), GWL_STYLE, old & ~style);\r
+ Refresh(DlgItem(hWnd, id));\r
+}\r
+\r
+// ウインドウスタイルを設定する\r
+void SetStyle(HWND hWnd, UINT id, UINT style)\r
+{\r
+ UINT old;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ old = GetStyle(hWnd, id);\r
+ if (old & style)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetWindowLong(DlgItem(hWnd, id), GWL_STYLE, old | style);\r
+ Refresh(DlgItem(hWnd, id));\r
+}\r
+\r
+// ウインドウスタイルを取得する\r
+UINT GetStyle(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ return GetWindowLong(DlgItem(hWnd, id), GWL_STYLE);\r
+}\r
+\r
+// テキストのバイト数を取得する\r
+UINT GetTextSize(HWND hWnd, UINT id, bool unicode)\r
+{\r
+ UINT len;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ len = GetTextLen(hWnd, id, unicode);\r
+\r
+ return len + (unicode ? 2 : 1);\r
+}\r
+\r
+// テキストの文字数を取得する\r
+UINT GetTextLen(HWND hWnd, UINT id, bool unicode)\r
+{\r
+ wchar_t *s;\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ s = GetText(hWnd, id);\r
+ if (s == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ if (unicode)\r
+ {\r
+ ret = UniStrLen(s);\r
+ }\r
+ else\r
+ {\r
+ char *tmp = CopyUniToStr(s);\r
+ ret = StrLen(tmp);\r
+ Free(tmp);\r
+ }\r
+\r
+ Free(s);\r
+\r
+ return ret;\r
+}\r
+\r
+// テキストが空白かどうかチェックする\r
+bool IsEmpty(HWND hWnd, UINT id)\r
+{\r
+ bool ret;\r
+ wchar_t *s;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return true;\r
+ }\r
+\r
+ s = GetText(hWnd, id);\r
+\r
+ UniTrim(s);\r
+ if (UniStrLen(s) == 0)\r
+ {\r
+ ret = true;\r
+ }\r
+ else\r
+ {\r
+ ret = false;\r
+ }\r
+\r
+ Free(s);\r
+\r
+ return ret;\r
+}\r
+\r
+// ウインドウクラスを取得する\r
+wchar_t *GetClass(HWND hWnd, UINT id)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ wchar_t *ret;\r
+ char *s;\r
+ s = GetClassA(hWnd, id);\r
+ ret = CopyStrToUni(s);\r
+ Free(s);\r
+ return ret;\r
+ }\r
+\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return CopyUniStr(L"");\r
+ }\r
+\r
+ GetClassNameW(DlgItem(hWnd, id), tmp, sizeof(tmp));\r
+\r
+ return UniCopyStr(tmp);\r
+}\r
+char *GetClassA(HWND hWnd, UINT id)\r
+{\r
+ char tmp[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return CopyStr("");\r
+ }\r
+\r
+ GetClassName(DlgItem(hWnd, id), tmp, sizeof(tmp));\r
+\r
+ return CopyStr(tmp);\r
+}\r
+\r
+// コントロールにメッセージを送信する\r
+UINT SendMsg(HWND hWnd, UINT id, UINT msg, WPARAM wParam, LPARAM lParam)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ if (MsIsNt())\r
+ {\r
+ return (UINT)SendMessageW(DlgItem(hWnd, id), msg, wParam, lParam);\r
+ }\r
+ else\r
+ {\r
+ return (UINT)SendMessageA(DlgItem(hWnd, id), msg, wParam, lParam);\r
+ }\r
+}\r
+\r
+// EDIT のテキストをすべて選択する\r
+void SelectEdit(HWND hWnd, UINT id)\r
+{\r
+ wchar_t *class_name;\r
+\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ class_name = GetClass(hWnd, id);\r
+\r
+ if (class_name != NULL)\r
+ {\r
+ if (UniStrCmpi(class_name, L"edit") == 0)\r
+ {\r
+ SendMsg(hWnd, id, EM_SETSEL, 0, -1);\r
+ }\r
+ Free(class_name);\r
+ }\r
+}\r
+\r
+// EDIT のテキストの選択を解除する\r
+void UnselectEdit(HWND hWnd, UINT id)\r
+{\r
+ wchar_t *class_name;\r
+\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ class_name = GetClass(hWnd, id);\r
+\r
+ if (class_name != NULL)\r
+ {\r
+ if (UniStrCmpi(class_name, L"edit") == 0)\r
+ {\r
+ SendMsg(hWnd, id, EM_SETSEL, -1, 0);\r
+ }\r
+ Free(class_name);\r
+ }\r
+}\r
+\r
+// EDIT にフォーカスを設定してすべて選択する\r
+void FocusEx(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (IsEnable(hWnd, id) == false || IsShow(hWnd, id) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SelectEdit(hWnd, id);\r
+\r
+ Focus(hWnd, id);\r
+}\r
+\r
+// 指定したウインドウがフォーカスを持っているかどうか取得する\r
+bool IsFocus(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ if (GetFocus() == DlgItem(hWnd, id))\r
+ {\r
+ return true;\r
+ }\r
+\r
+ return false;\r
+}\r
+\r
+// フォーカスを設定する\r
+void Focus(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (IsEnable(hWnd, id) == false || IsShow(hWnd, id) == false)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetFocus(DlgItem(hWnd, id));\r
+}\r
+\r
+// int 型の値を設定する\r
+void SetInt(HWND hWnd, UINT id, UINT value)\r
+{\r
+ wchar_t tmp[MAX_SIZE];\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ UniToStru(tmp, value);\r
+ SetText(hWnd, id, tmp);\r
+}\r
+void SetIntEx(HWND hWnd, UINT id, UINT value)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (value == 0)\r
+ {\r
+ // 0 の場合は空欄にする\r
+ SetText(hWnd, id, L"");\r
+ }\r
+ else\r
+ {\r
+ SetInt(hWnd, id, value);\r
+ }\r
+}\r
+\r
+// int 型の値を取得する\r
+UINT GetInt(HWND hWnd, UINT id)\r
+{\r
+ wchar_t *s;\r
+ UINT ret;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ s = GetText(hWnd, id);\r
+ if (s == NULL)\r
+ {\r
+ return 0;\r
+ }\r
+\r
+ ret = UniToInt(s);\r
+ Free(s);\r
+\r
+ return ret;\r
+}\r
+\r
+// ウインドウ表示を更新する\r
+void Refresh(HWND hWnd)\r
+{\r
+ HWND parent;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ DoEvents(hWnd);\r
+ UpdateWindow(hWnd);\r
+ DoEvents(hWnd);\r
+\r
+ parent = GetParent(hWnd);\r
+ if (parent != NULL)\r
+ {\r
+ Refresh(parent);\r
+ }\r
+}\r
+\r
+// イベントを処理する\r
+void DoEvents(HWND hWnd)\r
+{\r
+ MSG msg;\r
+\r
+ if (PeekMessage(&msg, hWnd, 0, 0, PM_REMOVE))\r
+ {\r
+ TranslateMessage(&msg);\r
+ DispatchMessage(&msg);\r
+ }\r
+ UpdateWindow(hWnd);\r
+\r
+ if (hWnd)\r
+ {\r
+ DoEvents(NULL);\r
+ }\r
+}\r
+\r
+// ウインドウを閉じる\r
+void Close(HWND hWnd)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SendMessage(hWnd, WM_CLOSE, 0, 0);\r
+}\r
+\r
+// ウインドウを無効にする\r
+void Disable(HWND hWnd, UINT id)\r
+{\r
+ SetEnable(hWnd, id, false);\r
+}\r
+\r
+// ウインドウを有効にする\r
+void Enable(HWND hWnd, UINT id)\r
+{\r
+ SetEnable(hWnd, id, true);\r
+}\r
+\r
+// ウインドウの有効状態を設定する\r
+void SetEnable(HWND hWnd, UINT id, bool b)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (b == false)\r
+ {\r
+ if (IsEnable(hWnd, id))\r
+ {\r
+ if (id != 0 && IsFocus(hWnd, id))\r
+ {\r
+ Focus(hWnd, IDCANCEL);\r
+ Focus(hWnd, IDOK);\r
+ }\r
+ EnableWindow(DlgItem(hWnd, id), false);\r
+ Refresh(DlgItem(hWnd, id));\r
+ }\r
+ }\r
+ else\r
+ {\r
+ if (IsDisable(hWnd, id))\r
+ {\r
+ EnableWindow(DlgItem(hWnd, id), true);\r
+ Refresh(DlgItem(hWnd, id));\r
+ }\r
+ }\r
+}\r
+\r
+// ウインドウが無効かどうか調べる\r
+bool IsDisable(HWND hWnd, UINT id)\r
+{\r
+ return IsEnable(hWnd, id) ? false : true;\r
+}\r
+\r
+// ウインドウが有効かどうか調べる\r
+bool IsEnable(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ return IsWindowEnabled(DlgItem(hWnd, id));\r
+}\r
+\r
+static LOCK *winui_debug_lock = NULL;\r
+\r
+// デバッグの初期化\r
+void WinUiDebugInit()\r
+{\r
+ winui_debug_lock = NewLock();\r
+}\r
+\r
+// デバッグの解放\r
+void WinUiDebugFree()\r
+{\r
+ DeleteLock(winui_debug_lock);\r
+}\r
+\r
+// デバッグファイルに文字列を書き込む\r
+void WinUiDebug(wchar_t *str)\r
+{\r
+ wchar_t tmp[1024];\r
+ char dtstr[256];\r
+ char *buf;\r
+ wchar_t exename[MAX_PATH];\r
+ UINT tid;\r
+ // 引数チェック\r
+ if (str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ tid = GetCurrentThreadId();\r
+\r
+ GetExeNameW(exename, sizeof(exename));\r
+ GetFileNameFromFilePathW(exename, sizeof(exename), exename);\r
+\r
+ GetDateTimeStrMilli64(dtstr, sizeof(dtstr), LocalTime64());\r
+\r
+ UniFormat(tmp, sizeof(tmp), L"[%S] (%s:%u) %s\r\n", dtstr, exename, tid, str);\r
+\r
+ buf = CopyUniToUtf(tmp);\r
+\r
+ Lock(winui_debug_lock);\r
+ {\r
+ IO *o = FileOpenEx(WINUI_DEBUG_TEXT, true, true);\r
+ if (o == NULL)\r
+ {\r
+ o = FileCreate(WINUI_DEBUG_TEXT);\r
+ }\r
+\r
+ if (o != NULL)\r
+ {\r
+ UINT size = FileSize(o);\r
+\r
+ FileSeek(o, FILE_BEGIN, size);\r
+\r
+ FileWrite(o, buf, StrLen(buf));\r
+ FileFlush(o);\r
+\r
+ FileClose(o);\r
+ }\r
+ }\r
+ Unlock(winui_debug_lock);\r
+\r
+ Free(buf);\r
+}\r
+\r
+\r
+// テキスト文字列の設定\r
+void SetText(HWND hWnd, UINT id, wchar_t *str)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetTextInner(hWnd, id, str);\r
+}\r
+void SetTextInner(HWND hWnd, UINT id, wchar_t *str)\r
+{\r
+ wchar_t *old;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ // 古い文字列を取得\r
+ old = GetText(hWnd, id);\r
+ if (UniStrCmp(str, old) == 0)\r
+ {\r
+ // 同一\r
+ Free(old);\r
+ return;\r
+ }\r
+\r
+ Free(old);\r
+\r
+ if (MsIsNt())\r
+ {\r
+ SetWindowTextW(DlgItem(hWnd, id), str);\r
+ }\r
+ else\r
+ {\r
+ char *tmp = CopyUniToStr(str);\r
+\r
+ if (MsIsNt() == false && StrLen(tmp) >= 32000)\r
+ {\r
+ // 32k 以下にきりつめる\r
+ tmp[32000] = 0;\r
+ }\r
+\r
+ SetWindowTextA(DlgItem(hWnd, id), tmp);\r
+ Free(tmp);\r
+ }\r
+\r
+ if (id != 0)\r
+ {\r
+ Refresh(DlgItem(hWnd, id));\r
+ }\r
+}\r
+void SetTextA(HWND hWnd, UINT id, char *str)\r
+{\r
+ wchar_t *s;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ s = CopyStrToUni(str);\r
+ if (s == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ SetText(hWnd, id, s);\r
+\r
+ Free(s);\r
+}\r
+\r
+// テキスト文字列をバッファへ取得\r
+bool GetTxt(HWND hWnd, UINT id, wchar_t *str, UINT size)\r
+{\r
+ wchar_t *s;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ s = GetText(hWnd, id);\r
+ if (s == NULL)\r
+ {\r
+ UniStrCpy(str, size, L"");\r
+ return false;\r
+ }\r
+\r
+ UniStrCpy(str, size, s);\r
+ Free(s);\r
+\r
+ return true;\r
+}\r
+bool GetTxtA(HWND hWnd, UINT id, char *str, UINT size)\r
+{\r
+ char *s;\r
+ // 引数チェック\r
+ if (hWnd == NULL || str == NULL)\r
+ {\r
+ return false;\r
+ }\r
+\r
+ s = GetTextA(hWnd, id);\r
+ if (s == NULL)\r
+ {\r
+ StrCpy(str, size, "");\r
+ return false;\r
+ }\r
+\r
+ StrCpy(str, size, s);\r
+ Free(s);\r
+\r
+ return true;\r
+}\r
+\r
+// テキスト文字列の取得\r
+wchar_t *GetText(HWND hWnd, UINT id)\r
+{\r
+ wchar_t *ret;\r
+ UINT size, len;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ if (MsIsNt() == false)\r
+ {\r
+ char *s = GetTextA(hWnd, id);\r
+ ret = CopyStrToUni(s);\r
+ Free(s);\r
+\r
+ return ret;\r
+ }\r
+\r
+ len = GetWindowTextLengthW(DlgItem(hWnd, id));\r
+ if (len == 0)\r
+ {\r
+ return CopyUniStr(L"");\r
+ }\r
+\r
+ size = (len + 1) * 2;\r
+ ret = ZeroMallocEx(size, true);\r
+\r
+ GetWindowTextW(DlgItem(hWnd, id), ret, size);\r
+\r
+ return ret;\r
+}\r
+char *GetTextA(HWND hWnd, UINT id)\r
+{\r
+ char *ret;\r
+ UINT size, len;\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ len = GetWindowTextLengthA(DlgItem(hWnd, id));\r
+ if (len == 0)\r
+ {\r
+ return CopyStr("");\r
+ }\r
+\r
+ size = len + 1;\r
+ ret = ZeroMallocEx(size, true);\r
+\r
+ GetWindowTextA(DlgItem(hWnd, id), ret, size);\r
+\r
+ return ret;\r
+}\r
+\r
+// ダイアログ内のアイテムの取得\r
+HWND DlgItem(HWND hWnd, UINT id)\r
+{\r
+ // 引数チェック\r
+ if (hWnd == NULL)\r
+ {\r
+ return NULL;\r
+ }\r
+\r
+ if (id == 0)\r
+ {\r
+ return hWnd;\r
+ }\r
+ else\r
+ {\r
+ return GetDlgItem(hWnd, id);\r
+ }\r
+}\r
+\r
+// タイトルの設定\r
+void SetWinUiTitle(wchar_t *title)\r
+{\r
+ // 引数チェック\r
+ if (title == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ Free(title_bar);\r
+ title_bar = CopyUniStr(title);\r
+}\r
+\r
+// WinUi の初期化\r
+void InitWinUi(wchar_t *software_name, char *font, UINT fontsize)\r
+{\r
+ if ((init_winui_counter++) != 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (hDll != NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ WinUiDebugInit();\r
+\r
+ if (MayaquaIsMinimalMode() == false)\r
+ {\r
+ if (Is64())\r
+ {\r
+ hDll = MsLoadLibraryAsDataFile(MsGetPenCoreDllFileName());\r
+ }\r
+ else\r
+ {\r
+ hDll = MsLoadLibrary(MsGetPenCoreDllFileName());\r
+ }\r
+\r
+ if (hDll == NULL)\r
+ {\r
+ Alert(PENCORE_DLL_NAME " not found. SoftEther UT-VPN couldn't start.\r\n\r\n"\r
+ "Please reinstall all files with SoftEther UT-VPN Installer.",\r
+ NULL);\r
+ exit(0);\r
+ }\r
+ }\r
+ else\r
+ {\r
+ hDll = LoadLibrary(MsGetExeFileName());\r
+\r
+ if (hDll == NULL)\r
+ {\r
+ Alert("MsLoadLibrary() Error.",\r
+ NULL);\r
+ exit(0);\r
+ }\r
+ }\r
+\r
+ if (software_name != NULL)\r
+ {\r
+ title_bar = CopyUniStr(software_name);\r
+ }\r
+ else\r
+ {\r
+ title_bar = CopyUniStr(L"SoftEther UT-VPN");\r
+ }\r
+\r
+ if (font != NULL)\r
+ {\r
+ font_name = CopyStr(font);\r
+ }\r
+ else\r
+ {\r
+ font_name = CopyStr(_SS("DEFAULT_FONT"));\r
+ }\r
+\r
+ if (fontsize != 0)\r
+ {\r
+ font_size = fontsize;\r
+ }\r
+ else\r
+ {\r
+ font_size = _II("DEFAULT_FONT_SIZE");\r
+ if (font_size == 0)\r
+ {\r
+ font_size = 9;\r
+ }\r
+ }\r
+\r
+ InitIconCache();\r
+\r
+ InitFont();\r
+\r
+ InitImageList();\r
+\r
+ InitGdiCache();\r
+\r
+ EnableNewStyleMode();\r
+}\r
+\r
+// WinUi の解放\r
+void FreeWinUi()\r
+{\r
+ if ((--init_winui_counter) != 0)\r
+ {\r
+ return;\r
+ }\r
+\r
+ if (hDll == NULL)\r
+ {\r
+ return;\r
+ }\r
+\r
+ FreeImageList();\r
+\r
+ FreeFont();\r
+\r
+ FreeIconCache();\r
+\r
+ FreeLibrary(hDll);\r
+ hDll = NULL;\r
+\r
+ Free(title_bar);\r
+ title_bar = NULL;\r
+\r
+ Free(font_name);\r
+ font_name = NULL;\r
+\r
+ WinUiDebugFree();\r
+}\r
+\r
+#endif // WIN32\r