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         HHOOK *phHook = reinterpret_cast<HHOOK *>(TlsGetValue(g_TlsIndex));\r
 283         if (!phHook)\r
 284                 return;\r
 285         if (!*phHook)\r
 286                 *phHook = SetWindowsHookEx(WH_KEYBOARD, (HOOKPROC)KeyboardProc, g_hDllInst, GetCurrentThreadId());\r
 287 }\r
 288 \r
 289 inline void unhook(HHOOK &hh)\r
 290 {\r
 291         if (hh)\r
 292                 UnhookWindowsHookEx(hh);\r
 293         hh = NULL;\r
 294 }\r
 295 \r
 296 void CXkeymacsDll::ResetHooks() \r
 297 {\r
 298         ReleaseHooks();\r
 299         SetHooks();\r
 300 }\r
 301 \r
 302 void CXkeymacsDll::ReleaseHooks()\r
 303 {\r
 304         unhook(m_hHookCallWnd);\r
 305         unhook(m_hHookCallWndRet);\r
 306         unhook(m_hHookGetMessage);\r
 307         unhook(m_hHookShell);\r
 308         m_bEnableKeyboardHook = false;\r
 309 }\r
 310 \r
 311 void CXkeymacsDll::ReleaseKeyboardHook()\r
 312 {\r
 313         HHOOK *phHook = reinterpret_cast<HHOOK *>(TlsGetValue(g_TlsIndex));\r
 314         if (phHook)\r
 315                 unhook(*phHook);\r
 316 }\r
 317 \r
 318 void CXkeymacsDll::ToggleKeyboardHookState()\r
 319 {\r
 320         m_bHook = !m_bHook;\r
 321         ShowKeyboardHookState();\r
 322 }\r
 323 \r
 324 void CXkeymacsDll::ShowKeyboardHookState()\r
 325 {\r
 326         ICONMSG msg = {MAIN_ICON,};\r
 327         if (m_bHook) {\r
 328                 if (CCommands::IsTemporarilyDisableXKeymacs()) {\r
 329                         msg.nState = STATUS_DISABLE_TMP;\r
 330                         m_hCurrentCursor = m_hCursor[STATUS_DISABLE_TMP];\r
 331                 } else {\r
 332                         msg.nState = STATUS_ENABLE;\r
 333                         m_hCurrentCursor = m_hCursor[STATUS_ENABLE];\r
 334                 }\r
 335         } else {\r
 336                 msg.nState = STATUS_DISABLE_WOCQ;\r
 337         }\r
 338         if (m_Config.nSettingStyle[m_nAppID] == SETTING_DISABLE\r
 339          || (!_tcsicmp(m_Config.szSpecialApp[m_nAppID], _T("Default"))\r
 340           && CUtils::IsDefaultIgnoreApplication())) {\r
 341                 msg.nState = STATUS_DISABLE;\r
 342                 m_hCurrentCursor = m_hCursor[STATUS_DISABLE];\r
 343         }\r
 344         SendIconMessage(&msg, 1);\r
 345         DoSetCursor();\r
 346 }\r
 347 \r
 348 BOOL CXkeymacsDll::IsKeyboardHook()\r
 349 {\r
 350         return m_bHook;\r
 351 }\r
 352 \r
 353 LRESULT CALLBACK CXkeymacsDll::CallWndProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 354 {\r
 355         SetKeyboardHook();\r
 356         if (nCode >= 0) {\r
 357                 const CWPSTRUCT *cwps = reinterpret_cast<CWPSTRUCT *>(lParam);\r
 358                 switch (cwps->message) {\r
 359                 case WM_IME_STARTCOMPOSITION:\r
 360                         InitKeyboardProc(TRUE);\r
 361                         break;\r
 362                 case WM_IME_ENDCOMPOSITION:\r
 363                         InitKeyboardProc(FALSE);\r
 364                         break;\r
 365                 case WM_SETFOCUS:\r
 366                         if (cwps->hwnd == GetForegroundWindow()) {\r
 367                                 InitKeyboardProc(FALSE);\r
 368                                 ShowKeyboardHookState();\r
 369                         }\r
 370                         break;\r
 371                 case WM_NCACTIVATE:\r
 372                         if (cwps->wParam && cwps->hwnd == GetForegroundWindow()) {\r
 373                                 InitKeyboardProc(FALSE);\r
 374                                 ShowKeyboardHookState();\r
 375                         }\r
 376                         break;\r
 377                 }\r
 378         }\r
 379         return CallNextHookEx(m_hHookCallWnd, nCode, wParam, lParam);\r
 380 }\r
 381 \r
 382 LRESULT CALLBACK CXkeymacsDll::CallWndRetProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 383 {\r
 384         SetKeyboardHook();\r
 385         if (nCode >= 0) {\r
 386                 const CWPRETSTRUCT *cwprets = reinterpret_cast<CWPRETSTRUCT *>(lParam);\r
 387                 switch (cwprets->message) {\r
 388                 case WM_SETTEXT:\r
 389                         if (cwprets->hwnd == GetForegroundWindow())\r
 390                                 InitKeyboardProc(FALSE);\r
 391                         break;\r
 392                 case WM_SETCURSOR:\r
 393                         DoSetCursor();\r
 394                         break;\r
 395                 }\r
 396         }\r
 397         return CallNextHookEx(m_hHookCallWndRet, nCode, wParam, lParam);\r
 398 }\r
 399 \r
 400 LRESULT CALLBACK CXkeymacsDll::GetMsgProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 401 {\r
 402         SetKeyboardHook();\r
 403         if (nCode >= 0) {\r
 404                 const MSG *msg = reinterpret_cast<MSG *>(lParam);\r
 405                 switch (msg->message) {\r
 406                 case WM_IME_STARTCOMPOSITION:\r
 407                         InitKeyboardProc(TRUE);\r
 408                         break;\r
 409                 case WM_IME_ENDCOMPOSITION:\r
 410                         InitKeyboardProc(FALSE);\r
 411                         break;\r
 412                 }\r
 413         }\r
 414         return CallNextHookEx(m_hHookGetMessage, nCode, wParam, lParam);\r
 415 }\r
 416 \r
 417 LRESULT CALLBACK CXkeymacsDll::ShellProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 418 {\r
 419         if (nCode == HSHELL_WINDOWACTIVATED) {\r
 420                 TCHAR className[256];\r
 421                 GetClassName((HWND)wParam, className, 255);\r
 422                 if (!_tcsicmp(className, _T("ConsoleWindowClass"))) {\r
 423                         InitKeyboardProc(FALSE);\r
 424                         ShowKeyboardHookState();\r
 425                 }\r
 426         }\r
 427         return CallNextHookEx(m_hHookShell, nCode, wParam, lParam);\r
 428 }\r
 429 \r
 430 UINT CXkeymacsDll::GetModifierState(BOOL bPhysicalKey)\r
 431 {\r
 432         UINT result = 0;\r
 433         if (IsDown(VK_SHIFT, bPhysicalKey))\r
 434                 result |= SHIFT;\r
 435         if (IsDown(VK_CONTROL, bPhysicalKey))\r
 436                 result |= CONTROL;\r
 437         if (IsDown(VK_MENU, bPhysicalKey))\r
 438                 result |= META;\r
 439         return result;\r
 440 }\r
 441 \r
 442 void CXkeymacsDll::SetModifierState(const UINT after, const UINT before)\r
 443 {\r
 444         if (after & SHIFT && !(before & SHIFT))\r
 445                 DepressKey(VK_SHIFT);\r
 446         else if (!(after & SHIFT) && before & SHIFT)\r
 447                 ReleaseKey(VK_SHIFT);\r
 448 \r
 449         if (after & CONTROL && !(before & CONTROL)) {\r
 450                 UpdateKeyboardState(VK_CONTROL, 1);\r
 451                 DepressKey(VK_CONTROL);\r
 452         } else if (!(after & CONTROL) && before & CONTROL) {\r
 453                 ReleaseKey(VK_CONTROL);\r
 454                 UpdateKeyboardState(VK_CONTROL, 0);\r
 455         }\r
 456 \r
 457         const BOOL bHookApp =\r
 458                 CUtils::IsVisualCpp() ||  CUtils::IsVisualStudio() ||\r
 459                 CUtils::IsInternetExplorer() || CUtils::IsFirefox() || CUtils::IsChrome();\r
 460         if (after & META && !(before & META)) {\r
 461                 if (bHookApp)\r
 462                         m_nHookAltRelease |= HOOK_ALT_LATER;\r
 463                 DepressKey(VK_MENU);\r
 464         } else if (!(after & META) && before & META) {\r
 465                 if (bHookApp)\r
 466                         ++m_nHookAltRelease;\r
 467                 ReleaseKey(VK_MENU);\r
 468         }\r
 469 }\r
 470 \r
 471 BOOL CXkeymacsDll::UpdateKeyboardState(BYTE bVk, BYTE bState)\r
 472 {\r
 473         BYTE ks[256] = {'\0'};\r
 474         if (!GetKeyboardState(ks))\r
 475                 return FALSE;\r
 476         ks[bVk] = bState;\r
 477         return SetKeyboardState(ks);\r
 478 }\r
 479 \r
 480 BOOL CXkeymacsDll::IsDown(BYTE bVk, BOOL bPhysicalKey)\r
 481 {\r
 482         return bPhysicalKey ? GetAsyncKeyState(bVk) < 0 : GetKeyState(bVk) < 0;\r
 483 }\r
 484 \r
 485 // Do keybd_event\r
 486 void CXkeymacsDll::DoKeybd_event(BYTE bVk, DWORD dwFlags)\r
 487 {\r
 488         // Set KEYEVENTF_EXTENDEDKEY if needed\r
 489         switch (bVk) {\r
 490         case VK_CONTROL:\r
 491                 if (m_bRightControl)\r
 492                         dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 493                 break;\r
 494 \r
 495         case VK_MENU:\r
 496                 if (m_bRightAlt)\r
 497                         dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 498                 break;\r
 499 \r
 500         case VK_SHIFT:\r
 501                 if (m_bRightShift) {\r
 502                         if (CUtils::IsXPorLater())\r
 503                                 bVk = VK_RSHIFT;\r
 504                         else\r
 505                                 dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 506                 }\r
 507                 break;\r
 508         case VK_PAUSE:\r
 509                 if (IsDown(VK_CONTROL, FALSE)) // Break\r
 510                         dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 511                 break;\r
 512         case VK_INSERT:\r
 513         case VK_DELETE:\r
 514         case VK_HOME:\r
 515         case VK_END:\r
 516         case VK_NEXT:\r
 517         case VK_PRIOR:\r
 518         case VK_UP:\r
 519         case VK_DOWN:\r
 520         case VK_RIGHT:\r
 521         case VK_LEFT:\r
 522         case VK_NUMLOCK:\r
 523         case VK_PRINT:\r
 524                 dwFlags |= KEYEVENTF_EXTENDEDKEY;\r
 525                 break;\r
 526         }\r
 527 //      CUtils::Log(_T("b: %x, %x, %x, %#hx, %#hx"), bVk, dwFlags, GetMessageExtraInfo(), GetKeyState(bVk), GetAsyncKeyState(bVk));\r
 528         keybd_event(bVk, 0, dwFlags, GetMessageExtraInfo());\r
 529 //      CUtils::Log(_T("a: %x, %x, %x, %#hx, %#hx"), bVk, dwFlags, GetMessageExtraInfo(), GetKeyState(bVk), GetAsyncKeyState(bVk));\r
 530 }\r
 531 \r
 532 // the key is being depressed\r
 533 void CXkeymacsDll::DepressKey(BYTE bVk, BOOL bOriginal) // bVk is virtual-key code, MSDN said\r
 534 {\r
 535         if (bOriginal) {\r
 536 //              CUtils::Log(_T("i: %x, %d, %d, %d, %d, %d, %d, %d, %d"), bVk,\r
 537 //                      IsDown(VK_CONTROL), IsDown(VK_CONTROL, FALSE), IsDepressedModifier(CCommands::C_), IsDepressedModifier(CCommands::C_, FALSE),\r
 538 //                      IsDown(VK_MENU), IsDown(VK_MENU, FALSE), IsDepressedModifier(CCommands::MetaAlt), IsDepressedModifier(CCommands::MetaAlt, FALSE));\r
 539                 SetOriginal(GetModifierState(), bVk);\r
 540         }\r
 541         DoKeybd_event(bVk, 0);\r
 542 }\r
 543 \r
 544 // the key is being released\r
 545 void CXkeymacsDll::ReleaseKey(BYTE bVk) // bVk is virtual-key code, MSDN said\r
 546 {\r
 547         DoKeybd_event(bVk, KEYEVENTF_KEYUP);\r
 548 }\r
 549 \r
 550 // bVk down, bVk up\r
 551 void CXkeymacsDll::Kdu(BYTE bVk, DWORD n, BOOL bOriginal)\r
 552 {\r
 553         while (n--) {\r
 554                 DepressKey(bVk, bOriginal);\r
 555                 ReleaseKey(bVk);\r
 556         }\r
 557 }\r
 558 \r
 559 void CXkeymacsDll::InitKeyboardProc(BOOL bImeComposition)\r
 560 {\r
 561         CUtils::SetApplicationName(bImeComposition);\r
 562         if (_tcsnicmp(m_Config.szSpecialApp[m_nAppID], CUtils::GetApplicationName(), 0xF) || !IsMatchWindowText(m_Config.szWindowText[m_nAppID])) {     // PROCESSENTRY32 has only 0xF bytes of Name\r
 563                 m_nAppID = -1;\r
 564                 for (int nAppID = 0; nAppID < MAX_APP; ++nAppID) {\r
 565                         if (_tcsnicmp(m_Config.szSpecialApp[nAppID], CUtils::GetApplicationName(), 0xF) || !IsMatchWindowText(m_Config.szWindowText[nAppID]))\r
 566                                 continue;\r
 567                         if (m_nAppID < 0)\r
 568                                 m_nAppID = nAppID;\r
 569                         else {\r
 570                                 const LPCSTR curText = m_Config.szWindowText[m_nAppID];\r
 571                                 const LPCSTR newText = m_Config.szWindowText[nAppID];\r
 572                                 const int curType = CUtils::GetWindowTextType(curText);\r
 573                                 const int newType = CUtils::GetWindowTextType(newText);\r
 574                                 if (curType < newType || curType == newType && _tcscmp(curText, newText) <= 0)\r
 575                                         m_nAppID = nAppID;\r
 576                         }\r
 577                 }\r
 578                 if (m_nAppID < 0)\r
 579                         m_nAppID = GetAppID(_T("Default"), 0);\r
 580         }\r
 581         if (m_Config.nSettingStyle[m_nAppID] != SETTING_DISABLE &&\r
 582                         (_tcsicmp(m_Config.szSpecialApp[m_nAppID], _T("Default")) || !CUtils::IsDefaultIgnoreApplication()) &&\r
 583                         !bImeComposition && CUtils::IsDialog() && m_Config.bUseDialogSetting[m_nAppID])\r
 584                 // Use Dialog Setting\r
 585                 m_nAppID = GetAppID(_T("Dialog"), m_nAppID);\r
 586 \r
 587         ICONMSG msg[3] = {\r
 588                 {CX_ICON, OFF_ICON, ""},\r
 589                 {MX_ICON, OFF_ICON, ""},\r
 590                 {META_ICON, OFF_ICON, ""}\r
 591         };\r
 592         SendIconMessage(msg, 3);\r
 593         CCommands::SetMark(FALSE);\r
 594         CCommands::SetTemporarilyDisableXKeymacs(FALSE);\r
 595         CCommands::Reset();\r
 596 }\r
 597 \r
 598 int CXkeymacsDll::GetAppID(const LPCSTR szName, const int fallback)\r
 599 {\r
 600         for (int i = 0; i < MAX_APP; ++i)\r
 601                 if (!_tcsicmp(m_Config.szSpecialApp[i], szName))\r
 602                         return i;\r
 603         return fallback;\r
 604 }\r
 605 \r
 606 LRESULT CALLBACK CXkeymacsDll::KeyboardProc(int nCode, WPARAM wParam, LPARAM lParam)\r
 607 {\r
 608         const BYTE nOrigKey = static_cast<BYTE>(wParam);\r
 609         const bool bRelease = (lParam & BEING_RELEASED) != 0;\r
 610         const bool bExtended = (lParam & EXTENDED_KEY) != 0;\r
 611         const HHOOK *phHook = reinterpret_cast<HHOOK *>(TlsGetValue(g_TlsIndex));\r
 612 \r
 613         static BOOL bLocked = FALSE;\r
 614         static const BYTE RECURSIVE_KEY = 0x07;\r
 615         static int (*fLastCommand)() = NULL;\r
 616         static BYTE nOneShotModifier[MAX_KEY] = {'\0'};\r
 617         static BOOL bCherryOneShotModifier = FALSE;\r
 618 \r
 619 //      CUtils::Log(_T("nCode = %#x, nKey = %#x, lParam = %#x"), nCode, nOrigKey, lParam);\r
 620 \r
 621         if (!m_bEnableKeyboardHook || CUtils::IsXkeymacs() ||\r
 622                         nCode < 0 || nCode == HC_NOREMOVE)\r
 623                 return CallNextHookEx(*phHook, nCode, wParam, lParam);\r
 624 \r
 625 //      CUtils::Log(_T("nKey = %#x, ext = %d, rel = %d, pre = %d, %#hx, %#hx"), nOrigKey,\r
 626 //              (lParam & EXTENDED_KEY) ? 1 : 0, (lParam & BEING_RELEASED) ? 1 : 0, (lParam & REPEATED_KEY) ? 1 : 0,\r
 627 //              GetKeyState(nOrigKey), GetAsyncKeyState(nOrigKey));\r
 628 \r
 629         if (nOrigKey == RECURSIVE_KEY) {\r
 630                 if (bRelease)\r
 631                         goto HOOK_RECURSIVE_KEY;\r
 632                 else\r
 633                         goto RECURSIVE_COMMAND;\r
 634         }\r
 635 \r
 636         CancelMarkWithShift(nOrigKey, bRelease);\r
 637 \r
 638         BYTE nKey = nOrigKey;\r
 639         switch (nKey) {\r
 640         case VK_CONTROL:\r
 641                 nKey = bExtended ? VK_RCONTROL : VK_LCONTROL;\r
 642                 break;\r
 643         case VK_MENU:\r
 644                 nKey = bExtended ? VK_RMENU : VK_LMENU;\r
 645                 break;\r
 646         case VK_SHIFT:\r
 647                 nKey = bExtended ? VK_RSHIFT : VK_LSHIFT;\r
 648                 break;\r
 649         }\r
 650 \r
 651 #define fCommand(type) (Commands[m_Config.nCommandID[m_nAppID][(type)][nKey]].fCommand)\r
 652 #define nFunctionID (m_Config.nFunctionID[m_nAppID][nType][nKey])\r
 653 \r
 654         if (bRelease) {\r
 655                 switch (nOrigKey) {\r
 656                 case VK_MENU:\r
 657                         if (m_nHookAltRelease) {\r
 658                                 if (m_nHookAltRelease & ~HOOK_ALT_LATER)\r
 659                                         m_nHookAltRelease--;\r
 660                                 else if (m_nHookAltRelease & HOOK_ALT_LATER)\r
 661                                         m_nHookAltRelease = 0;\r
 662                                 goto HOOK;\r
 663                         }\r
 664                         // pass through\r
 665                 case VK_LWIN:\r
 666                 case VK_RWIN:\r
 667                 case VK_APPS:\r
 668                         for (int i = 0; i < MAX_COMMAND_TYPE; ++i) {\r
 669                                 int (*const fCommand)() = fCommand(i);\r
 670                                 if (fCommand && !(nOrigKey == VK_MENU && fCommand == CCommands::MetaAlt))\r
 671                                         goto HOOK;\r
 672                         }\r
 673                 }\r
 674                 if (nOneShotModifier[nKey]) {\r
 675                         ReleaseKey(nOneShotModifier[nKey]);\r
 676                         nOneShotModifier[nKey] = 0;\r
 677                         if (bCherryOneShotModifier) {\r
 678                                 bCherryOneShotModifier = FALSE;\r
 679                                 Kdu(nKey);\r
 680                         }\r
 681                 }\r
 682                 goto DO_NOTHING;\r
 683         }\r
 684 \r
 685         if (m_Config.nSettingStyle[m_nAppID] == SETTING_DISABLE)\r
 686                 goto DO_NOTHING;\r
 687 \r
 688         // Do Nothing for Meadow, Mule for Win32, ... if those use default setting.\r
 689         if (!_tcsicmp(m_Config.szSpecialApp[m_nAppID], _T("Default")) && CUtils::IsDefaultIgnoreApplication())\r
 690                 goto DO_NOTHING;\r
 691 \r
 692         switch (IsPassThrough(nKey)) {\r
 693         case GOTO_DO_NOTHING:\r
 694                 goto DO_NOTHING;\r
 695         case GOTO_HOOK:\r
 696                 goto HOOK;\r
 697         case CONTINUE:\r
 698                 break;\r
 699         }\r
 700 \r
 701         // set command type\r
 702         int nType = IsDown(VK_SHIFT) * SHIFT | IsControl() * CONTROL | IsMeta() * META | CCommands::bC_x() * CONTROLX;\r
 703         // Ignore undefined C-x ?\r
 704         if (nType & CONTROLX && fCommand(nType) == NULL && nFunctionID < 0) {\r
 705                 if (m_Config.bIgnoreUndefinedC_x[m_nAppID]) {\r
 706                         CCommands::Reset(GOTO_HOOK);\r
 707                         goto HOOK;\r
 708                 }\r
 709                 nType &= ~CONTROLX;\r
 710         }\r
 711         // Ignore undefined Meta Ctrl+?\r
 712         if (CCommands::bM_() && nType & CONTROL && fCommand(nType) == NULL && nFunctionID < 0) {\r
 713                 if (m_Config.bIgnoreUndefinedMetaCtrl[m_nAppID]) {\r
 714                         if (CheckOriginal(CONTROL, nKey))\r
 715                                 goto DO_NOTHING;\r
 716                         CCommands::Reset(GOTO_HOOK);\r
 717                         goto HOOK;\r
 718                         nType &= ~META;\r
 719                 }\r
 720         }\r
 721 \r
 722         int nVirtualType = GetModifierState(FALSE);\r
 723         if (nOrigKey == VK_CONTROL)\r
 724                 nVirtualType &= ~CONTROL;\r
 725         if (nOrigKey == VK_MENU)\r
 726                 nVirtualType &= ~META;\r
 727         if (CheckOriginal(nVirtualType, nOrigKey)) {\r
 728                 goto DO_NOTHING;\r
 729         }\r
 730 \r
 731         int (*const fCommand)() = fCommand(nType);\r
 732         if (fCommand == CCommands::EnableOrDisableXKeymacs) {\r
 733                 ToggleKeyboardHookState();\r
 734                 goto HOOK;\r
 735         }\r
 736         if (fCommand == CCommands::EnableXKeymacs) {\r
 737                 if (!m_bHook)\r
 738                         ToggleKeyboardHookState();\r
 739                 goto HOOK;\r
 740         }\r
 741         if (fCommand == CCommands::DisableXKeymacs) {\r
 742                 if (m_bHook)\r
 743                         ToggleKeyboardHookState();\r
 744                 goto HOOK;\r
 745         }\r
 746         if (!m_bHook)\r
 747                 goto DO_NOTHING;\r
 748 \r
 749         if (CCommands::bM_x() && !bRelease) {\r
 750                 static size_t index = 0;\r
 751                 static TCHAR szPath[MAX_PATH] = {'\0'};\r
 752                 if (fCommand == CCommands::BackwardChar) {\r
 753                         if (index)\r
 754                                 --index;\r
 755                         goto HOOKX;\r
 756                 } else if (fCommand == CCommands::BeginningOfLine) {\r
 757                         index = 0;\r
 758                         goto HOOKX;\r
 759                 } else if (fCommand == CCommands::DeleteBackwardChar) {\r
 760                         if (index) {\r
 761                                 --index;\r
 762                                 memmove(szPath + index, szPath + index + 1, MAX_PATH - index);\r
 763                                 SetM_xTip(szPath);\r
 764                         }\r
 765                         goto HOOKX;\r
 766                 } else if (fCommand == CCommands::DeleteChar) {\r
 767                         if (index < _tcslen(szPath)) {\r
 768                                 memmove(szPath + index, szPath + index + 1, MAX_PATH - index);\r
 769                                 SetM_xTip(szPath);\r
 770                         }\r
 771                         goto HOOKX;\r
 772                 } else if (fCommand == CCommands::EndOfLine) {\r
 773                         index = _tcslen(szPath);\r
 774                         goto HOOKX;\r
 775                 } else if (fCommand == CCommands::ForwardChar) {\r
 776                         if (index < _tcslen(szPath))\r
 777                                 ++index;\r
 778                         goto HOOKX;\r
 779                 } else if (fCommand == CCommands::KeyboardQuit) {\r
 780                         CCommands::bM_x(FALSE);\r
 781                         index = 0;\r
 782                         memset(szPath, 0, sizeof(szPath));\r
 783                         goto HOOK;\r
 784                 } else if (nKey == VK_RETURN || fCommand == CCommands::Newline) {\r
 785                         InvokeM_x(szPath);\r
 786                         CCommands::bM_x(FALSE);\r
 787                         index = 0;\r
 788                         memset(szPath, 0, sizeof(szPath));\r
 789                         goto HOOK;\r
 790                 } else if (nKey && index < MAX_PATH - 1) {\r
 791                         const BOOL bIsShiftDown = IsDown(VK_SHIFT, FALSE);\r
 792                         TCHAR nAscii = 0;\r
 793                         do { // 1-127\r
 794                                 if (a2v(++nAscii) == nKey && bIsShiftDown == IsShift(nAscii)) {\r
 795 //                                      CUtils::Log("M-x: %#X (%c), %#X (%c)", nKey, nKey, nAscii, nAscii);\r
 796                                         if (index < _tcslen(szPath))\r
 797                                                 memmove(szPath + index + 1, szPath + index, MAX_PATH - index - 1);\r
 798                                         szPath[index++] = nAscii;\r
 799 //                                      CUtils::Log("M-x: %c(%#04x)", nAscii, nAscii);\r
 800                                         SetM_xTip(szPath);\r
 801                                         goto HOOKX;\r
 802                                 }\r
 803                         } while (nAscii != 127);\r
 804                 }\r
 805         }\r
 806 \r
 807         if (CCommands::bC_u() && nType == NONE) {\r
 808                 if ('0' <= nKey && nKey <= '9') {\r
 809                         CCommands::NumericArgument(nKey - '0');\r
 810                         goto HOOK0_9;\r
 811                 }\r
 812                 if (nKey == VK_OEM_MINUS) {\r
 813                         CCommands::NumericArgumentMinus();\r
 814                         goto HOOK0_9;\r
 815                 }\r
 816         }\r
 817 \r
 818 #define OneShotModifier(type, vk, mod) \\r
 819         if (fCommand(nType & ~type) == CCommands::OneShotModifier ## mod || \\r
 820                         fCommand(nType) == CCommands::OneShotModifier ## mod ## Repeat) { \\r
 821                 nOneShotModifier[nKey] = vk; \\r
 822                 DepressKey(vk); \\r
 823                 bCherryOneShotModifier = TRUE; \\r
 824                 goto HOOK; \\r
 825         } else if (fCommand(nType & ~CONTROL) == CCommands::OneShotModifier ## mod ## Repeat) { \\r
 826                 ReleaseKey(vk); \\r
 827                 bCherryOneShotModifier = FALSE; \\r
 828                 Kdu(nKey); \\r
 829                 goto HOOK; \\r
 830         }\r
 831 \r
 832         OneShotModifier(CONTROL, VK_CONTROL, Ctrl);\r
 833         OneShotModifier(META, VK_MENU, Alt);\r
 834         OneShotModifier(SHIFT, VK_SHIFT, Shift);\r
 835         int i;\r
 836         for (i = 0; i < MAX_KEY; ++i)\r
 837                 if (nOneShotModifier[i] == nOrigKey)\r
 838                         break;\r
 839         if (i == MAX_KEY)\r
 840                 bCherryOneShotModifier = FALSE;\r
 841 \r
 842         if (0 <= nFunctionID && nFunctionID < MAX_FUNCTION && m_Config.szFunctionDefinition[nFunctionID][0]) {\r
 843                 CallFunction(nFunctionID);\r
 844                 CCommands::Reset(GOTO_HOOK);\r
 845                 goto HOOK;\r
 846         }\r
 847 #undef fCommand\r
 848 #undef nFunctionID\r
 849 \r
 850         if (!fCommand) {\r
 851                 if (nOrigKey == VK_CONTROL || nOrigKey == VK_MENU || nOrigKey == VK_SHIFT)\r
 852                         goto DO_NOTHING;\r
 853                 if (!(nType & SHIFT)) {\r
 854                         if (CCommands::IsSetMark()) {\r
 855                                 if (CCommands::MoveCaret(nKey, nType & CONTROL) != CONTINUE) {\r
 856                                         CCommands::ClearNumericArgument();\r
 857                                         goto HOOK;\r
 858                                 }\r
 859                                 CCommands::SetMark(FALSE);\r
 860                         }\r
 861                 }\r
 862                 if (1 < CCommands::GetNumericArgument()) {\r
 863                         Kdu(nKey, CCommands::GetNumericArgument());\r
 864                         CCommands::ClearNumericArgument();\r
 865                         goto HOOK;\r
 866                 }\r
 867                 goto DO_NOTHING;\r
 868         }\r
 869 \r
 870         if (CCommands::IsTemporarilyDisableXKeymacs()  && fCommand != CCommands::KeyboardQuit) {\r
 871                 CCommands::SetTemporarilyDisableXKeymacs(FALSE);\r
 872                 goto DO_NOTHING;\r
 873         }\r
 874 \r
 875         m_bRightControl = IsDown(VK_RCONTROL, FALSE);\r
 876         m_bRightAlt = IsDown(VK_RMENU, FALSE);\r
 877         m_bRightShift = IsDown(VK_RSHIFT, FALSE);\r
 878 \r
 879         if (bLocked)\r
 880                 goto HOOK_RECURSIVE_KEY;\r
 881         bLocked = TRUE;\r
 882         fLastCommand = fCommand;\r
 883 RECURSIVE_COMMAND:\r
 884         switch (fLastCommand()) {\r
 885         case GOTO_DO_NOTHING:\r
 886                 bLocked = FALSE;\r
 887                 goto DO_NOTHING;\r
 888         case GOTO_HOOK:\r
 889                 bLocked = FALSE;\r
 890                 goto HOOK;\r
 891         case GOTO_RECURSIVE:\r
 892                 goto RECURSIVE;\r
 893         case GOTO_HOOKX:\r
 894                 bLocked = FALSE;\r
 895                 goto HOOKX;\r
 896                 case GOTO_HOOK0_9:\r
 897                 bLocked = FALSE;\r
 898                 goto HOOK0_9;\r
 899         }\r
 900 \r
 901 DO_NOTHING:\r
 902         SetModifierIcons();\r
 903         if (m_bRecordingMacro && (!bRelease || m_bDown[wParam])) {\r
 904                 KbdMacro m = { nCode, wParam, lParam, TRUE };\r
 905                 m_Macro.push_back(m);\r
 906                 m_bDown[wParam] |= !bRelease;\r
 907         }\r
 908         return CallNextHookEx(*phHook, nCode, wParam, lParam);\r
 909 \r
 910 RECURSIVE:\r
 911         Kdu(RECURSIVE_KEY, 1, FALSE);\r
 912         goto HOOKX;\r
 913 HOOK:\r
 914         CCommands::SetLastCommand(fLastCommand);\r
 915 HOOK0_9:\r
 916 HOOKX:\r
 917         SetModifierIcons();\r
 918 HOOK_RECURSIVE_KEY:\r
 919         return TRUE;\r
 920 }\r
 921 \r
 922 void CXkeymacsDll::SetModifierIcons()\r
 923 {\r
 924 #define IconState(x) ((x) ? ON_ICON : OFF_ICON)\r
 925         ICONMSG msg[6] = {\r
 926                 {MX_ICON, IconState(CCommands::bM_x()), ""},\r
 927                 {CX_ICON, IconState(CCommands::bC_x()), ""},\r
 928                 {META_ICON, IconState(CCommands::bM_()), ""},\r
 929                 {SHIFT_ICON, IconState(IsDown(VK_SHIFT, FALSE)), ""},\r
 930                 {CTRL_ICON, IconState(IsControl()), ""},\r
 931                 {ALT_ICON, IconState(IsDown(VK_MENU, FALSE)), ""}\r
 932         };\r
 933         _tcscpy_s(msg[0].szTip, m_M_xTip);\r
 934         SendIconMessage(msg, 6);\r
 935 }\r
 936 \r
 937 // Clear data of nAppID\r
 938 void CXkeymacsDll::Clear(int nAppID)\r
 939 {\r
 940         if (0 <= nAppID && nAppID < MAX_APP) {\r
 941                 ZeroMemory(m_Config.szSpecialApp[nAppID], sizeof(m_Config.szSpecialApp[nAppID]));\r
 942                 ZeroMemory(m_Config.nCommandID[nAppID], sizeof(m_Config.nCommandID[nAppID]));\r
 943                 m_Config.nKillRingMax[nAppID] = 0;\r
 944                 m_Config.bUseDialogSetting[nAppID] = FALSE;\r
 945                 m_Config.nSettingStyle[nAppID] = 0;\r
 946         } else {\r
 947                 ASSERT(0);\r
 948         }\r
 949 }\r
 950 \r
 951 BOOL CXkeymacsDll::IsValidKey(BYTE bVk)\r
 952 {\r
 953         if (bVk == 0xf0) {      // 0xf0: Eisu key. GetAsyncKeyState returns the wrong state of Eisu key.\r
 954                 return FALSE;\r
 955         }\r
 956 \r
 957         switch (bVk) {\r
 958         case VK_CONTROL:\r
 959         case VK_MENU:\r
 960         case VK_SHIFT:\r
 961                 return FALSE;\r
 962         default:\r
 963                 break;\r
 964         }\r
 965 \r
 966         return TRUE;\r
 967 }\r
 968 \r
 969 BOOL CXkeymacsDll::IsDepressedModifier(int (__cdecl *Modifier)(void), BOOL bPhysicalKey)\r
 970 {\r
 971         BYTE bVk = 0;\r
 972         do {\r
 973                 if (IsValidKey(bVk) && IsDown(bVk, bPhysicalKey) &&\r
 974                                 Commands[m_Config.nCommandID[m_nAppID][NONE][bVk]].fCommand == Modifier)\r
 975                         return TRUE;\r
 976         } while (++bVk);\r
 977         return FALSE;\r
 978 }\r
 979 \r
 980 void CXkeymacsDll::CancelMarkWithShift(BYTE nKey, bool bRelease)\r
 981 {\r
 982         static bool bShift;\r
 983         if (nKey != VK_SHIFT)\r
 984                 goto exit;\r
 985         BYTE bVk = 0;\r
 986         do {\r
 987                 if (bVk == VK_SHIFT || VK_LSHIFT || VK_RSHIFT)\r
 988                         continue;\r
 989                 if (IsDown(bVk, FALSE))\r
 990                         goto exit;\r
 991         } while (++bVk);\r
 992         if (!bRelease) {\r
 993                 bShift = TRUE;\r
 994                 return;\r
 995         }\r
 996         if (bShift)\r
 997                 CCommands::SetMark(FALSE);\r
 998 exit:\r
 999         bShift = FALSE;\r
1000         return;\r
1001 }\r
1002 \r
1003 BOOL CXkeymacsDll::IsControl()\r
1004 {\r
1005         return CCommands::bC_() || IsDepressedModifier(CCommands::C_);\r
1006 }\r
1007 \r
1008 BOOL CXkeymacsDll::IsMeta()\r
1009 {\r
1010         return CCommands::bM_() || IsDepressedModifier(CCommands::MetaAlt);\r
1011 }\r
1012 \r
1013 void CXkeymacsDll::AddKillRing(BOOL bNewData)\r
1014 {\r
1015         if (m_Config.nKillRingMax[m_nAppID] == 0) {\r
1016                 return;\r
1017         }\r
1018 \r
1019         CClipboardSnap *pSnap = new CClipboardSnap;\r
1020         if( !pSnap ) return;\r
1021 \r
1022         BOOL bCapture = pSnap->Capture();\r
1023         bCapture = pSnap->Capture();    // for "office drawing shape format". Can CClipboardSnap care this problem?\r
1024 \r
1025         if( bCapture ) {\r
1026                 if (bNewData) {\r
1027                         m_oKillRing.AddHead(pSnap);\r
1028                 } else {\r
1029                         if (m_oKillRing.IsEmpty()) {\r
1030                                 m_oKillRing.AddHead(pSnap);\r
1031                         } else {\r
1032                                 CClipboardSnap *pParent;\r
1033                                 for (pParent = m_oKillRing.GetHead(); pParent->GetNext(); pParent = pParent->GetNext()) {\r
1034                                         ;\r
1035                                 }\r
1036                                 pParent->SetNext(pSnap);\r
1037                         }\r
1038                 }\r
1039         } else {\r
1040                 delete pSnap;\r
1041                 pSnap = NULL;\r
1042         }\r
1043 \r
1044         m_nKillRing = 0;\r
1045 \r
1046         if (m_Config.nKillRingMax[m_nAppID] < m_oKillRing.GetCount()) {\r
1047                 CClipboardSnap *pSnap = m_oKillRing.GetTail();\r
1048                 delete pSnap;\r
1049                 pSnap = NULL;\r
1050                 m_oKillRing.RemoveTail();\r
1051         }\r
1052 }\r
1053 \r
1054 // Return TRUE if there is another data\r
1055 // Return FALSE if there is no more data\r
1056 CClipboardSnap* CXkeymacsDll::GetKillRing(CClipboardSnap* pSnap, BOOL bForce)\r
1057 {\r
1058         if (m_Config.nKillRingMax[m_nAppID] == 0) {\r
1059                 return NULL;\r
1060         }\r
1061 \r
1062         if (m_oKillRing.IsEmpty()) {\r
1063                 return NULL;\r
1064         }\r
1065 \r
1066         m_nKillRing %= m_oKillRing.GetCount();\r
1067 \r
1068         if (!bForce) {\r
1069                 CClipboardSnap oCurrentSnap;\r
1070                 oCurrentSnap.Capture();\r
1071 \r
1072                 CClipboardSnap *pKillRing = m_oKillRing.GetAt(m_oKillRing.FindIndex(m_nKillRing));\r
1073                 if (!pKillRing) {\r
1074                         return NULL;\r
1075                 }\r
1076                 for (; pKillRing->GetNext(); pKillRing = pKillRing->GetNext()) {\r
1077                         ;\r
1078                 }\r
1079                 if (*pKillRing != oCurrentSnap) {\r
1080                         return NULL;\r
1081                 }\r
1082         }\r
1083 \r
1084         if (!pSnap) {\r
1085                 pSnap = m_oKillRing.GetAt(m_oKillRing.FindIndex(m_nKillRing));\r
1086         }\r
1087         pSnap->Restore();\r
1088 \r
1089         return pSnap->GetNext();\r
1090 }\r
1091 \r
1092 void CXkeymacsDll::SetOriginal(UINT nType, BYTE bVk)\r
1093 {\r
1094         m_nOriginal[nType & ~SHIFT][bVk]++;\r
1095 }\r
1096 \r
1097 int CXkeymacsDll::CheckOriginal(UINT nType, BYTE bVk)\r
1098 {\r
1099         nType &= ~SHIFT;\r
1100         if (m_nOriginal[nType][bVk])\r
1101                 return m_nOriginal[nType][bVk]--;\r
1102         return 0;\r
1103 }\r
1104 \r
1105 void CXkeymacsDll::IncreaseKillRingIndex(int nKillRing)\r
1106 {\r
1107         m_nKillRing += nKillRing;\r
1108 }\r
1109 \r
1110 BOOL CXkeymacsDll::GetEnableCUA()\r
1111 {\r
1112         return m_Config.bEnableCUA[m_nAppID];\r
1113 }\r
1114 \r
1115 void CXkeymacsDll::StartRecordMacro()\r
1116 {\r
1117         if (CCommands::bC_u())\r
1118                 CallMacro();\r
1119         m_bRecordingMacro = TRUE;\r
1120         m_Macro.erase(m_Macro.begin(), m_Macro.end());\r
1121         ZeroMemory(m_bDown, MAX_KEY);\r
1122 }\r
1123 \r
1124 void CXkeymacsDll::EndRecordMacro()\r
1125 {\r
1126         m_bRecordingMacro = FALSE;\r
1127         while (!m_Macro.empty()) { // remove not released push\r
1128                 const KbdMacro& m = m_Macro.back();\r
1129                 if (m.lParam & BEING_RELEASED)\r
1130                         break;\r
1131                 m_Macro.pop_back();\r
1132         }\r
1133 }\r
1134 \r
1135 void CXkeymacsDll::CallMacro()\r
1136 {\r
1137         if (m_bRecordingMacro)\r
1138                 m_bRecordingMacro = FALSE;\r
1139         UINT before = GetModifierState(FALSE);\r
1140         SetModifierState(0, before);\r
1141         for (std::list<KbdMacro>::const_iterator m = m_Macro.begin(); m != m_Macro.end(); ++m)\r
1142                 if (m->lParam & BEING_RELEASED)\r
1143                         ReleaseKey(static_cast<BYTE>(m->wParam));\r
1144                 else\r
1145                         DepressKey(static_cast<BYTE>(m->wParam), m->bOriginal);\r
1146         SetModifierState(before, 0);\r
1147 }\r
1148 \r
1149 BOOL CXkeymacsDll::Is106Keyboard()\r
1150 {\r
1151         return m_Config.b106Keyboard;\r
1152 }\r
1153 \r
1154 int CXkeymacsDll::IsPassThrough(BYTE nKey)\r
1155 {\r
1156         BYTE bVk = 0;\r
1157         do {\r
1158                 if (IsDown(bVk)\r
1159                  && (Commands[m_Config.nCommandID[m_nAppID][NONE][bVk]].fCommand == CCommands::PassThrough)) {\r
1160                         if (bVk == nKey) {\r
1161                                 return GOTO_HOOK;\r
1162                         }\r
1163 \r
1164                         return GOTO_DO_NOTHING;\r
1165                 }\r
1166         } while (++bVk);\r
1167         return CONTINUE;\r
1168 }\r
1169 \r
1170 // call an original command which is defined in dot.xkeymacs\r
1171 void CXkeymacsDll::CallFunction(int nFuncID)\r
1172 {\r
1173         if (nFuncID < 0 || nFuncID >= MAX_FUNCTION)\r
1174                 return;\r
1175         LPCTSTR def = m_Config.szFunctionDefinition[nFuncID];\r
1176         if (!def[0])\r
1177                 return;\r
1178         std::vector<KeyBind> keybinds;\r
1179         const LPCTSTR last = def + _tcslen(def) - 1;\r
1180         if (*def == _T('"') && *last == _T('"')) {\r
1181                 ++def; // skip '"'\r
1182                 while (def < last)\r
1183                         keybinds.push_back(ParseKey(def));\r
1184         } else if (*def == _T('[') && *last == _T(']')) {\r
1185                 while (++def < last) { // skip '[', ']', and ' '\r
1186                         if (*def == _T('?')) { // [?f ?o ?o]\r
1187                                 keybinds.push_back(ParseKey(++def));\r
1188                                 continue;\r
1189                         }\r
1190                         // [VK]\r
1191                         for (int i = 0; i < MAX_KEYNAME; ++i) {\r
1192                                 size_t keylen = _tcslen(KeyNames[i].name);\r
1193                                 if (!_tcsncmp(def, KeyNames[i].name, keylen)) {\r
1194                                         KeyBind keybind = {NONE, KeyNames[i].bVk};\r
1195                                         keybinds.push_back(keybind);\r
1196                                         def += keylen;\r
1197                                         break;\r
1198                                 }\r
1199                         }\r
1200                 }\r
1201         } else\r
1202                 return;\r
1203 \r
1204         BOOL bM_x = FALSE;\r
1205         TCHAR szPath[MAX_PATH] = {'\0'};\r
1206         unsigned int index = 0;\r
1207         BOOL bInitialized = FALSE;\r
1208         UINT before = GetModifierState(FALSE);\r
1209 \r
1210         for (std::vector<KeyBind>::const_iterator p = keybinds.begin(); p != keybinds.end(); ++p) {\r
1211                 const int nType = p->nType;\r
1212                 const BYTE bVk = p->bVk;\r
1213                 int (*fCommand)() = nType < MAX_COMMAND_TYPE ? Commands[m_Config.nCommandID[m_nAppID][nType][bVk]].fCommand : NULL;\r
1214                 if (fCommand) {\r
1215                         if (fCommand == CCommands::ExecuteExtendedCommand)\r
1216                                 bM_x = TRUE;\r
1217                         else if (!bInitialized) {\r
1218                                 SetModifierState(0, before);\r
1219                                 bInitialized = TRUE;\r
1220                         }\r
1221 //                      CUtils::Log("CallFunction: Command Name: %s", Commands[m_Config.nCommandID[m_nAppID][nType][bVk]].szCommandName);\r
1222                         while (fCommand() == GOTO_RECURSIVE)\r
1223                                 ;\r
1224                         continue;\r
1225                 }\r
1226                 if (bM_x) {\r
1227                         if (bVk == VK_RETURN)\r
1228                                 InvokeM_x(szPath);\r
1229                         else if (bVk != 0) {\r
1230                                 TCHAR nAscii = 0;\r
1231                                 do { // 1-127\r
1232                                         if (a2v(++nAscii) == bVk && ((nType & SHIFT) != 0) == IsShift(nAscii)) {\r
1233 //                                              CUtils::Log("M-x: %#X (%c), %#X (%c)", bVk, bVk, nAscii, nAscii);\r
1234                                                 szPath[index++] = nAscii;\r
1235                                                 break;\r
1236                                         }\r
1237                                 } while (nAscii != 127);\r
1238                         }\r
1239                         continue;\r
1240                 }\r
1241                 if (!bInitialized) {\r
1242                         SetModifierState(0, before);\r
1243                         bInitialized = TRUE;\r
1244                 }\r
1245                 if (nType & WIN_WIN)\r
1246                         DepressKey(VK_LWIN);\r
1247                 if (nType & WIN_CTRL)\r
1248                         DepressKey(VK_CONTROL);\r
1249                 if (nType & WIN_ALT)\r
1250                         DepressKey(VK_MENU);\r
1251                 if (nType & SHIFT)\r
1252                         DepressKey(VK_SHIFT);\r
1253                 Kdu(bVk);\r
1254                 const int nNextType = (p + 1) != keybinds.end() ? (p + 1)->nType : 0;\r
1255                 if (nType & SHIFT && !(nNextType & SHIFT))\r
1256                         ReleaseKey(VK_SHIFT);\r
1257                 if (nType & WIN_ALT && !(nNextType & WIN_ALT))\r
1258                         ReleaseKey(VK_MENU);\r
1259                 if (nType & WIN_CTRL && !(nNextType & WIN_CTRL))\r
1260                         ReleaseKey(VK_CONTROL);\r
1261                 if (nType & WIN_WIN && !(nNextType & WIN_WIN))\r
1262                         ReleaseKey(VK_LWIN);\r
1263         }\r
1264 \r
1265         if (bInitialized)\r
1266                 // If this lines is invoked on M-x, a window transition does not work well.\r
1267                 SetModifierState(before, 0);\r
1268         return;\r
1269 }\r
1270 \r
1271 KeyBind CXkeymacsDll::ParseKey(LPCTSTR& def)\r
1272 {\r
1273         KeyBind keybind = {NONE};\r
1274         if (*def == _T('\\')) { // set modifiers\r
1275                 ++def;\r
1276         LOOP:\r
1277                 for (int i = 0; i < MAX_MODIFIER; ++i) {\r
1278                         size_t len = _tcslen(Modifiers[i].name);\r
1279                         if (!_tcsncmp(def, Modifiers[i].name, len)) {\r
1280                                 keybind.nType |= Modifiers[i].id;\r
1281                                 def += len;\r
1282                                 goto LOOP;\r
1283                         }\r
1284                 }\r
1285         }\r
1286         if (IsShift(*def) && !(keybind.nType & (WIN_CTRL | WIN_ALT | WIN_WIN)))\r
1287                 keybind.nType |= SHIFT;\r
1288         int i = 0;\r
1289         for (; i < MAX_KEYNAME; ++i) {\r
1290                 size_t len = _tcslen(KeyNames[i].name);\r
1291                 if (!_tcsncmp(def, KeyNames[i].name, len)) {\r
1292                         def += len;\r
1293                         break;\r
1294                 }\r
1295         }\r
1296         keybind.bVk = i < MAX_KEYNAME ? KeyNames[i].bVk : a2v(*def++);\r
1297         return keybind;\r
1298 }\r
1299 \r
1300 BOOL CXkeymacsDll::IsShift(TCHAR nAscii)\r
1301 {\r
1302         switch (nAscii) {\r
1303         case _T(' '):\r
1304                 return FALSE;\r
1305         case _T('!'):\r
1306         case _T('"'):\r
1307         case _T('#'):\r
1308         case _T('$'):\r
1309         case _T('%'):\r
1310         case _T('&'):\r
1311                 return TRUE;\r
1312         case _T('\''):\r
1313                 return m_Config.b106Keyboard;\r
1314         case _T('('):\r
1315         case _T(')'):\r
1316         case _T('*'):\r
1317         case _T('+'):\r
1318                 return TRUE;\r
1319         case _T(','):\r
1320         case _T('-'):\r
1321         case _T('.'):\r
1322         case _T('/'):\r
1323         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
1324                 return FALSE;\r
1325         case _T(':'):\r
1326                 return !m_Config.b106Keyboard;\r
1327         case _T(';'):\r
1328                 return FALSE;\r
1329         case _T('<'):\r
1330                 return TRUE;\r
1331         case _T('='):\r
1332                 return m_Config.b106Keyboard;\r
1333         case _T('>'):\r
1334         case _T('?'):\r
1335                 return TRUE;\r
1336         case _T('@'):\r
1337                 return !m_Config.b106Keyboard;\r
1338         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
1339         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
1340         case _T('U'): case _T('V'): case _T('W'): case _T('X'): case _T('Y'): case _T('Z'): \r
1341                 return TRUE;\r
1342         case _T('['):\r
1343         case _T('\\'):\r
1344         case _T(']'):\r
1345                 return FALSE;\r
1346         case _T('^'):\r
1347                 return !m_Config.b106Keyboard;\r
1348         case _T('_'):\r
1349                 return TRUE;\r
1350         case _T('`'):\r
1351                 return m_Config.b106Keyboard;\r
1352         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
1353         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
1354         case _T('u'): case _T('v'): case _T('w'): case _T('x'): case _T('y'): case _T('z'): \r
1355                 return FALSE;\r
1356         case _T('{'):\r
1357         case _T('|'):\r
1358         case _T('}'):\r
1359         case _T('~'):\r
1360                 return TRUE;\r
1361         default:\r
1362                 return FALSE;\r
1363         }\r
1364 }\r
1365 \r
1366 BYTE CXkeymacsDll::a2v(TCHAR nAscii)\r
1367 {\r
1368         switch (nAscii) {\r
1369         case _T(' '):\r
1370                 return VK_SPACE;\r
1371         case _T('!'):\r
1372                 return '1';\r
1373         case _T('"'):\r
1374                 return m_Config.b106Keyboard ? '2' : (BYTE) 0xde;       // VK_OEM_7\r
1375         case _T('#'):\r
1376                 return '3';\r
1377         case _T('$'):\r
1378                 return '4';\r
1379         case _T('%'):\r
1380                 return '5';\r
1381         case _T('&'):\r
1382                 return m_Config.b106Keyboard ? '6' : '7';\r
1383         case _T('\''):\r
1384                 return m_Config.b106Keyboard ? '7' : (BYTE) 0xde;       // VK_OEM_7\r
1385         case _T('('):\r
1386                 return m_Config.b106Keyboard ? '8' : '9';\r
1387         case _T(')'):\r
1388                 return m_Config.b106Keyboard ? '9' : '0';\r
1389         case _T('*'):\r
1390                 return m_Config.b106Keyboard ? (BYTE) 0xba : '8';       // VK_OEM_1\r
1391         case _T('+'):\r
1392                 return 0xbb;    // VK_OEM_PLUS\r
1393         case _T(','):\r
1394                 return 0xbc;    // VK_OEM_COMMA\r
1395         case _T('-'):\r
1396                 return 0xbd;    // VK_OEM_MINUS\r
1397         case _T('.'):\r
1398                 return 0xbe;    // VK_OEM_PERIOD\r
1399         case _T('/'):\r
1400                 return 0xbf;    // VK_OEM_2\r
1401         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
1402                 return nAscii;\r
1403         case _T(':'):\r
1404                 return 0xba;    // VK_OEM_1\r
1405         case _T(';'):\r
1406                 return m_Config.b106Keyboard ? (BYTE) 0xbb : (BYTE) 0xba;       // VK_OEM_PLUS  VK_OEM_1\r
1407         case _T('<'):\r
1408                 return 0xbc;    // VK_OEM_COMMA\r
1409         case _T('='):\r
1410                 return m_Config.b106Keyboard ? (BYTE) 0xbd : (BYTE) 0xbb;       // VK_OEM_MINUS VK_OEM_PLUS\r
1411         case _T('>'):\r
1412                 return 0xbe;    // VK_OEM_PERIOD\r
1413         case _T('?'):\r
1414                 return 0xbf;    // VK_OEM_2\r
1415         case _T('@'):\r
1416                 return m_Config.b106Keyboard ? (BYTE) 0xc0 : '2';\r
1417         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
1418         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
1419         case _T('U'): case _T('V'): case _T('W'): case _T('X'): case _T('Y'): case _T('Z'): \r
1420                 return nAscii;\r
1421         case _T('['):\r
1422                 return 0xdb;    // VK_OEM_4\r
1423         case _T('\\'):\r
1424                 return 0xdc;    // VK_OEM_5\r
1425         case _T(']'):\r
1426                 return 0xdd;    // VK_OEM_6\r
1427         case _T('^'):\r
1428                 return m_Config.b106Keyboard ? (BYTE) 0xde : '6';       // VK_OEM_7\r
1429         case _T('_'):\r
1430                 return m_Config.b106Keyboard ? (BYTE) 0xe2 : (BYTE) 0xbd;       // VK_OEM_102   VK_OEM_MINUS\r
1431         case _T('`'):\r
1432                 return 0xc0;    // VK_OEM_3\r
1433         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
1434         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
1435         case _T('u'): case _T('v'): case _T('w'): case _T('x'): case _T('y'): case _T('z'): \r
1436                 return (BYTE) (nAscii - (_T('a') - _T('A')));\r
1437         case _T('{'):\r
1438                 return 0xdb;    // VK_OEM_4\r
1439         case _T('|'):\r
1440                 return 0xdc;    // VK_OEM_5\r
1441         case _T('}'):\r
1442                 return 0xdd;    // VK_OEM_6\r
1443         case _T('~'):\r
1444                 return m_Config.b106Keyboard ? (BYTE) 0xde : (BYTE) 0xc0;       // VK_OEM_7     VK_OEM_3\r
1445         default:\r
1446                 return 0;\r
1447         }\r
1448 }\r
1449 \r
1450 BOOL CXkeymacsDll::IsMatchWindowText(CString szWindowText)\r
1451 {\r
1452         BOOL bIsMatchWindowText = TRUE;\r
1453 \r
1454         TCHAR szCurrentWindowText[WINDOW_TEXT_LENGTH] = {'\0'};\r
1455         GetWindowText(GetForegroundWindow(), szCurrentWindowText, sizeof(szCurrentWindowText));\r
1456 \r
1457         switch (CUtils::GetWindowTextType(szWindowText)) {\r
1458         case IDS_WINDOW_TEXT_MATCH:                                                             // *foo*\r
1459                 szWindowText.Delete(0);                                                         // Delete first '*'\r
1460                 szWindowText.Delete(szWindowText.GetLength() - 1);      // Delete last '*'\r
1461                 bIsMatchWindowText = 0 <= CString(szCurrentWindowText).Find(szWindowText);\r
1462                 break;\r
1463         case IDS_WINDOW_TEXT_MATCH_FORWARD:                                             // foo*\r
1464                 szWindowText.Delete(szWindowText.GetLength() - 1);      // Delete last '*'\r
1465                 bIsMatchWindowText = 0 == CString(szCurrentWindowText).Find(szWindowText);\r
1466                 break;\r
1467         case IDS_WINDOW_TEXT_MATCH_BACKWARD:                                    // *foo\r
1468                 szWindowText.Delete(0);                                                         // Delete first '*'\r
1469                 bIsMatchWindowText = 0 <= CString(szCurrentWindowText).Find(szWindowText, CString(szCurrentWindowText).GetLength() - szWindowText.GetLength());\r
1470                 break;\r
1471         case IDS_WINDOW_TEXT_MATCH_FULL:                                                // foo\r
1472                 bIsMatchWindowText = szWindowText == CString(szCurrentWindowText);\r
1473                 break;\r
1474         case IDS_WINDOW_TEXT_IGNORE:                                                    // *\r
1475                 bIsMatchWindowText = TRUE;\r
1476                 break;\r
1477         default:\r
1478                 ASSERT(0);\r
1479                 break;\r
1480         }\r
1481 \r
1482 //      CUtils::Log(_T("IsMatchWindowText: %d, _%s_, _%s_"), bIsMatchWindowText, szCurrentWindowText, szWindowText);\r
1483         return bIsMatchWindowText;\r
1484 }\r
1485 \r
1486 void CXkeymacsDll::SetAccelerate(int nAccelerate)\r
1487 {\r
1488         m_nAccelerate = nAccelerate;\r
1489 }\r
1490 \r
1491 int CXkeymacsDll::GetAccelerate()\r
1492 {\r
1493         return m_nAccelerate;\r
1494 }\r
1495 \r
1496 void CXkeymacsDll::SetKeyboardSpeed(int nKeyboardSpeed)\r
1497 {\r
1498         m_nKeyboardSpeed = nKeyboardSpeed;\r
1499 }\r
1500 \r
1501 unsigned int CXkeymacsDll::GetMaxKeyInterval()\r
1502 {\r
1503         // m_nKeyboardSpeed == 0:       slowest repeat rate; approximately  2 characters per second\r
1504         // m_nKeyboardSpeed == 31:      fastest repeat rate; approximately 30 characters per second\r
1505         // 47 ms is max on my machine w/ KeyboardSpeed 31.\r
1506         // 1000 /  2 + 50 = 550\r
1507         // 1000 / 30 + 50 = 83\r
1508         return (unsigned int) (1000.0 / (2.0 + m_nKeyboardSpeed % 32 * 28.0 / 31.0) + 50.0);\r
1509 }\r
1510 \r
1511 void CXkeymacsDll::SetCursorData(HCURSOR hEnable, HCURSOR hDisableTMP, HCURSOR hDisableWOCQ, HICON hDisable, BOOL bEnable)\r
1512 {\r
1513         m_hCursor[STATUS_ENABLE] = hEnable;\r
1514         m_hCursor[STATUS_DISABLE_TMP] = hDisableTMP;\r
1515         m_hCursor[STATUS_DISABLE_WOCQ] = hDisableWOCQ;\r
1516         m_hCursor[STATUS_DISABLE] = hDisable;\r
1517         m_bCursor = bEnable;\r
1518 }\r
1519 \r
1520 void CXkeymacsDll::DoSetCursor()\r
1521 {\r
1522         if (m_bCursor && m_hCurrentCursor) {\r
1523                 ::SetCursor(m_hCurrentCursor);\r
1524         }\r
1525 }\r
1526 \r
1527 BOOL CXkeymacsDll::Get326Compatible()\r
1528 {\r
1529         return m_Config.b326Compatible[m_nAppID];\r
1530 }\r
1531 \r
1532 void CXkeymacsDll::InvokeM_x(const TCHAR *const szPath)\r
1533 {\r
1534 //      CUtils::Log("M-x: szPath=_%s_", szPath);\r
1535         int (*fCommand)() = NULL;\r
1536 \r
1537         for (int i = 0; i < MAX_COMMAND; ++i) {\r
1538                 if (_tcsicmp(szPath, Commands[i].szCommandName) == 0) {\r
1539                         fCommand = Commands[i].fCommand;\r
1540                         break;\r
1541                 }\r
1542         }\r
1543 \r
1544         if (fCommand) {\r
1545 //              CUtils::Log("M-x: Command: _%s_", Commands[i].szCommandName);\r
1546                 fCommand();\r
1547         } else {\r
1548 //              CUtils::Log("M-x: Path: _%s_", szPath);\r
1549                 ShellExecute(NULL, NULL, szPath, NULL, NULL, SW_SHOWNORMAL);\r
1550         }\r
1551 }\r
1552 \r
1553 void CXkeymacsDll::SetM_xTip(const TCHAR *const szPath)\r
1554 {\r
1555         _tcscpy_s(m_M_xTip, "M-x LED");\r
1556         if (szPath && _tcslen(szPath) < 128 - 5)\r
1557                 _stprintf_s(m_M_xTip, "M-x %s", szPath);\r
1558 }\r
1559 \r
1560 BOOL CXkeymacsDll::SendIconMessage(ICONMSG *pMsg, DWORD num)\r
1561 {\r
1562         DWORD ack, read;\r
1563         return CallNamedPipe(ICON_PIPE, pMsg, sizeof(ICONMSG) * num, &ack, sizeof(DWORD), &read, NMPWAIT_NOWAIT);\r
1564 }\r