xkeymacsdll/xkeymacsdll.cpp

   1 // xkeymacsdll.cpp : Defines the initialization routines for the DLL.\r
   2 //\r
   3 \r
   4 #include "stdafx.h"\r
   5 #include "resource.h"\r
   6 #include "Utils.h"\r
   7 #include "Commands.h"\r
   8 #include <afxdllx.h>\r
   9 #include <math.h>\r
  10 #include <Imm.h>\r
  11 #include <vector>\r
  12 \r
  13 #ifdef _DEBUG\r
  14 #define new DEBUG_NEW\r
  15 #undef THIS_FILE\r
  16 static char THIS_FILE[] = __FILE__;\r
  17 #endif\r
  18 \r
  19 struct Modifier {\r
  20         LPCTSTR name;\r
  21         int id;\r
  22 };\r
  23 \r
  24 static const Modifier Modifiers[] = {\r
  25 //      { _T("A-"), ALT },\r
  26         { _T("C-"), CONTROL},\r
  27 //      { _T("H-"), HYPER },\r
  28         { _T("M-"), META },\r
  29         { _T("S-"), SHIFT },\r
  30 //      { _T("s-"), SUPER },\r
  31         { _T("Ctrl+"), WIN_CTRL },\r
  32         { _T("Alt+"), WIN_ALT },\r
  33         { _T("Win+"), WIN_WIN },\r
  34 };\r
  35 static const int MAX_MODIFIER = _countof(Modifiers);\r
  36 \r
  37 static const KeyName KeyNames[] = {\r
  38 //      { VK_LBUTTON,           _T("mouse-1") },                                // does not work well\r
  39 //      { VK_RBUTTON,           _T("mouse-3") },                                // does not work well\r
  40         { VK_CANCEL,            _T("break") },\r
  41 //      { VK_MBUTTON,           _T("mouse-2") },                                // does not work well\r
  42         { VK_BACK,                      _T("backspace") },\r
  43         { VK_TAB,                       _T("tab") },\r
  44         { VK_RETURN,            _T("return") },\r
  45         { VK_CAPITAL,           _T("capslock") },\r
  46         { VK_KANA,                      _T("kana") },\r
  47         { VK_KANJI,                     _T("kanji") },\r
  48         { VK_ESCAPE,            _T("escape") },\r
  49         { VK_CONVERT,           _T("convert") },\r
  50         { VK_NONCONVERT,        _T("nonconvert") },\r
  51 //      { VK_SPACE,                     _T("SPC") },                                    // [? ]\r
  52         { VK_PRIOR,                     _T("prior") },\r
  53         { VK_NEXT,                      _T("next") },\r
  54         { VK_END,                       _T("end") },\r
  55         { VK_HOME,                      _T("home") },\r
  56         { VK_LEFT,                      _T("left") },\r
  57         { VK_UP,                        _T("up") },\r
  58         { VK_RIGHT,                     _T("right") },\r
  59         { VK_DOWN,                      _T("down") },\r
  60         { VK_SELECT,            _T("select") },\r
  61         { VK_PRINT,                     _T("print") },\r
  62         { VK_EXECUTE,           _T("execute") },\r
  63         { VK_SNAPSHOT,          _T("printscreen") },                    // work as print\r
  64         { VK_INSERT,            _T("insert") },\r
  65         { VK_DELETE,            _T("delete") },\r
  66         { VK_LWIN,                      _T("lwindow") },\r
  67         { VK_RWIN,                      _T("rwindow") },\r
  68         { VK_APPS,                      _T("apps") },\r
  69         { VK_SLEEP,                     _T("sleep") },\r
  70         { VK_NUMPAD0,           _T("kp-0") },\r
  71         { VK_NUMPAD1,           _T("kp-1") },\r
  72         { VK_NUMPAD2,           _T("kp-2") },\r
  73         { VK_NUMPAD3,           _T("kp-3") },\r
  74         { VK_NUMPAD4,           _T("kp-4") },\r
  75         { VK_NUMPAD5,           _T("kp-5") },\r
  76         { VK_NUMPAD6,           _T("kp-6") },\r
  77         { VK_NUMPAD7,           _T("kp-7") },\r
  78         { VK_NUMPAD8,           _T("kp-8") },\r
  79         { VK_NUMPAD9,           _T("kp-9") },\r
  80         { VK_MULTIPLY,          _T("kp-multiply") },\r
  81         { VK_ADD,                       _T("kp-add") },\r
  82         { VK_SUBTRACT,          _T("kp-subtract") },\r
  83         { VK_DECIMAL,           _T("kp-decimal") },\r
  84         { VK_DIVIDE,            _T("kp-divide") },\r
  85 //      { VK_F1,                        _T("f1") },                                             // FIXME\r
  86 //      { VK_F2,                        _T("f2") },                                             // Move at the end of definition of function keys to keep away confliction f1/f2 and f1?/f2? by _tcsncmp() i.e. strncmp()\r
  87         { VK_F3,                        _T("f3") },\r
  88         { VK_F4,                        _T("f4") },\r
  89         { VK_F5,                        _T("f5") },\r
  90         { VK_F6,                        _T("f6") },\r
  91         { VK_F7,                        _T("f7") },\r
  92         { VK_F8,                        _T("f8") },\r
  93         { VK_F9,                        _T("f9") },\r
  94         { VK_F10,                       _T("f10") },\r
  95         { VK_F11,                       _T("f11") },\r
  96         { VK_F12,                       _T("f12") },\r
  97         { VK_F13,                       _T("f13") },\r
  98         { VK_F14,                       _T("f14") },\r
  99         { VK_F15,                       _T("f15") },\r
 100         { VK_F16,                       _T("f16") },\r
 101         { VK_F17,                       _T("f17") },\r
 102         { VK_F18,                       _T("f18") },\r
 103         { VK_F19,                       _T("f19") },\r
 104         { VK_F20,                       _T("f20") },\r
 105         { VK_F21,                       _T("f21") },\r
 106         { VK_F22,                       _T("f22") },\r
 107         { VK_F23,                       _T("f23") },\r
 108         { VK_F24,                       _T("f24") },\r
 109         { VK_F1,                        _T("f1") },\r
 110         { VK_F2,                        _T("f2") },\r
 111         { VK_NUMLOCK,           _T("kp-numlock") },\r
 112         { VK_SCROLL,            _T("scroll") },\r
 113         { 0xa6,                         _T("browser-back") },                   // VK_BROWSER_BACK\r
 114         { 0xa7,                         _T("browser-forward") },                // VK_BROWSER_FORWARD\r
 115         { 0xa8,                         _T("browser-refresh") },                // VK_BROWSER_REFRESH\r
 116         { 0xa9,                         _T("browser-stop") },                   // VK_BROWSER_STOP\r
 117         { 0xaa,                         _T("browser-search") },                 // VK_BROWSER_SEARCH\r
 118         { 0xab,                         _T("browser-favorites") },              // VK_BROWSER_FAVORITES\r
 119         { 0xac,                         _T("browser-home") },                   // VK_BROWSER_HOME\r
 120         { 0xad,                         _T("volume-mute") },                    // VK_VOLUME_MUTE\r
 121         { 0xae,                         _T("volume-down") },                    // VK_VOLUME_DOWN\r
 122         { 0xaf,                         _T("volume-up") },                              // VK_VOLUME_UP\r
 123         { 0xb0,                         _T("media-next-track") },               // VK_MEDIA_NEXT_TRACK\r
 124         { 0xb1,                         _T("media-prev-track") },               // VK_MEDIA_PREV_TRACK\r
 125         { 0xb2,                         _T("media-stop") },                             // VK_MEDIA_STOP\r
 126         { 0xb3,                         _T("media-play-pause") },               // VK_MEDIA_PLAY_PAUSE\r
 127         { 0xb4,                         _T("launch-mail") },                    // VK_LAUNCH_MAIL\r
 128         { 0xb5,                         _T("launch-media-select") },    // VK_LAUNCH_MEDIA_SELECT\r
 129         { 0xb6,                         _T("launch-1") },                               // VK_LAUNCH_APP1\r
 130         { 0xb7,                         _T("launch-2") },                               // VK_LAUNCH_APP2\r
 131 };\r
 132 static const int MAX_KEYNAME = _countof(KeyNames);\r
 133 \r
 134 static AFX_EXTENSION_MODULE XkeymacsdllDLL = { NULL, NULL };\r
 135 \r
 136 static HINSTANCE g_hDllInst = NULL;\r
 137 static DWORD g_TlsIndex = NULL;\r
 138 \r
 139 extern "C" int APIENTRY\r
 140 DllMain(HINSTANCE hInstance, DWORD dwReason, LPVOID lpReserved)\r
 141 {\r
 142         g_hDllInst = hInstance;\r
 143         LPVOID lpData;\r
 144         \r
 145         // Remove this if you use lpReserved\r
 146         UNREFERENCED_PARAMETER(lpReserved);\r
 147 \r
 148         switch (dwReason) {\r
 149         case DLL_PROCESS_ATTACH:\r
 150                 TRACE0("XKEYMACSDLL.DLL Initializing!\n");\r
 151 \r
 152                 // Extension DLL one-time initialization\r
 153                 if (!AfxInitExtensionModule(XkeymacsdllDLL, hInstance)) {\r
 154                         return 0;\r
 155                 }\r
 156 \r
 157                 // Insert this DLL into the resource chain\r
 158                 // NOTE: If this Extension DLL is being implicitly linked to by\r
 159                 //  an MFC Regular DLL (such as an ActiveX Control)\r
 160                 //  instead of an MFC application, then you will want to\r
 161                 //  remove this line from DllMain and put it in a separate\r
 162                 //  function exported from this Extension DLL.  The Regular DLL\r
 163                 //  that uses this Extension DLL should then explicitly call that\r
 164                 //  function to initialize this Extension DLL.  Otherwise,\r
 165                 //  the CDynLinkLibrary object will not be attached to the\r
 166                 //  Regular DLL's resource chain, and serious problems will\r
 167                 //  result.\r
 168 \r
 169                 try {\r
 170                         new CDynLinkLibrary(XkeymacsdllDLL);\r
 171                 }\r
 172                 catch (CMemoryException* e) {\r
 173                         e->Delete();\r
 174 //                      CUtils::Log("DllMain: 'new' threw an exception");\r
 175                 }\r
 176 \r
 177                 if ((g_TlsIndex = TlsAlloc()) == TLS_OUT_OF_INDEXES)\r
 178                         return FALSE;\r
 179                 // fall through\r
 180         case DLL_THREAD_ATTACH:\r
 181                 if ((lpData = LocalAlloc(LPTR, sizeof(HHOOK))) != NULL)\r
 182                         TlsSetValue(g_TlsIndex, lpData);\r
 183                 break;\r
 184         case DLL_PROCESS_DETACH:\r
 185                 TRACE0("XKEYMACSDLL.DLL Terminating!\n");\r
 186                 // Terminate the library before destructors are called\r
 187                 AfxTermExtensionModule(XkeymacsdllDLL);\r
 188                 CXkeymacsDll::ReleaseKeyboardHook();\r
 189                 if ((lpData = TlsGetValue(g_TlsIndex)) != NULL)\r
 190                         LocalFree(lpData);\r
 191                 TlsFree(g_TlsIndex);\r
 192                 break;\r
 193         case DLL_THREAD_DETACH:\r
 194                 CXkeymacsDll::ReleaseKeyboardHook();\r
 195                 if ((lpData = TlsGetValue(g_TlsIndex)) != NULL)\r
 196                         LocalFree(lpData);\r
 197                 break;\r
 198         }\r
 199         return 1;   // ok\r
 200 }\r
 201 \r
 202 //////////////////////////////////////////////////////////////////////\r
 203 // CXkeymacsDll Class\r
 204 //////////////////////////////////////////////////////////////////////\r
 205 \r
 206 #include "xkeymacsDll.h"\r
 207 #pragma data_seg(".xkmcs")\r
 208         bool    CXkeymacsDll::m_bEnableKeyboardHook = false;\r
 209         DWORD   CXkeymacsDll::m_nHookAltRelease = 0;\r
 210         BOOL    CXkeymacsDll::m_bRightControl   = FALSE;\r
 211         BOOL    CXkeymacsDll::m_bRightAlt               = FALSE;\r
 212         BOOL    CXkeymacsDll::m_bRightShift             = FALSE;\r
 213         BOOL    CXkeymacsDll::m_bHook                   = TRUE;\r
 214         CList<CClipboardSnap *, CClipboardSnap *> CXkeymacsDll::m_oKillRing;\r
 215         int             CXkeymacsDll::m_nKillRing = 0;\r
 216         BYTE    CXkeymacsDll::m_nOriginal[MAX_COMMAND_TYPE][MAX_KEY] = {'\0'};\r
 217         int             CXkeymacsDll::m_nAppID = 0;\r
 218         int             CXkeymacsDll::m_nAccelerate = 0;\r
 219         int             CXkeymacsDll::m_nKeyboardSpeed = 31;\r
 220         HCURSOR CXkeymacsDll::m_hCursor[MAX_STATUS] = {'\0'};\r
 221         HCURSOR CXkeymacsDll::m_hCurrentCursor = NULL;\r
 222         BOOL    CXkeymacsDll::m_bCursor = FALSE;\r
 223         TCHAR   CXkeymacsDll::m_M_xTip[128] = "";\r
 224         CONFIG  CXkeymacsDll::m_Config = {0};\r
 225 #pragma data_seg()\r
 226 HHOOK CXkeymacsDll::m_hHookCallWnd = NULL;\r
 227 HHOOK CXkeymacsDll::m_hHookCallWndRet = NULL;\r
 228 HHOOK CXkeymacsDll::m_hHookGetMessage = NULL;\r
 229 HHOOK CXkeymacsDll::m_hHookShell = NULL;\r
 230 BOOL CXkeymacsDll::m_bRecordingMacro = FALSE;\r
 231 BOOL CXkeymacsDll::m_bDown[MAX_KEY] = {0};\r
 232 std::list<KbdMacro> CXkeymacsDll::m_Macro;\r
 233 \r
 234 BOOL CXkeymacsDll::SaveConfig()\r
 235 {\r
 236         TCHAR szTmp[MAX_PATH];\r
 237         if (!GetTempPath(MAX_PATH, szTmp))\r
 238                 return FALSE;\r
 239         if (_tmakepath_s(szTmp, NULL, szTmp, _T("xkeymacs"), _T("tmp")))\r
 240                 return FALSE;\r
 241         HANDLE hFile = CreateFile(szTmp, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);\r
 242         if (hFile == INVALID_HANDLE_VALUE)\r
 243                 return FALSE;\r
 244         DWORD written;\r
 245         BOOL res = WriteFile(hFile, &m_Config, sizeof(m_Config), &written, NULL) || written != sizeof(m_Config);\r
 246         CloseHandle(hFile);\r
 247         return res;\r
 248 }\r
 249 \r
 250 BOOL CXkeymacsDll::LoadConfig()\r
 251 {\r
 252         TCHAR szTmp[MAX_PATH];\r
 253         if (!GetTempPath(MAX_PATH, szTmp))\r
 254                 return FALSE;\r
 255         if (_tmakepath_s(szTmp, NULL, szTmp, _T("xkeymacs"), _T("tmp")))\r
 256                 return FALSE;\r
 257         HANDLE hFile = CreateFile(szTmp, GENERIC_READ, 0, NULL, OPEN_EXISTING, 0, NULL);\r
 258         if (hFile == INVALID_HANDLE_VALUE)\r
 259                 return FALSE;\r
 260         DWORD read;\r
 261         BOOL res = ReadFile(hFile, &m_Config, sizeof(m_Config), &read, NULL) && read == sizeof(m_Config);\r
 262         CloseHandle(hFile);\r
 263         return res;\r
 264 }\r
 265 \r
 266 void CXkeymacsDll::SetConfig(const CONFIG& config)\r
 267 {\r
 268         m_Config = config;\r
 269 }\r
 270 \r
 271 void CXkeymacsDll::SetHooks()\r
 272 {\r
 273         m_hHookCallWnd = SetWindowsHookEx(WH_CALLWNDPROC, CallWndProc, g_hDllInst, 0);\r
 274         m_hHookCallWndRet = SetWindowsHookEx(WH_CALLWNDPROCRET, CallWndRetProc, g_hDllInst, 0);\r
 275         m_hHookGetMessage = SetWindowsHookEx(WH_GETMESSAGE, GetMsgProc, g_hDllInst, 0);\r
 276         m_hHookShell = SetWindowsHookEx(WH_SHELL, ShellProc, g_hDllInst, 0);\r
 277         m_bEnableKeyboardHook = true;\r
 278 }\r
 279 \r
 280 void CXkeymacsDll::SetKeyboardHook()\r
 281 {\r
 282         LPVOID lpData = TlsGetValue(g_TlsIndex);\r
 283         if (!lpData) {\r
 284                 lpData = LocalAlloc(LPTR, sizeof(HHOOK));\r
 285                 if (!lpData)\r
 286                         return;\r
 287                 if (!TlsSetValue(g_TlsIndex, lpData))\r
 288                         return;\r
 289         }\r
 290         HHOOK *phHook = reinterpret_cast<HHOOK *>(lpData);\r
 291         if (!*phHook)\r
 292                 *phHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC)KeyboardProc, g_hDllInst, GetCurrentThreadId());\r
 293 }\r
 294 \r
 295 inline void unhook(HHOOK &hh)\r
 296 {\r
 297         if (hh)\r
 298                 UnhookWindowsHookEx(hh);\r
 299         hh = NULL;\r
 300 }\r
 301 \r
 302 void CXkeymacsDll::ResetHooks() \r
 303 {\r
 304         ReleaseHooks();\r
 305         SetHooks();\r
 306 }\r
 307 \r
 308 void CXkeymacsDll::ReleaseHooks()\r
 309 {\r
 310         unhook(m_hHookCallWnd);\r
 311         unhook(m_hHookCallWndRet);\r
 312         unhook(m_hHookGetMessage);\r
 313         unhook(m_hHookShell);\r
 314         m_bEnableKeyboardHook = false;\r
 315 }\r
 316 \r
 317 void CXkeymacsDll::ReleaseKeyboardHook()\r
 318 {\r
 319         HHOOK *phHook = reinterpret_cast<HHOOK *>(TlsGetValue(g_TlsIndex));\r
 320         if (phHook)\r
 321                 unhook(*phHook);\r
 322 }\r
 323 \r
 324 void CXkeymacsDll::ToggleKeyboardHookState()\r
 325 {\r
 326         m_bHook = !m_bHook;\r
 327         ShowKeyboardHookState();\r
 328 }\r
 329 \r
 330 void CXkeymacsDll::ShowKeyboardHookState()\r
 331 {\r
 332         ICONMSG msg = {MAIN_ICON,};\r
 333         if (m_bHook) {\r
 334                 if (CCommands::IsTemporarilyDisableXKeymacs()) {\r
 335                         msg.nState = STATUS_DISABLE_TMP;\r
 336                         m_hCurrentCursor = m_hCursor[STATUS_DISABLE_TMP];\r
 337                 } else {\r
 338                         msg.nState = STATUS_ENABLE;\r
 339                         m_hCurrentCursor = m_hCursor[STATUS_ENABLE];\r
 340                 }\r
 341         } else {\r
 342                 msg.nState = STATUS_DISABLE_WOCQ;\r
 343         }\r
 344         if (m_Config.nSettingStyle[m_nAppID] == SETTING_DISABLE\r
 345          || (!_tcsicmp(m_Config.szSpecialApp[m_nAppID], _T("Default"))\r
 346           && CUtils::IsDefaultIgnoreApplication())) {\r
 347                 msg.nState = STATUS_DISABLE;\r
 348                 m_hCurrentCursor = m_hCursor[STATUS_DISABLE];\r
 349         }\r
 350         SendIconMessage(&msg, 1);\r
 351         DoSetCursor();\r
 352 }\r
 353 \r
 354 BOOL CXkeymacsDll::IsKeyboardHook()\r
 355 {\r
 356         return m_bHook;\r
 357 }\r
 358 \r
 359 LRESULT CALLBACK CXkeymacsDll::CallWndProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 360 {\r
 361         SetKeyboardHook();\r
 362         if (nCode >= 0) {\r
 363                 const CWPSTRUCT *cwps = reinterpret_cast<CWPSTRUCT *>(lParam);\r
 364                 switch (cwps->message) {\r
 365                 case WM_IME_STARTCOMPOSITION:\r
 366                         InitKeyboardProc(TRUE);\r
 367                         break;\r
 368                 case WM_IME_ENDCOMPOSITION:\r
 369                         InitKeyboardProc(FALSE);\r
 370                         break;\r
 371                 case WM_SETFOCUS:\r
 372                         if (cwps->hwnd == GetForegroundWindow()) {\r
 373                                 InitKeyboardProc(FALSE);\r
 374                                 ShowKeyboardHookState();\r
 375                         }\r
 376                         break;\r
 377                 case WM_NCACTIVATE:\r
 378                         if (cwps->wParam && cwps->hwnd == GetForegroundWindow()) {\r
 379                                 InitKeyboardProc(FALSE);\r
 380                                 ShowKeyboardHookState();\r
 381                         }\r
 382                         break;\r
 383                 }\r
 384         }\r
 385         return CallNextHookEx(NULL, nCode, wParam, lParam);\r
 386 }\r
 387 \r
 388 LRESULT CALLBACK CXkeymacsDll::CallWndRetProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 389 {\r
 390         SetKeyboardHook();\r
 391         if (nCode >= 0) {\r
 392                 const CWPRETSTRUCT *cwprets = reinterpret_cast<CWPRETSTRUCT *>(lParam);\r
 393                 switch (cwprets->message) {\r
 394                 case WM_SETTEXT:\r
 395                         if (cwprets->hwnd == GetForegroundWindow())\r
 396                                 InitKeyboardProc(FALSE);\r
 397                         break;\r
 398                 case WM_SETCURSOR:\r
 399                         DoSetCursor();\r
 400                         break;\r
 401                 }\r
 402         }\r
 403         return CallNextHookEx(NULL, nCode, wParam, lParam);\r
 404 }\r
 405 \r
 406 LRESULT CALLBACK CXkeymacsDll::GetMsgProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 407 {\r
 408         SetKeyboardHook();\r
 409         if (nCode >= 0) {\r
 410                 const MSG *msg = reinterpret_cast<MSG *>(lParam);\r
 411                 switch (msg->message) {\r
 412                 case WM_IME_STARTCOMPOSITION:\r
 413                         InitKeyboardProc(TRUE);\r
 414                         break;\r
 415                 case WM_IME_ENDCOMPOSITION:\r
 416                         InitKeyboardProc(FALSE);\r
 417                         break;\r
 418                 }\r
 419         }\r
 420         return CallNextHookEx(NULL, nCode, wParam, lParam);\r
 421 }\r
 422 \r
 423 LRESULT CALLBACK CXkeymacsDll::ShellProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 424 {\r
 425         if (nCode == HSHELL_WINDOWACTIVATED) {\r
 426                 TCHAR className[256];\r
 427                 GetClassName((HWND)wParam, className, 255);\r
 428                 if (!_tcsicmp(className, _T("ConsoleWindowClass"))) {\r
 429                         InitKeyboardProc(FALSE);\r
 430                         ShowKeyboardHookState();\r
 431                 }\r
 432         }\r
 433         return CallNextHookEx(NULL, nCode, wParam, lParam);\r
 434 }\r
 435 \r
 436 UINT CXkeymacsDll::GetModifierState(BOOL bPhysicalKey)\r
 437 {\r
 438         UINT result = 0;\r
 439         if (IsDown(VK_SHIFT, bPhysicalKey))\r
 440                 result |= SHIFT;\r
 441         if (IsDown(VK_CONTROL, bPhysicalKey))\r
 442                 result |= CONTROL;\r
 443         if (IsDown(VK_MENU, bPhysicalKey))\r
 444                 result |= META;\r
 445         return result;\r
 446 }\r
 447 \r
 448 void CXkeymacsDll::SetModifierState(const UINT after, const UINT before)\r
 449 {\r
 450         if (after & SHIFT && !(before & SHIFT))\r
 451                 DepressKey(VK_SHIFT);\r
 452         else if (!(after & SHIFT) && before & SHIFT)\r
 453                 ReleaseKey(VK_SHIFT);\r
 454 \r
 455         if (after & CONTROL && !(before & CONTROL)) {\r
 456                 UpdateKeyboardState(VK_CONTROL, 1);\r
 457                 DepressKey(VK_CONTROL);\r
 458         } else if (!(after & CONTROL) && before & CONTROL) {\r
 459                 ReleaseKey(VK_CONTROL);\r
 460                 UpdateKeyboardState(VK_CONTROL, 0);\r
 461         }\r
 462 \r
 463         const BOOL bHookApp =\r
 464                 CUtils::IsVisualCpp() ||  CUtils::IsVisualStudio() ||\r
 465                 CUtils::IsInternetExplorer() || CUtils::IsFirefox() || CUtils::IsChrome();\r
 466         if (after & META && !(before & META)) {\r
 467                 if (bHookApp)\r
 468                         m_nHookAltRelease |= HOOK_ALT_LATER;\r
 469                 DepressKey(VK_MENU);\r
 470         } else if (!(after & META) && before & META) {\r
 471                 if (bHookApp)\r
 472                         ++m_nHookAltRelease;\r
 473                 ReleaseKey(VK_MENU);\r
 474         }\r
 475 }\r
 476 \r
 477 BOOL CXkeymacsDll::UpdateKeyboardState(BYTE bVk, BYTE bState)\r
 478 {\r
 479         BYTE ks[256] = {'\0'};\r
 480         if (!GetKeyboardState(ks))\r
 481                 return FALSE;\r
 482         ks[bVk] = bState;\r
 483         return SetKeyboardState(ks);\r
 484 }\r
 485 \r
 486 BOOL CXkeymacsDll::IsDown(BYTE bVk, BOOL bPhysicalKey)\r
 487 {\r
 488         return bPhysicalKey ? GetAsyncKeyState(bVk) < 0 : GetKeyState(bVk) < 0;\r
 489 }\r
 490 \r
 491 // Do keybd_event\r
 492 void CXkeymacsDll::DoKeybd_event(BYTE bVk, DWORD dwFlags)\r
 493 {\r
 494         // Set KEYEVENTF_EXTENDEDKEY if needed\r
 495         switch (bVk) {\r
 496         case VK_CONTROL:\r
 497                 if (m_bRightControl)\r
 498                         dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 499                 break;\r
 500 \r
 501         case VK_MENU:\r
 502                 if (m_bRightAlt)\r
 503                         dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 504                 break;\r
 505 \r
 506         case VK_SHIFT:\r
 507                 if (m_bRightShift) {\r
 508                         if (CUtils::IsXPorLater())\r
 509                                 bVk = VK_RSHIFT;\r
 510                         else\r
 511                                 dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 512                 }\r
 513                 break;\r
 514         case VK_PAUSE:\r
 515                 if (IsDown(VK_CONTROL, FALSE)) // Break\r
 516                         dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 517                 break;\r
 518         case VK_INSERT:\r
 519         case VK_DELETE:\r
 520         case VK_HOME:\r
 521         case VK_END:\r
 522         case VK_NEXT:\r
 523         case VK_PRIOR:\r
 524         case VK_UP:\r
 525         case VK_DOWN:\r
 526         case VK_RIGHT:\r
 527         case VK_LEFT:\r
 528         case VK_NUMLOCK:\r
 529         case VK_PRINT:\r
 530                 dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 531                 break;\r
 532         }\r
 533 //      CUtils::Log(_T("b: %x, %x, %x, %#hx, %#hx"), bVk, dwFlags, GetMessageExtraInfo(), GetKeyState(bVk), GetAsyncKeyState(bVk));\r
 534         keybd_event(bVk, 0, dwFlags, GetMessageExtraInfo());\r
 535 //      CUtils::Log(_T("a: %x, %x, %x, %#hx, %#hx"), bVk, dwFlags, GetMessageExtraInfo(), GetKeyState(bVk), GetAsyncKeyState(bVk));\r
 536 }\r
 537 \r
 538 // the key is being depressed\r
 539 void CXkeymacsDll::DepressKey(BYTE bVk, BOOL bOriginal) // bVk is virtual-key code, MSDN said\r
 540 {\r
 541         if (bOriginal) {\r
 542 //              CUtils::Log(_T("i: %x, %d, %d, %d, %d, %d, %d, %d, %d"), bVk,\r
 543 //                      IsDown(VK_CONTROL), IsDown(VK_CONTROL, FALSE), IsDepressedModifier(CCommands::C_), IsDepressedModifier(CCommands::C_, FALSE),\r
 544 //                      IsDown(VK_MENU), IsDown(VK_MENU, FALSE), IsDepressedModifier(CCommands::MetaAlt), IsDepressedModifier(CCommands::MetaAlt, FALSE));\r
 545                 SetOriginal(GetModifierState(), bVk);\r
 546         }\r
 547         DoKeybd_event(bVk, 0);\r
 548 }\r
 549 \r
 550 // the key is being released\r
 551 void CXkeymacsDll::ReleaseKey(BYTE bVk) // bVk is virtual-key code, MSDN said\r
 552 {\r
 553         DoKeybd_event(bVk, KEYEVENTF_KEYUP);\r
 554 }\r
 555 \r
 556 // bVk down, bVk up\r
 557 void CXkeymacsDll::Kdu(BYTE bVk, DWORD n, BOOL bOriginal)\r
 558 {\r
 559         while (n--) {\r
 560                 DepressKey(bVk, bOriginal);\r
 561                 ReleaseKey(bVk);\r
 562         }\r
 563 }\r
 564 \r
 565 void CXkeymacsDll::InitKeyboardProc(BOOL bImeComposition)\r
 566 {\r
 567         CUtils::SetApplicationName(bImeComposition);\r
 568         if (_tcsnicmp(m_Config.szSpecialApp[m_nAppID], CUtils::GetApplicationName(), 0xF) || !IsMatchWindowText(m_Config.szWindowText[m_nAppID])) {     // PROCESSENTRY32 has only 0xF bytes of Name\r
 569                 m_nAppID = -1;\r
 570                 for (int nAppID = 0; nAppID < MAX_APP; ++nAppID) {\r
 571                         if (_tcsnicmp(m_Config.szSpecialApp[nAppID], CUtils::GetApplicationName(), 0xF) || !IsMatchWindowText(m_Config.szWindowText[nAppID]))\r
 572                                 continue;\r
 573                         if (m_nAppID < 0)\r
 574                                 m_nAppID = nAppID;\r
 575                         else {\r
 576                                 const LPCSTR curText = m_Config.szWindowText[m_nAppID];\r
 577                                 const LPCSTR newText = m_Config.szWindowText[nAppID];\r
 578                                 const int curType = CUtils::GetWindowTextType(curText);\r
 579                                 const int newType = CUtils::GetWindowTextType(newText);\r
 580                                 if (curType < newType || curType == newType && _tcscmp(curText, newText) <= 0)\r
 581                                         m_nAppID = nAppID;\r
 582                         }\r
 583                 }\r
 584                 if (m_nAppID < 0)\r
 585                         m_nAppID = GetAppID(_T("Default"), 0);\r
 586         }\r
 587         if (m_Config.nSettingStyle[m_nAppID] != SETTING_DISABLE &&\r
 588                         (_tcsicmp(m_Config.szSpecialApp[m_nAppID], _T("Default")) || !CUtils::IsDefaultIgnoreApplication()) &&\r
 589                         !bImeComposition && CUtils::IsDialog() && m_Config.bUseDialogSetting[m_nAppID])\r
 590                 // Use Dialog Setting\r
 591                 m_nAppID = GetAppID(_T("Dialog"), m_nAppID);\r
 592 \r
 593         ICONMSG msg[3] = {\r
 594                 {CX_ICON, OFF_ICON, ""},\r
 595                 {MX_ICON, OFF_ICON, ""},\r
 596                 {META_ICON, OFF_ICON, ""}\r
 597         };\r
 598         SendIconMessage(msg, 3);\r
 599         CCommands::SetMark(FALSE);\r
 600         CCommands::SetTemporarilyDisableXKeymacs(FALSE);\r
 601         CCommands::Reset();\r
 602 }\r
 603 \r
 604 int CXkeymacsDll::GetAppID(const LPCSTR szName, const int fallback)\r
 605 {\r
 606         for (int i = 0; i < MAX_APP; ++i)\r
 607                 if (!_tcsicmp(m_Config.szSpecialApp[i], szName))\r
 608                         return i;\r
 609         return fallback;\r
 610 }\r
 611 \r
 612 LRESULT CALLBACK CXkeymacsDll::KeyboardProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 613 {\r
 614         const BYTE nOrigKey = static_cast<BYTE>(wParam);\r
 615         const bool bRelease = (lParam & BEING_RELEASED) != 0;\r
 616         const bool bExtended = (lParam & EXTENDED_KEY) != 0;\r
 617 \r
 618         static BOOL bLocked = FALSE;\r
 619         static const BYTE RECURSIVE_KEY = 0x07;\r
 620         static int (*fLastCommand)() = NULL;\r
 621         static BYTE nOneShotModifier[MAX_KEY] = {'\0'};\r
 622         static BOOL bCherryOneShotModifier = FALSE;\r
 623 \r
 624 //      CUtils::Log(_T("nCode = %#x, nKey = %#x, lParam = %#x"), nCode, nOrigKey, lParam);\r
 625 \r
 626         if (!m_bEnableKeyboardHook || CUtils::IsXkeymacs() ||\r
 627                         nCode < 0 || nCode == HC_NOREMOVE)\r
 628                 return CallNextHookEx(NULL, nCode, wParam, lParam);\r
 629 \r
 630 //      CUtils::Log(_T("nKey = %#x, ext = %d, rel = %d, pre = %d, %#hx, %#hx"), nOrigKey,\r
 631 //              (lParam & EXTENDED_KEY) ? 1 : 0, (lParam & BEING_RELEASED) ? 1 : 0, (lParam & REPEATED_KEY) ? 1 : 0,\r
 632 //              GetKeyState(nOrigKey), GetAsyncKeyState(nOrigKey));\r
 633 \r
 634         if (nOrigKey == RECURSIVE_KEY) {\r
 635                 if (bRelease)\r
 636                         goto HOOK_RECURSIVE_KEY;\r
 637                 else\r
 638                         goto RECURSIVE_COMMAND;\r
 639         }\r
 640 \r
 641         CancelMarkWithShift(nOrigKey, bRelease);\r
 642 \r
 643         BYTE nKey = nOrigKey;\r
 644         switch (nKey) {\r
 645         case VK_CONTROL:\r
 646                 nKey = bExtended ? VK_RCONTROL : VK_LCONTROL;\r
 647                 break;\r
 648         case VK_MENU:\r
 649                 nKey = bExtended ? VK_RMENU : VK_LMENU;\r
 650                 break;\r
 651         case VK_SHIFT:\r
 652                 nKey = bExtended ? VK_RSHIFT : VK_LSHIFT;\r
 653                 break;\r
 654         }\r
 655 \r
 656 #define fCommand(type) (Commands[m_Config.nCommandID[m_nAppID][(type)][nKey]].fCommand)\r
 657 #define nFunctionID (m_Config.nFunctionID[m_nAppID][nType][nKey])\r
 658 \r
 659         if (bRelease) {\r
 660                 switch (nOrigKey) {\r
 661                 case VK_MENU:\r
 662                         if (m_nHookAltRelease) {\r
 663                                 if (m_nHookAltRelease & ~HOOK_ALT_LATER)\r
 664                                         m_nHookAltRelease--;\r
 665                                 else if (m_nHookAltRelease & HOOK_ALT_LATER)\r
 666                                         m_nHookAltRelease = 0;\r
 667                                 goto HOOK;\r
 668                         }\r
 669                         // pass through\r
 670                 case VK_LWIN:\r
 671                 case VK_RWIN:\r
 672                 case VK_APPS:\r
 673                         for (int i = 0; i < MAX_COMMAND_TYPE; ++i) {\r
 674                                 int (*const fCommand)() = fCommand(i);\r
 675                                 if (fCommand && !(nOrigKey == VK_MENU && fCommand == CCommands::MetaAlt))\r
 676                                         goto HOOK;\r
 677                         }\r
 678                 }\r
 679                 if (nOneShotModifier[nKey]) {\r
 680                         ReleaseKey(nOneShotModifier[nKey]);\r
 681                         nOneShotModifier[nKey] = 0;\r
 682                         if (bCherryOneShotModifier) {\r
 683                                 bCherryOneShotModifier = FALSE;\r
 684                                 Kdu(nKey);\r
 685                         }\r
 686                 }\r
 687                 goto DO_NOTHING;\r
 688         }\r
 689 \r
 690         if (m_Config.nSettingStyle[m_nAppID] == SETTING_DISABLE)\r
 691                 goto DO_NOTHING;\r
 692 \r
 693         // Do Nothing for Meadow, Mule for Win32, ... if those use default setting.\r
 694         if (!_tcsicmp(m_Config.szSpecialApp[m_nAppID], _T("Default")) && CUtils::IsDefaultIgnoreApplication())\r
 695                 goto DO_NOTHING;\r
 696 \r
 697         switch (IsPassThrough(nKey)) {\r
 698         case GOTO_DO_NOTHING:\r
 699                 goto DO_NOTHING;\r
 700         case GOTO_HOOK:\r
 701                 goto HOOK;\r
 702         case CONTINUE:\r
 703                 break;\r
 704         }\r
 705 \r
 706         // set command type\r
 707         int nType = IsDown(VK_SHIFT) * SHIFT | IsControl() * CONTROL | IsMeta() * META | CCommands::bC_x() * CONTROLX;\r
 708         // Ignore undefined C-x ?\r
 709         if (nType & CONTROLX && fCommand(nType) == NULL && nFunctionID < 0) {\r
 710                 if (m_Config.bIgnoreUndefinedC_x[m_nAppID]) {\r
 711                         CCommands::Reset(GOTO_HOOK);\r
 712                         goto HOOK;\r
 713                 }\r
 714                 nType &= ~CONTROLX;\r
 715         }\r
 716         // Ignore undefined Meta Ctrl+?\r
 717         if (CCommands::bM_() && nType & CONTROL && fCommand(nType) == NULL && nFunctionID < 0) {\r
 718                 if (m_Config.bIgnoreUndefinedMetaCtrl[m_nAppID]) {\r
 719                         if (CheckOriginal(CONTROL, nKey))\r
 720                                 goto DO_NOTHING;\r
 721                         CCommands::Reset(GOTO_HOOK);\r
 722                         goto HOOK;\r
 723                         nType &= ~META;\r
 724                 }\r
 725         }\r
 726 \r
 727         int nVirtualType = GetModifierState(FALSE);\r
 728         if (nOrigKey == VK_CONTROL)\r
 729                 nVirtualType &= ~CONTROL;\r
 730         if (nOrigKey == VK_MENU)\r
 731                 nVirtualType &= ~META;\r
 732         if (CheckOriginal(nVirtualType, nOrigKey)) {\r
 733                 goto DO_NOTHING;\r
 734         }\r
 735 \r
 736         int (*const fCommand)() = fCommand(nType);\r
 737         if (fCommand == CCommands::EnableOrDisableXKeymacs) {\r
 738                 ToggleKeyboardHookState();\r
 739                 goto HOOK;\r
 740         }\r
 741         if (fCommand == CCommands::EnableXKeymacs) {\r
 742                 if (!m_bHook)\r
 743                         ToggleKeyboardHookState();\r
 744                 goto HOOK;\r
 745         }\r
 746         if (fCommand == CCommands::DisableXKeymacs) {\r
 747                 if (m_bHook)\r
 748                         ToggleKeyboardHookState();\r
 749                 goto HOOK;\r
 750         }\r
 751         if (!m_bHook)\r
 752                 goto DO_NOTHING;\r
 753 \r
 754         if (CCommands::bM_x() && !bRelease) {\r
 755                 static size_t index = 0;\r
 756                 static TCHAR szPath[MAX_PATH] = {'\0'};\r
 757                 if (fCommand == CCommands::BackwardChar) {\r
 758                         if (index)\r
 759                                 --index;\r
 760                         goto HOOKX;\r
 761                 } else if (fCommand == CCommands::BeginningOfLine) {\r
 762                         index = 0;\r
 763                         goto HOOKX;\r
 764                 } else if (fCommand == CCommands::DeleteBackwardChar) {\r
 765                         if (index) {\r
 766                                 --index;\r
 767                                 memmove(szPath + index, szPath + index + 1, MAX_PATH - index);\r
 768                                 SetM_xTip(szPath);\r
 769                         }\r
 770                         goto HOOKX;\r
 771                 } else if (fCommand == CCommands::DeleteChar) {\r
 772                         if (index < _tcslen(szPath)) {\r
 773                                 memmove(szPath + index, szPath + index + 1, MAX_PATH - index);\r
 774                                 SetM_xTip(szPath);\r
 775                         }\r
 776                         goto HOOKX;\r
 777                 } else if (fCommand == CCommands::EndOfLine) {\r
 778                         index = _tcslen(szPath);\r
 779                         goto HOOKX;\r
 780                 } else if (fCommand == CCommands::ForwardChar) {\r
 781                         if (index < _tcslen(szPath))\r
 782                                 ++index;\r
 783                         goto HOOKX;\r
 784                 } else if (fCommand == CCommands::KeyboardQuit) {\r
 785                         CCommands::bM_x(FALSE);\r
 786                         index = 0;\r
 787                         memset(szPath, 0, sizeof(szPath));\r
 788                         goto HOOK;\r
 789                 } else if (nKey == VK_RETURN || fCommand == CCommands::Newline) {\r
 790                         InvokeM_x(szPath);\r
 791                         CCommands::bM_x(FALSE);\r
 792                         index = 0;\r
 793                         memset(szPath, 0, sizeof(szPath));\r
 794                         goto HOOK;\r
 795                 } else if (nKey && index < MAX_PATH - 1) {\r
 796                         const BOOL bIsShiftDown = IsDown(VK_SHIFT, FALSE);\r
 797                         TCHAR nAscii = 0;\r
 798                         do { // 1-127\r
 799                                 if (a2v(++nAscii) == nKey && bIsShiftDown == IsShift(nAscii)) {\r
 800 //                                      CUtils::Log("M-x: %#X (%c), %#X (%c)", nKey, nKey, nAscii, nAscii);\r
 801                                         if (index < _tcslen(szPath))\r
 802                                                 memmove(szPath + index + 1, szPath + index, MAX_PATH - index - 1);\r
 803                                         szPath[index++] = nAscii;\r
 804 //                                      CUtils::Log("M-x: %c(%#04x)", nAscii, nAscii);\r
 805                                         SetM_xTip(szPath);\r
 806                                         goto HOOKX;\r
 807                                 }\r
 808                         } while (nAscii != 127);\r
 809                 }\r
 810         }\r
 811 \r
 812         if (CCommands::bC_u() && nType == NONE) {\r
 813                 if ('0' <= nKey && nKey <= '9') {\r
 814                         CCommands::NumericArgument(nKey - '0');\r
 815                         goto HOOK0_9;\r
 816                 }\r
 817                 if (nKey == VK_OEM_MINUS) {\r
 818                         CCommands::NumericArgumentMinus();\r
 819                         goto HOOK0_9;\r
 820                 }\r
 821         }\r
 822 \r
 823 #define OneShotModifier(type, vk, mod) \\r
 824         if (fCommand(nType & ~type) == CCommands::OneShotModifier ## mod || \\r
 825                         fCommand(nType) == CCommands::OneShotModifier ## mod ## Repeat) { \\r
 826                 nOneShotModifier[nKey] = vk; \\r
 827                 DepressKey(vk); \\r
 828                 bCherryOneShotModifier = TRUE; \\r
 829                 goto HOOK; \\r
 830         } else if (fCommand(nType & ~CONTROL) == CCommands::OneShotModifier ## mod ## Repeat) { \\r
 831                 ReleaseKey(vk); \\r
 832                 bCherryOneShotModifier = FALSE; \\r
 833                 Kdu(nKey); \\r
 834                 goto HOOK; \\r
 835         }\r
 836 \r
 837         OneShotModifier(CONTROL, VK_CONTROL, Ctrl);\r
 838         OneShotModifier(META, VK_MENU, Alt);\r
 839         OneShotModifier(SHIFT, VK_SHIFT, Shift);\r
 840         int i;\r
 841         for (i = 0; i < MAX_KEY; ++i)\r
 842                 if (nOneShotModifier[i] == nOrigKey)\r
 843                         break;\r
 844         if (i == MAX_KEY)\r
 845                 bCherryOneShotModifier = FALSE;\r
 846 \r
 847         if (0 <= nFunctionID && nFunctionID < MAX_FUNCTION && m_Config.szFunctionDefinition[nFunctionID][0]) {\r
 848                 CallFunction(nFunctionID);\r
 849                 CCommands::Reset(GOTO_HOOK);\r
 850                 goto HOOK;\r
 851         }\r
 852 #undef fCommand\r
 853 #undef nFunctionID\r
 854 \r
 855         if (!fCommand) {\r
 856                 if (nOrigKey == VK_CONTROL || nOrigKey == VK_MENU || nOrigKey == VK_SHIFT)\r
 857                         goto DO_NOTHING;\r
 858                 if (!(nType & SHIFT)) {\r
 859                         if (CCommands::IsSetMark()) {\r
 860                                 if (CCommands::MoveCaret(nKey, nType & CONTROL) != CONTINUE) {\r
 861                                         CCommands::ClearNumericArgument();\r
 862                                         goto HOOK;\r
 863                                 }\r
 864                                 CCommands::SetMark(FALSE);\r
 865                         }\r
 866                 }\r
 867                 if (1 < CCommands::GetNumericArgument()) {\r
 868                         Kdu(nKey, CCommands::GetNumericArgument());\r
 869                         CCommands::ClearNumericArgument();\r
 870                         goto HOOK;\r
 871                 }\r
 872                 goto DO_NOTHING;\r
 873         }\r
 874 \r
 875         if (CCommands::IsTemporarilyDisableXKeymacs()  && fCommand != CCommands::KeyboardQuit) {\r
 876                 CCommands::SetTemporarilyDisableXKeymacs(FALSE);\r
 877                 goto DO_NOTHING;\r
 878         }\r
 879 \r
 880         m_bRightControl = IsDown(VK_RCONTROL, FALSE);\r
 881         m_bRightAlt = IsDown(VK_RMENU, FALSE);\r
 882         m_bRightShift = IsDown(VK_RSHIFT, FALSE);\r
 883 \r
 884         if (bLocked)\r
 885                 goto HOOK_RECURSIVE_KEY;\r
 886         bLocked = TRUE;\r
 887         fLastCommand = fCommand;\r
 888 RECURSIVE_COMMAND:\r
 889         switch (fLastCommand()) {\r
 890         case GOTO_DO_NOTHING:\r
 891                 bLocked = FALSE;\r
 892                 goto DO_NOTHING;\r
 893         case GOTO_HOOK:\r
 894                 bLocked = FALSE;\r
 895                 goto HOOK;\r
 896         case GOTO_RECURSIVE:\r
 897                 goto RECURSIVE;\r
 898         case GOTO_HOOKX:\r
 899                 bLocked = FALSE;\r
 900                 goto HOOKX;\r
 901                 case GOTO_HOOK0_9:\r
 902                 bLocked = FALSE;\r
 903                 goto HOOK0_9;\r
 904         }\r
 905 \r
 906 DO_NOTHING:\r
 907         SetModifierIcons();\r
 908         if (m_bRecordingMacro && (!bRelease || m_bDown[wParam])) {\r
 909                 KbdMacro m = { nCode, wParam, lParam, TRUE };\r
 910                 m_Macro.push_back(m);\r
 911                 m_bDown[wParam] |= !bRelease;\r
 912         }\r
 913         return CallNextHookEx(NULL, nCode, wParam, lParam);\r
 914 \r
 915 RECURSIVE:\r
 916         Kdu(RECURSIVE_KEY, 1, FALSE);\r
 917         goto HOOKX;\r
 918 HOOK:\r
 919         CCommands::SetLastCommand(fLastCommand);\r
 920 HOOK0_9:\r
 921 HOOKX:\r
 922         SetModifierIcons();\r
 923 HOOK_RECURSIVE_KEY:\r
 924         return TRUE;\r
 925 }\r
 926 \r
 927 void CXkeymacsDll::SetModifierIcons()\r
 928 {\r
 929 #define IconState(x) ((x) ? ON_ICON : OFF_ICON)\r
 930         ICONMSG msg[6] = {\r
 931                 {MX_ICON, IconState(CCommands::bM_x()), ""},\r
 932                 {CX_ICON, IconState(CCommands::bC_x()), ""},\r
 933                 {META_ICON, IconState(CCommands::bM_()), ""},\r
 934                 {SHIFT_ICON, IconState(IsDown(VK_SHIFT, FALSE)), ""},\r
 935                 {CTRL_ICON, IconState(IsControl()), ""},\r
 936                 {ALT_ICON, IconState(IsDown(VK_MENU, FALSE)), ""}\r
 937         };\r
 938         _tcscpy_s(msg[0].szTip, m_M_xTip);\r
 939         SendIconMessage(msg, 6);\r
 940 }\r
 941 \r
 942 // Clear data of nAppID\r
 943 void CXkeymacsDll::Clear(int nAppID)\r
 944 {\r
 945         if (0 <= nAppID && nAppID < MAX_APP) {\r
 946                 ZeroMemory(m_Config.szSpecialApp[nAppID], sizeof(m_Config.szSpecialApp[nAppID]));\r
 947                 ZeroMemory(m_Config.nCommandID[nAppID], sizeof(m_Config.nCommandID[nAppID]));\r
 948                 m_Config.nKillRingMax[nAppID] = 0;\r
 949                 m_Config.bUseDialogSetting[nAppID] = FALSE;\r
 950                 m_Config.nSettingStyle[nAppID] = 0;\r
 951         } else {\r
 952                 ASSERT(0);\r
 953         }\r
 954 }\r
 955 \r
 956 BOOL CXkeymacsDll::IsValidKey(BYTE bVk)\r
 957 {\r
 958         if (bVk == 0xf0) {      // 0xf0: Eisu key. GetAsyncKeyState returns the wrong state of Eisu key.\r
 959                 return FALSE;\r
 960         }\r
 961 \r
 962         switch (bVk) {\r
 963         case VK_CONTROL:\r
 964         case VK_MENU:\r
 965         case VK_SHIFT:\r
 966                 return FALSE;\r
 967         default:\r
 968                 break;\r
 969         }\r
 970 \r
 971         return TRUE;\r
 972 }\r
 973 \r
 974 BOOL CXkeymacsDll::IsDepressedModifier(int (__cdecl *Modifier)(void), BOOL bPhysicalKey)\r
 975 {\r
 976         BYTE bVk = 0;\r
 977         do {\r
 978                 if (IsValidKey(bVk) && IsDown(bVk, bPhysicalKey) &&\r
 979                                 Commands[m_Config.nCommandID[m_nAppID][NONE][bVk]].fCommand == Modifier)\r
 980                         return TRUE;\r
 981         } while (++bVk);\r
 982         return FALSE;\r
 983 }\r
 984 \r
 985 void CXkeymacsDll::CancelMarkWithShift(BYTE nKey, bool bRelease)\r
 986 {\r
 987         static bool bShift;\r
 988         if (nKey != VK_SHIFT)\r
 989                 goto exit;\r
 990         BYTE bVk = 0;\r
 991         do {\r
 992                 if (bVk == VK_SHIFT || VK_LSHIFT || VK_RSHIFT)\r
 993                         continue;\r
 994                 if (IsDown(bVk, FALSE))\r
 995                         goto exit;\r
 996         } while (++bVk);\r
 997         if (!bRelease) {\r
 998                 bShift = TRUE;\r
 999                 return;\r
1000         }\r
1001         if (bShift)\r
1002                 CCommands::SetMark(FALSE);\r
1003 exit:\r
1004         bShift = FALSE;\r
1005         return;\r
1006 }\r
1007 \r
1008 BOOL CXkeymacsDll::IsControl()\r
1009 {\r
1010         return CCommands::bC_() || IsDepressedModifier(CCommands::C_);\r
1011 }\r
1012 \r
1013 BOOL CXkeymacsDll::IsMeta()\r
1014 {\r
1015         return CCommands::bM_() || IsDepressedModifier(CCommands::MetaAlt);\r
1016 }\r
1017 \r
1018 void CXkeymacsDll::AddKillRing(BOOL bNewData)\r
1019 {\r
1020         if (m_Config.nKillRingMax[m_nAppID] == 0) {\r
1021                 return;\r
1022         }\r
1023 \r
1024         CClipboardSnap *pSnap = new CClipboardSnap;\r
1025         if( !pSnap ) return;\r
1026 \r
1027         BOOL bCapture = pSnap->Capture();\r
1028         bCapture = pSnap->Capture();    // for "office drawing shape format". Can CClipboardSnap care this problem?\r
1029 \r
1030         if( bCapture ) {\r
1031                 if (bNewData) {\r
1032                         m_oKillRing.AddHead(pSnap);\r
1033                 } else {\r
1034                         if (m_oKillRing.IsEmpty()) {\r
1035                                 m_oKillRing.AddHead(pSnap);\r
1036                         } else {\r
1037                                 CClipboardSnap *pParent;\r
1038                                 for (pParent = m_oKillRing.GetHead(); pParent->GetNext(); pParent = pParent->GetNext()) {\r
1039                                         ;\r
1040                                 }\r
1041                                 pParent->SetNext(pSnap);\r
1042                         }\r
1043                 }\r
1044         } else {\r
1045                 delete pSnap;\r
1046                 pSnap = NULL;\r
1047         }\r
1048 \r
1049         m_nKillRing = 0;\r
1050 \r
1051         if (m_Config.nKillRingMax[m_nAppID] < m_oKillRing.GetCount()) {\r
1052                 CClipboardSnap *pSnap = m_oKillRing.GetTail();\r
1053                 delete pSnap;\r
1054                 pSnap = NULL;\r
1055                 m_oKillRing.RemoveTail();\r
1056         }\r
1057 }\r
1058 \r
1059 // Return TRUE if there is another data\r
1060 // Return FALSE if there is no more data\r
1061 CClipboardSnap* CXkeymacsDll::GetKillRing(CClipboardSnap* pSnap, BOOL bForce)\r
1062 {\r
1063         if (m_Config.nKillRingMax[m_nAppID] == 0) {\r
1064                 return NULL;\r
1065         }\r
1066 \r
1067         if (m_oKillRing.IsEmpty()) {\r
1068                 return NULL;\r
1069         }\r
1070 \r
1071         m_nKillRing %= m_oKillRing.GetCount();\r
1072 \r
1073         if (!bForce) {\r
1074                 CClipboardSnap oCurrentSnap;\r
1075                 oCurrentSnap.Capture();\r
1076 \r
1077                 CClipboardSnap *pKillRing = m_oKillRing.GetAt(m_oKillRing.FindIndex(m_nKillRing));\r
1078                 if (!pKillRing) {\r
1079                         return NULL;\r
1080                 }\r
1081                 for (; pKillRing->GetNext(); pKillRing = pKillRing->GetNext()) {\r
1082                         ;\r
1083                 }\r
1084                 if (*pKillRing != oCurrentSnap) {\r
1085                         return NULL;\r
1086                 }\r
1087         }\r
1088 \r
1089         if (!pSnap) {\r
1090                 pSnap = m_oKillRing.GetAt(m_oKillRing.FindIndex(m_nKillRing));\r
1091         }\r
1092         pSnap->Restore();\r
1093 \r
1094         return pSnap->GetNext();\r
1095 }\r
1096 \r
1097 void CXkeymacsDll::SetOriginal(UINT nType, BYTE bVk)\r
1098 {\r
1099         m_nOriginal[nType & ~SHIFT][bVk]++;\r
1100 }\r
1101 \r
1102 int CXkeymacsDll::CheckOriginal(UINT nType, BYTE bVk)\r
1103 {\r
1104         nType &= ~SHIFT;\r
1105         if (m_nOriginal[nType][bVk])\r
1106                 return m_nOriginal[nType][bVk]--;\r
1107         return 0;\r
1108 }\r
1109 \r
1110 void CXkeymacsDll::IncreaseKillRingIndex(int nKillRing)\r
1111 {\r
1112         m_nKillRing += nKillRing;\r
1113 }\r
1114 \r
1115 BOOL CXkeymacsDll::GetEnableCUA()\r
1116 {\r
1117         return m_Config.bEnableCUA[m_nAppID];\r
1118 }\r
1119 \r
1120 void CXkeymacsDll::StartRecordMacro()\r
1121 {\r
1122         if (CCommands::bC_u())\r
1123                 CallMacro();\r
1124         m_bRecordingMacro = TRUE;\r
1125         m_Macro.erase(m_Macro.begin(), m_Macro.end());\r
1126         ZeroMemory(m_bDown, MAX_KEY);\r
1127 }\r
1128 \r
1129 void CXkeymacsDll::EndRecordMacro()\r
1130 {\r
1131         m_bRecordingMacro = FALSE;\r
1132         while (!m_Macro.empty()) { // remove not released push\r
1133                 const KbdMacro& m = m_Macro.back();\r
1134                 if (m.lParam & BEING_RELEASED)\r
1135                         break;\r
1136                 m_Macro.pop_back();\r
1137         }\r
1138 }\r
1139 \r
1140 void CXkeymacsDll::CallMacro()\r
1141 {\r
1142         if (m_bRecordingMacro)\r
1143                 m_bRecordingMacro = FALSE;\r
1144         UINT before = GetModifierState(FALSE);\r
1145         SetModifierState(0, before);\r
1146         for (std::list<KbdMacro>::const_iterator m = m_Macro.begin(); m != m_Macro.end(); ++m)\r
1147                 if (m->lParam & BEING_RELEASED)\r
1148                         ReleaseKey(static_cast<BYTE>(m->wParam));\r
1149                 else\r
1150                         DepressKey(static_cast<BYTE>(m->wParam), m->bOriginal);\r
1151         SetModifierState(before, 0);\r
1152 }\r
1153 \r
1154 BOOL CXkeymacsDll::Is106Keyboard()\r
1155 {\r
1156         return m_Config.b106Keyboard;\r
1157 }\r
1158 \r
1159 int CXkeymacsDll::IsPassThrough(BYTE nKey)\r
1160 {\r
1161         BYTE bVk = 0;\r
1162         do {\r
1163                 if (IsDown(bVk)\r
1164                  && (Commands[m_Config.nCommandID[m_nAppID][NONE][bVk]].fCommand == CCommands::PassThrough)) {\r
1165                         if (bVk == nKey) {\r
1166                                 return GOTO_HOOK;\r
1167                         }\r
1168 \r
1169                         return GOTO_DO_NOTHING;\r
1170                 }\r
1171         } while (++bVk);\r
1172         return CONTINUE;\r
1173 }\r
1174 \r
1175 // call an original command which is defined in dot.xkeymacs\r
1176 void CXkeymacsDll::CallFunction(int nFuncID)\r
1177 {\r
1178         if (nFuncID < 0 || nFuncID >= MAX_FUNCTION)\r
1179                 return;\r
1180         LPCTSTR def = m_Config.szFunctionDefinition[nFuncID];\r
1181         if (!def[0])\r
1182                 return;\r
1183         std::vector<KeyBind> keybinds;\r
1184         const LPCTSTR last = def + _tcslen(def) - 1;\r
1185         if (*def == _T('"') && *last == _T('"')) {\r
1186                 ++def; // skip '"'\r
1187                 while (def < last)\r
1188                         keybinds.push_back(ParseKey(def));\r
1189         } else if (*def == _T('[') && *last == _T(']')) {\r
1190                 while (++def < last) { // skip '[', ']', and ' '\r
1191                         if (*def == _T('?')) { // [?f ?o ?o]\r
1192                                 keybinds.push_back(ParseKey(++def));\r
1193                                 continue;\r
1194                         }\r
1195                         // [VK]\r
1196                         for (int i = 0; i < MAX_KEYNAME; ++i) {\r
1197                                 size_t keylen = _tcslen(KeyNames[i].name);\r
1198                                 if (!_tcsncmp(def, KeyNames[i].name, keylen)) {\r
1199                                         KeyBind keybind = {NONE, KeyNames[i].bVk};\r
1200                                         keybinds.push_back(keybind);\r
1201                                         def += keylen;\r
1202                                         break;\r
1203                                 }\r
1204                         }\r
1205                 }\r
1206         } else\r
1207                 return;\r
1208 \r
1209         BOOL bM_x = FALSE;\r
1210         TCHAR szPath[MAX_PATH] = {'\0'};\r
1211         unsigned int index = 0;\r
1212         BOOL bInitialized = FALSE;\r
1213         UINT before = GetModifierState(FALSE);\r
1214 \r
1215         for (std::vector<KeyBind>::const_iterator p = keybinds.begin(); p != keybinds.end(); ++p) {\r
1216                 const int nType = p->nType;\r
1217                 const BYTE bVk = p->bVk;\r
1218                 int (*fCommand)() = nType < MAX_COMMAND_TYPE ? Commands[m_Config.nCommandID[m_nAppID][nType][bVk]].fCommand : NULL;\r
1219                 if (fCommand) {\r
1220                         if (fCommand == CCommands::ExecuteExtendedCommand)\r
1221                                 bM_x = TRUE;\r
1222                         else if (!bInitialized) {\r
1223                                 SetModifierState(0, before);\r
1224                                 bInitialized = TRUE;\r
1225                         }\r
1226 //                      CUtils::Log("CallFunction: Command Name: %s", Commands[m_Config.nCommandID[m_nAppID][nType][bVk]].szCommandName);\r
1227                         while (fCommand() == GOTO_RECURSIVE)\r
1228                                 ;\r
1229                         continue;\r
1230                 }\r
1231                 if (bM_x) {\r
1232                         if (bVk == VK_RETURN)\r
1233                                 InvokeM_x(szPath);\r
1234                         else if (bVk != 0) {\r
1235                                 TCHAR nAscii = 0;\r
1236                                 do { // 1-127\r
1237                                         if (a2v(++nAscii) == bVk && ((nType & SHIFT) != 0) == IsShift(nAscii)) {\r
1238 //                                              CUtils::Log("M-x: %#X (%c), %#X (%c)", bVk, bVk, nAscii, nAscii);\r
1239                                                 szPath[index++] = nAscii;\r
1240                                                 break;\r
1241                                         }\r
1242                                 } while (nAscii != 127);\r
1243                         }\r
1244                         continue;\r
1245                 }\r
1246                 if (!bInitialized) {\r
1247                         SetModifierState(0, before);\r
1248                         bInitialized = TRUE;\r
1249                 }\r
1250                 if (nType & WIN_WIN)\r
1251                         DepressKey(VK_LWIN);\r
1252                 if (nType & WIN_CTRL)\r
1253                         DepressKey(VK_CONTROL);\r
1254                 if (nType & WIN_ALT)\r
1255                         DepressKey(VK_MENU);\r
1256                 if (nType & SHIFT)\r
1257                         DepressKey(VK_SHIFT);\r
1258                 Kdu(bVk);\r
1259                 const int nNextType = (p + 1) != keybinds.end() ? (p + 1)->nType : 0;\r
1260                 if (nType & SHIFT && !(nNextType & SHIFT))\r
1261                         ReleaseKey(VK_SHIFT);\r
1262                 if (nType & WIN_ALT && !(nNextType & WIN_ALT))\r
1263                         ReleaseKey(VK_MENU);\r
1264                 if (nType & WIN_CTRL && !(nNextType & WIN_CTRL))\r
1265                         ReleaseKey(VK_CONTROL);\r
1266                 if (nType & WIN_WIN && !(nNextType & WIN_WIN))\r
1267                         ReleaseKey(VK_LWIN);\r
1268         }\r
1269 \r
1270         if (bInitialized)\r
1271                 // If this lines is invoked on M-x, a window transition does not work well.\r
1272                 SetModifierState(before, 0);\r
1273         return;\r
1274 }\r
1275 \r
1276 KeyBind CXkeymacsDll::ParseKey(LPCTSTR& def)\r
1277 {\r
1278         KeyBind keybind = {NONE};\r
1279         if (*def == _T('\\')) { // set modifiers\r
1280                 ++def;\r
1281         LOOP:\r
1282                 for (int i = 0; i < MAX_MODIFIER; ++i) {\r
1283                         size_t len = _tcslen(Modifiers[i].name);\r
1284                         if (!_tcsncmp(def, Modifiers[i].name, len)) {\r
1285                                 keybind.nType |= Modifiers[i].id;\r
1286                                 def += len;\r
1287                                 goto LOOP;\r
1288                         }\r
1289                 }\r
1290         }\r
1291         if (IsShift(*def) && !(keybind.nType & (WIN_CTRL | WIN_ALT | WIN_WIN)))\r
1292                 keybind.nType |= SHIFT;\r
1293         int i = 0;\r
1294         for (; i < MAX_KEYNAME; ++i) {\r
1295                 size_t len = _tcslen(KeyNames[i].name);\r
1296                 if (!_tcsncmp(def, KeyNames[i].name, len)) {\r
1297                         def += len;\r
1298                         break;\r
1299                 }\r
1300         }\r
1301         keybind.bVk = i < MAX_KEYNAME ? KeyNames[i].bVk : a2v(*def++);\r
1302         return keybind;\r
1303 }\r
1304 \r
1305 BOOL CXkeymacsDll::IsShift(TCHAR nAscii)\r
1306 {\r
1307         switch (nAscii) {\r
1308         case _T(' '):\r
1309                 return FALSE;\r
1310         case _T('!'):\r
1311         case _T('"'):\r
1312         case _T('#'):\r
1313         case _T('$'):\r
1314         case _T('%'):\r
1315         case _T('&'):\r
1316                 return TRUE;\r
1317         case _T('\''):\r
1318                 return m_Config.b106Keyboard;\r
1319         case _T('('):\r
1320         case _T(')'):\r
1321         case _T('*'):\r
1322         case _T('+'):\r
1323                 return TRUE;\r
1324         case _T(','):\r
1325         case _T('-'):\r
1326         case _T('.'):\r
1327         case _T('/'):\r
1328         case _T('0'): case _T('1'): case _T('2'): case _T('3'): case _T('4'): case _T('5'): case _T('6'): case _T('7'): case _T('8'): case _T('9'):\r
1329                 return FALSE;\r
1330         case _T(':'):\r
1331                 return !m_Config.b106Keyboard;\r
1332         case _T(';'):\r
1333                 return FALSE;\r
1334         case _T('<'):\r
1335                 return TRUE;\r
1336         case _T('='):\r
1337                 return m_Config.b106Keyboard;\r
1338         case _T('>'):\r
1339         case _T('?'):\r
1340                 return TRUE;\r
1341         case _T('@'):\r
1342                 return !m_Config.b106Keyboard;\r
1343         case _T('A'): case _T('B'): case _T('C'): case _T('D'): case _T('E'): case _T('F'): case _T('G'): case _T('H'): case _T('I'): case _T('J'): \r
1344         case _T('K'): case _T('L'): case _T('M'): case _T('N'): case _T('O'): case _T('P'): case _T('Q'): case _T('R'): case _T('S'): case _T('T'): \r
1345         case _T('U'): case _T('V'): case _T('W'): case _T('X'): case _T('Y'): case _T('Z'): \r
1346                 return TRUE;\r
1347         case _T('['):\r
1348         case _T('\\'):\r
1349         case _T(']'):\r
1350                 return FALSE;\r
1351         case _T('^'):\r
1352                 return !m_Config.b106Keyboard;\r
1353         case _T('_'):\r
1354                 return TRUE;\r
1355         case _T('`'):\r
1356                 return m_Config.b106Keyboard;\r
1357         case _T('a'): case _T('b'): case _T('c'): case _T('d'): case _T('e'): case _T('f'): case _T('g'): case _T('h'): case _T('i'): case _T('j'): \r
1358         case _T('k'): case _T('l'): case _T('m'): case _T('n'): case _T('o'): case _T('p'): case _T('q'): case _T('r'): case _T('s'): case _T('t'): \r
1359         case _T('u'): case _T('v'): case _T('w'): case _T('x'): case _T('y'): case _T('z'): \r
1360                 return FALSE;\r
1361         case _T('{'):\r
1362         case _T('|'):\r
1363         case _T('}'):\r
1364         case _T('~'):\r
1365                 return TRUE;\r
1366         default:\r
1367                 return FALSE;\r
1368         }\r
1369 }\r
1370 \r
1371 BYTE CXkeymacsDll::a2v(TCHAR nAscii)\r
1372 {\r
1373         switch (nAscii) {\r
1374         case _T(' '):\r
1375                 return VK_SPACE;\r
1376         case _T('!'):\r
1377                 return '1';\r
1378         case _T('"'):\r
1379                 return m_Config.b106Keyboard ? '2' : (BYTE) 0xde;       // VK_OEM_7\r
1380         case _T('#'):\r
1381                 return '3';\r
1382         case _T('$'):\r
1383                 return '4';\r
1384         case _T('%'):\r
1385                 return '5';\r
1386         case _T('&'):\r
1387                 return m_Config.b106Keyboard ? '6' : '7';\r
1388         case _T('\''):\r
1389                 return m_Config.b106Keyboard ? '7' : (BYTE) 0xde;       // VK_OEM_7\r
1390         case _T('('):\r
1391                 return m_Config.b106Keyboard ? '8' : '9';\r
1392         case _T(')'):\r
1393                 return m_Config.b106Keyboard ? '9' : '0';\r
1394         case _T('*'):\r
1395                 return m_Config.b106Keyboard ? (BYTE) 0xba : '8';       // VK_OEM_1\r
1396         case _T('+'):\r
1397                 return 0xbb;    // VK_OEM_PLUS\r
1398         case _T(','):\r
1399                 return 0xbc;    // VK_OEM_COMMA\r
1400         case _T('-'):\r
1401                 return 0xbd;    // VK_OEM_MINUS\r
1402         case _T('.'):\r
1403                 return 0xbe;    // VK_OEM_PERIOD\r
1404         case _T('/'):\r
1405                 return 0xbf;    // VK_OEM_2\r
1406         case _T('0'): case _T('1'): case _T('2'): case _T('3'): case _T('4'): case _T('5'): case _T('6'): case _T('7'): case _T('8'): case _T('9'):\r
1407                 return nAscii;\r
1408         case _T(':'):\r
1409                 return 0xba;    // VK_OEM_1\r
1410         case _T(';'):\r
1411                 return m_Config.b106Keyboard ? (BYTE) 0xbb : (BYTE) 0xba;       // VK_OEM_PLUS  VK_OEM_1\r
1412         case _T('<'):\r
1413                 return 0xbc;    // VK_OEM_COMMA\r
1414         case _T('='):\r
1415                 return m_Config.b106Keyboard ? (BYTE) 0xbd : (BYTE) 0xbb;       // VK_OEM_MINUS VK_OEM_PLUS\r
1416         case _T('>'):\r
1417                 return 0xbe;    // VK_OEM_PERIOD\r
1418         case _T('?'):\r
1419                 return 0xbf;    // VK_OEM_2\r
1420         case _T('@'):\r
1421                 return m_Config.b106Keyboard ? (BYTE) 0xc0 : '2';\r
1422         case _T('A'): case _T('B'): case _T('C'): case _T('D'): case _T('E'): case _T('F'): case _T('G'): case _T('H'): case _T('I'): case _T('J'): \r
1423         case _T('K'): case _T('L'): case _T('M'): case _T('N'): case _T('O'): case _T('P'): case _T('Q'): case _T('R'): case _T('S'): case _T('T'): \r
1424         case _T('U'): case _T('V'): case _T('W'): case _T('X'): case _T('Y'): case _T('Z'): \r
1425                 return nAscii;\r
1426         case _T('['):\r
1427                 return 0xdb;    // VK_OEM_4\r
1428         case _T('\\'):\r
1429                 return 0xdc;    // VK_OEM_5\r
1430         case _T(']'):\r
1431                 return 0xdd;    // VK_OEM_6\r
1432         case _T('^'):\r
1433                 return m_Config.b106Keyboard ? (BYTE) 0xde : '6';       // VK_OEM_7\r
1434         case _T('_'):\r
1435                 return m_Config.b106Keyboard ? (BYTE) 0xe2 : (BYTE) 0xbd;       // VK_OEM_102   VK_OEM_MINUS\r
1436         case _T('`'):\r
1437                 return 0xc0;    // VK_OEM_3\r
1438         case _T('a'): case _T('b'): case _T('c'): case _T('d'): case _T('e'): case _T('f'): case _T('g'): case _T('h'): case _T('i'): case _T('j'): \r
1439         case _T('k'): case _T('l'): case _T('m'): case _T('n'): case _T('o'): case _T('p'): case _T('q'): case _T('r'): case _T('s'): case _T('t'): \r
1440         case _T('u'): case _T('v'): case _T('w'): case _T('x'): case _T('y'): case _T('z'): \r
1441                 return (BYTE) (nAscii - (_T('a') - _T('A')));\r
1442         case _T('{'):\r
1443                 return 0xdb;    // VK_OEM_4\r
1444         case _T('|'):\r
1445                 return 0xdc;    // VK_OEM_5\r
1446         case _T('}'):\r
1447                 return 0xdd;    // VK_OEM_6\r
1448         case _T('~'):\r
1449                 return m_Config.b106Keyboard ? (BYTE) 0xde : (BYTE) 0xc0;       // VK_OEM_7     VK_OEM_3\r
1450         default:\r
1451                 return 0;\r
1452         }\r
1453 }\r
1454 \r
1455 BOOL CXkeymacsDll::IsMatchWindowText(CString szWindowText)\r
1456 {\r
1457         BOOL bIsMatchWindowText = TRUE;\r
1458 \r
1459         TCHAR szCurrentWindowText[WINDOW_TEXT_LENGTH] = {'\0'};\r
1460         GetWindowText(GetForegroundWindow(), szCurrentWindowText, sizeof(szCurrentWindowText));\r
1461 \r
1462         switch (CUtils::GetWindowTextType(szWindowText)) {\r
1463         case IDS_WINDOW_TEXT_MATCH:                                                             // *foo*\r
1464                 szWindowText.Delete(0);                                                         // Delete first '*'\r
1465                 szWindowText.Delete(szWindowText.GetLength() - 1);      // Delete last '*'\r
1466                 bIsMatchWindowText = 0 <= CString(szCurrentWindowText).Find(szWindowText);\r
1467                 break;\r
1468         case IDS_WINDOW_TEXT_MATCH_FORWARD:                                             // foo*\r
1469                 szWindowText.Delete(szWindowText.GetLength() - 1);      // Delete last '*'\r
1470                 bIsMatchWindowText = 0 == CString(szCurrentWindowText).Find(szWindowText);\r
1471                 break;\r
1472         case IDS_WINDOW_TEXT_MATCH_BACKWARD:                                    // *foo\r
1473                 szWindowText.Delete(0);                                                         // Delete first '*'\r
1474                 bIsMatchWindowText = 0 <= CString(szCurrentWindowText).Find(szWindowText, CString(szCurrentWindowText).GetLength() - szWindowText.GetLength());\r
1475                 break;\r
1476         case IDS_WINDOW_TEXT_MATCH_FULL:                                                // foo\r
1477                 bIsMatchWindowText = szWindowText == CString(szCurrentWindowText);\r
1478                 break;\r
1479         case IDS_WINDOW_TEXT_IGNORE:                                                    // *\r
1480                 bIsMatchWindowText = TRUE;\r
1481                 break;\r
1482         default:\r
1483                 ASSERT(0);\r
1484                 break;\r
1485         }\r
1486 \r
1487 //      CUtils::Log(_T("IsMatchWindowText: %d, _%s_, _%s_"), bIsMatchWindowText, szCurrentWindowText, szWindowText);\r
1488         return bIsMatchWindowText;\r
1489 }\r
1490 \r
1491 void CXkeymacsDll::SetAccelerate(int nAccelerate)\r
1492 {\r
1493         m_nAccelerate = nAccelerate;\r
1494 }\r
1495 \r
1496 int CXkeymacsDll::GetAccelerate()\r
1497 {\r
1498         return m_nAccelerate;\r
1499 }\r
1500 \r
1501 void CXkeymacsDll::SetKeyboardSpeed(int nKeyboardSpeed)\r
1502 {\r
1503         m_nKeyboardSpeed = nKeyboardSpeed;\r
1504 }\r
1505 \r
1506 unsigned int CXkeymacsDll::GetMaxKeyInterval()\r
1507 {\r
1508         // m_nKeyboardSpeed == 0:       slowest repeat rate; approximately  2 characters per second\r
1509         // m_nKeyboardSpeed == 31:      fastest repeat rate; approximately 30 characters per second\r
1510         // 47 ms is max on my machine w/ KeyboardSpeed 31.\r
1511         // 1000 /  2 + 50 = 550\r
1512         // 1000 / 30 + 50 = 83\r
1513         return (unsigned int) (1000.0 / (2.0 + m_nKeyboardSpeed % 32 * 28.0 / 31.0) + 50.0);\r
1514 }\r
1515 \r
1516 void CXkeymacsDll::SetCursorData(HCURSOR hEnable, HCURSOR hDisableTMP, HCURSOR hDisableWOCQ, HICON hDisable, BOOL bEnable)\r
1517 {\r
1518         m_hCursor[STATUS_ENABLE] = hEnable;\r
1519         m_hCursor[STATUS_DISABLE_TMP] = hDisableTMP;\r
1520         m_hCursor[STATUS_DISABLE_WOCQ] = hDisableWOCQ;\r
1521         m_hCursor[STATUS_DISABLE] = hDisable;\r
1522         m_bCursor = bEnable;\r
1523 }\r
1524 \r
1525 void CXkeymacsDll::DoSetCursor()\r
1526 {\r
1527         if (m_bCursor && m_hCurrentCursor) {\r
1528                 ::SetCursor(m_hCurrentCursor);\r
1529         }\r
1530 }\r
1531 \r
1532 BOOL CXkeymacsDll::Get326Compatible()\r
1533 {\r
1534         return m_Config.b326Compatible[m_nAppID];\r
1535 }\r
1536 \r
1537 void CXkeymacsDll::InvokeM_x(const TCHAR *const szPath)\r
1538 {\r
1539 //      CUtils::Log("M-x: szPath=_%s_", szPath);\r
1540         int (*fCommand)() = NULL;\r
1541 \r
1542         for (int i = 0; i < MAX_COMMAND; ++i) {\r
1543                 if (_tcsicmp(szPath, Commands[i].szCommandName) == 0) {\r
1544                         fCommand = Commands[i].fCommand;\r
1545                         break;\r
1546                 }\r
1547         }\r
1548 \r
1549         if (fCommand) {\r
1550 //              CUtils::Log("M-x: Command: _%s_", Commands[i].szCommandName);\r
1551                 fCommand();\r
1552         } else {\r
1553 //              CUtils::Log("M-x: Path: _%s_", szPath);\r
1554                 ShellExecute(NULL, NULL, szPath, NULL, NULL, SW_SHOWNORMAL);\r
1555         }\r
1556 }\r
1557 \r
1558 void CXkeymacsDll::SetM_xTip(const TCHAR *const szPath)\r
1559 {\r
1560         _tcscpy_s(m_M_xTip, "M-x LED");\r
1561         if (szPath && _tcslen(szPath) < 128 - 5)\r
1562                 _stprintf_s(m_M_xTip, "M-x %s", szPath);\r
1563 }\r
1564 \r
1565 BOOL CXkeymacsDll::SendIconMessage(ICONMSG *pMsg, DWORD num)\r
1566 {\r
1567         DWORD ack, read;\r
1568         return CallNamedPipe(ICON_PIPE, pMsg, sizeof(ICONMSG) * num, &ack, sizeof(DWORD), &read, NMPWAIT_NOWAIT);\r
1569 }\r