syskeyb.cc

功能较全面的反汇编器：反汇编器ht-2.0.15.tar.gz

/* 
 *	HT Editor
 *	syskeyb.cc - keyboard access functions for Win32
 *
 *	Copyright (C) 1999-2003 Sebastian Biallas ([e-mail])
 *
 *	This program is free software; you can redistribute it and/or modify
 *	it under the terms of the GNU General Public License version 2 as
 *	published by the Free Software Foundation.
 *
 *	This program is distributed in the hope that it will be useful,
 *	but WITHOUT ANY WARRANTY; without even the implied warranty of
 *	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *	GNU General Public License for more details.
 *
 *	You should have received a copy of the GNU General Public License
 *	along with this program; if not, write to the Free Software
 *	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include "io/keyb.h"

#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>

HANDLE gInputHandle;
static INPUT_RECORD key_event_record;
static bool key_pending=false;
static bool k_shift_state=false;
static bool k_ctrl_state=false;
static bool k_alt_state=false;

//#define KEY_DEBUG

#ifdef KEY_DEBUG
static FILE *kd;
#endif

struct ht_key_keycode {
	ht_key key;
	int keycode;
};

#define HT_VK                  0x300
#define HT_VK_ALT              (0x1000)
#define HT_VK_SHIFT            (0x2000)
#define HT_VK_CTRL             (0x3000)

static ht_key_keycode ht_win32_key_defs[] = {
	{K_Control_A,			(0x001+HT_VK_CTRL)},
	{K_Control_B,			(0x002+HT_VK_CTRL)},
	{K_Control_C,			(0x003+HT_VK_CTRL)},
	{K_Control_D,			(0x004+HT_VK_CTRL)},
	{K_Control_E,			(0x005+HT_VK_CTRL)},
	{K_Control_F,			(0x006+HT_VK_CTRL)},
	{K_Control_G,			(0x007+HT_VK_CTRL)},
	{K_Backspace,			(VK_BACK+HT_VK)},
	{K_Control_H,			(0x008+HT_VK_CTRL)},
	{K_Tab,				(VK_TAB+HT_VK)},
	{K_Control_I,			(0x009+HT_VK_CTRL)},
	{K_Control_J,			(0x00a+HT_VK_CTRL)},
	{K_Control_K,			(0x00b+HT_VK_CTRL)},
	{K_Control_L,			(0x00c+HT_VK_CTRL)},
	{K_Return,			(VK_RETURN+HT_VK)},
	{K_Control_M,			(0x00d+HT_VK_CTRL)},
	{K_Control_N,			(0x00e + HT_VK_CTRL)},	// preprocessor problem :-)
	{K_Control_O,			(0x00f+HT_VK_CTRL)},
	{K_Control_P,			(0x010+HT_VK_CTRL)},
	{K_Control_Q,			(0x011+HT_VK_CTRL)},
	{K_Control_R,			(0x012+HT_VK_CTRL)},
	{K_Control_S,			(0x013+HT_VK_CTRL)},
	{K_Control_T,			(0x014+HT_VK_CTRL)},
	{K_Control_U,			(0x015+HT_VK_CTRL)},
	{K_Control_V,			(0x016+HT_VK_CTRL)},
	{K_Control_W,			(0x017+HT_VK_CTRL)},
	{K_Control_X,			(0x018+HT_VK_CTRL)},
	{K_Control_Y,			(0x019+HT_VK_CTRL)},
	{K_Control_Z,			(0x01a+HT_VK_CTRL)},
	{K_Escape,			(VK_ESCAPE+HT_VK)},
//	{K_Control_LBracket,		0x01b},
//	{K_Control_BackSlash,		0x01c},
//	{K_Control_RBracket,		0x01d},
//	{K_Control_Caret,		0x01e},
//	{K_Control_Underscore,		0x01f},
//	{K_Control_Backspace,		(VK_BACK+HT_VK+HT_VK_CTRL)},

	{K_Meta_Escape,			(VK_ESCAPE+HT_VK+HT_VK_ALT)},
//	{K_Control_At,			0x103},
	{K_Meta_Backspace,		(VK_BACK+HT_VK+HT_VK_ALT)},
	{K_Shift_Tab,			(VK_TAB+HT_VK+HT_VK_SHIFT)},
	{K_Control_Tab,			(VK_TAB+HT_VK+HT_VK_CTRL)},
	{K_Meta_Q,			('q'+HT_VK_ALT)},
	{K_Meta_W,			('w'+HT_VK_ALT)},
	{K_Meta_E,			('e'+HT_VK_ALT)},
	{K_Meta_R,			('r'+HT_VK_ALT)},
	{K_Meta_T,			('t'+HT_VK_ALT)},
	{K_Meta_Y,			('y'+HT_VK_ALT)},
	{K_Meta_U,			('u'+HT_VK_ALT)},
	{K_Meta_I,			('i'+HT_VK_ALT)},
	{K_Meta_O,			('o'+HT_VK_ALT)},
	{K_Meta_P,			('p'+HT_VK_ALT)},
//	{K_Meta_LBracket,		0x11a},
//	{K_Meta_RBracket,		0x11b},
//	{K_Meta_Return,			0x11c},
	{K_Meta_A,			('a'+HT_VK_ALT)},
	{K_Meta_S,			('s'+HT_VK_ALT)},
	{K_Meta_D,			('d'+HT_VK_ALT)},
	{K_Meta_F,			('f'+HT_VK_ALT)},
	{K_Meta_G,			('g'+HT_VK_ALT)},
	{K_Meta_H,			('h'+HT_VK_ALT)},
	{K_Meta_J,			('j'+HT_VK_ALT)},
	{K_Meta_K,			('k'+HT_VK_ALT)},
	{K_Meta_L,			('l'+HT_VK_ALT)},
//	{K_Meta_Semicolon,		0x127},
//	{K_Meta_Quote,			0x128},
//	{K_Meta_Backquote,		0x129},
//	{K_Meta_Backslash,		0x12b},
	{K_Meta_Z,			('z'+HT_VK_ALT)},
	{K_Meta_X,			('x'+HT_VK_ALT)},
	{K_Meta_C,			('c'+HT_VK_ALT)},
	{K_Meta_V,			('v'+HT_VK_ALT)},
	{K_Meta_B,			('b'+HT_VK_ALT)},
	{K_Meta_N,			('n'+HT_VK_ALT)},
	{K_Meta_M,			('m'+HT_VK_ALT)},
//	{K_Meta_Comma,			0x133},
//	{K_Meta_Period,			0x134},
//	{K_Meta_Slash,			0x135},
//	{K_Meta_KPStar,			0x137},
	{K_F1,				(VK_F1+HT_VK)},
	{K_F2,				(VK_F2+HT_VK)},
	{K_F3,				(VK_F3+HT_VK)},
	{K_F4,				(VK_F4+HT_VK)},
	{K_F5,				(VK_F5+HT_VK)},
	{K_F6,				(VK_F6+HT_VK)},
	{K_F7,				(VK_F7+HT_VK)},
	{K_F8,				(VK_F8+HT_VK)},
	{K_F9,				(VK_F9+HT_VK)},
	{K_F10,				(VK_F10+HT_VK)},
	{K_Home,			(VK_HOME+HT_VK)},
	{K_Up,				(VK_UP+HT_VK)},
	{K_PageUp,			(VK_PRIOR+HT_VK)},
//	{K_Meta_KPMinus,			0x14a},
	{K_Left,			(VK_LEFT+HT_VK)},
//	{K_Center,			0x14c},
	{K_Right,			(VK_RIGHT+HT_VK)},
//	{K_Meta_KPPlus,			0x14e},
	{K_End,				(VK_END+HT_VK)},
	{K_Down,			(VK_DOWN+HT_VK)},
	{K_PageDown,			(VK_NEXT+HT_VK)},
	{K_Insert,			(VK_INSERT+HT_VK)},
	{K_Delete,			(VK_DELETE+HT_VK)},
	{K_Shift_F1,			(VK_F1+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F2,			(VK_F2+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F3,			(VK_F3+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F4,			(VK_F4+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F5,			(VK_F5+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F6,			(VK_F6+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F7,			(VK_F7+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F8,			(VK_F8+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F9,			(VK_F9+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F10,			(VK_F10+HT_VK+HT_VK_SHIFT)},
	{K_Control_F1,			(VK_F1+HT_VK+HT_VK_CTRL)},
	{K_Control_F2,			(VK_F2+HT_VK+HT_VK_CTRL)},
	{K_Control_F3,			(VK_F3+HT_VK+HT_VK_CTRL)},
	{K_Control_F4,			(VK_F4+HT_VK+HT_VK_CTRL)},
	{K_Control_F5,			(VK_F5+HT_VK+HT_VK_CTRL)},
	{K_Control_F6,			(VK_F6+HT_VK+HT_VK_CTRL)},
	{K_Control_F7,			(VK_F7+HT_VK+HT_VK_CTRL)},
	{K_Control_F8,			(VK_F8+HT_VK+HT_VK_CTRL)},
	{K_Control_F9,			(VK_F9+HT_VK+HT_VK_CTRL)},
	{K_Control_F10,			(VK_F10+HT_VK+HT_VK_CTRL)},
	{K_Meta_F1,			(VK_F1+HT_VK+HT_VK_ALT)},
	{K_Meta_F2,			(VK_F2+HT_VK+HT_VK_ALT)},
	{K_Meta_F3,			(VK_F3+HT_VK+HT_VK_ALT)},
	{K_Meta_F4,			(VK_F4+HT_VK+HT_VK_ALT)},
	{K_Meta_F5,			(VK_F5+HT_VK+HT_VK_ALT)},
	{K_Meta_F6,			(VK_F6+HT_VK+HT_VK_ALT)},
	{K_Meta_F7,			(VK_F7+HT_VK+HT_VK_ALT)},
	{K_Meta_F8,			(VK_F8+HT_VK+HT_VK_ALT)},
	{K_Meta_F9,			(VK_F9+HT_VK+HT_VK_ALT)},
	{K_Meta_F10,			(VK_F10+HT_VK+HT_VK_ALT)},
//	{K_Control_Print		0x172},
	{K_Control_Left,		(VK_LEFT+HT_VK_CTRL+HT_VK)},
	{K_Control_Right,		(VK_RIGHT+HT_VK_CTRL+HT_VK)},
	{K_Control_End,			(VK_END+HT_VK_CTRL+HT_VK)},
	{K_Control_PageDown,		(VK_NEXT+HT_VK_CTRL+HT_VK)},
	{K_Control_Home,		(VK_HOME+HT_VK_CTRL+HT_VK)},
	{K_Meta_1,			('1'+HT_VK_ALT)},
	{K_Meta_2,			('2'+HT_VK_ALT)},
	{K_Meta_3,			('3'+HT_VK_ALT)},
	{K_Meta_4,			('4'+HT_VK_ALT)},
	{K_Meta_5,			('5'+HT_VK_ALT)},
	{K_Meta_6,			('6'+HT_VK_ALT)},
	{K_Meta_7,			('7'+HT_VK_ALT)},
	{K_Meta_8,			('8'+HT_VK_ALT)},
	{K_Meta_9,			('9'+HT_VK_ALT)},
	{K_Meta_0,			('0'+HT_VK_ALT)},
//	{K_Meta_Dash,			0x182},
//	{K_Meta_Equals,			0x183},
	{K_Control_PageUp,		(VK_PRIOR+HT_VK_CTRL+HT_VK)},
	{K_F11,				(VK_F11+HT_VK+HT_VK)},
	{K_F12,				(VK_F12+HT_VK+HT_VK)},
	{K_Shift_F11,			(VK_F11+HT_VK+HT_VK_SHIFT)},
	{K_Shift_F12,			(VK_F12+HT_VK+HT_VK_SHIFT)},
	{K_Control_F11,			(VK_F11+HT_VK+HT_VK_CTRL)},
	{K_Control_F12,			(VK_F12+HT_VK+HT_VK_CTRL)},
	{K_Meta_F11,			(VK_F11+HT_VK+HT_VK_ALT)},
	{K_Meta_F12,			(VK_F12+HT_VK+HT_VK_ALT)},
	{K_Control_Up,			(VK_UP+HT_VK_CTRL+HT_VK)},
//	{K_Control_KPDash,		0x18e},
//	{K_Control_Center,		0x18f},
//	{K_Control_KPPlus,		0x190},
	{K_Control_Down,		(VK_DOWN+HT_VK_CTRL+HT_VK)},
	{K_Control_Insert,		(VK_INSERT+HT_VK_CTRL+HT_VK)},
	{K_Control_Delete,		(VK_DELETE+HT_VK_CTRL+HT_VK)},
//	{K_Control_KPSlash,		0x195},
//	{K_Control_KPStar,		0x196},
	{K_Meta_Tab,			(VK_TAB+HT_VK_ALT+HT_VK)},
	{K_Meta_Enter,			(VK_RETURN+HT_VK+HT_VK_ALT)},

	{K_Shift_Up,			(HT_VK_SHIFT+VK_UP+HT_VK)},
	{K_Shift_Down,			(HT_VK_SHIFT+VK_DOWN+HT_VK)},
	{K_Shift_Left,			(HT_VK_SHIFT+VK_LEFT+HT_VK)},
	{K_Shift_Right,			(HT_VK_SHIFT+VK_RIGHT+HT_VK)},
	{K_Shift_PageUp,		(HT_VK_SHIFT+VK_PRIOR+HT_VK)},
	{K_Shift_PageDown,		(HT_VK_SHIFT+VK_NEXT+HT_VK)},

	{K_Shift_Home,			(HT_VK_SHIFT+VK_HOME+HT_VK)},
	{K_Shift_End,			(HT_VK_SHIFT+VK_END+HT_VK)},
	{K_Shift_Delete,		(HT_VK_SHIFT+VK_DELETE+HT_VK)},
	{K_Shift_Insert,		(HT_VK_SHIFT+VK_INSERT+HT_VK)},

	{K_INVALID,			-1}

};

static bool gWinChFlag;

bool sys_get_winch_flag()
{
	return gWinChFlag;
}

void sys_set_winch_flag(bool f)
{
	gWinChFlag = f;
}

bool keyb_keypressed()
{
	DWORD read;
	if (key_pending) return true;
	while (1) {
		PeekConsoleInputA(gInputHandle, &key_event_record, 1, &read);
		if (!read) return false;
		ReadConsoleInputA(gInputHandle, &key_event_record, 1, &read);
		if (key_event_record.EventType & KEY_EVENT) {

			switch (key_event_record.Event.KeyEvent.wVirtualKeyCode) {
			case VK_CONTROL:
				k_ctrl_state = key_event_record.Event.KeyEvent.bKeyDown;
				break;
			case VK_MENU:
				k_alt_state = key_event_record.Event.KeyEvent.bKeyDown;
				break;
			}

			if (key_event_record.Event.KeyEvent.bKeyDown) {
				key_pending = true;
				return true;
			}
		} else if (key_event_record.EventType & WINDOW_BUFFER_SIZE_EVENT) {
			gWinChFlag = true;
		}
	}
}

int ht_key_meta(bool shift, bool control, bool alt)
{
    return (((key_event_record.Event.KeyEvent.dwControlKeyState & SHIFT_PRESSED) && shift) ? HT_VK_SHIFT : 0)
	+(((key_event_record.Event.KeyEvent.dwControlKeyState & (LEFT_CTRL_PRESSED|RIGHT_CTRL_PRESSED)) && control) ? HT_VK_CTRL : 0)
	+(((key_event_record.Event.KeyEvent.dwControlKeyState & (LEFT_ALT_PRESSED|RIGHT_ALT_PRESSED)) && alt) ? HT_VK_ALT : 0);
}

int keyb_getrawkey()
{
	if (!keyb_keypressed()) return -1;
	key_pending = false;
#ifdef KEY_DEBUG
	if (key_event_record.Event.KeyEvent.uChar.AsciiChar && !(key_event_record.Event.KeyEvent.dwControlKeyState & 256)) {
		fprintf(kd, "ASC: %4d  [%c], control = 0x%lx {VK: %d  shift: %d, alt: %d, ctrl: %d}\n", key_event_record.Event.KeyEvent.uChar.AsciiChar, ((unsigned)key_event_record.Event.KeyEvent.uChar.AsciiChar >= 32) ? key_event_record.Event.KeyEvent.uChar.AsciiChar: ' ', key_event_record.Event.KeyEvent.dwControlKeyState, key_event_record.Event.KeyEvent.wVirtualKeyCode, k_shift_state, k_alt_state, k_ctrl_state);
	} else {
		fprintf(kd, " VK: %4d  shift: %d, alt: %d, ctrl: %d\n", key_event_record.Event.KeyEvent.wVirtualKeyCode, k_shift_state, k_alt_state, k_ctrl_state);
	}
#endif
	if (key_event_record.Event.KeyEvent.uChar.AsciiChar && !(key_event_record.Event.KeyEvent.dwControlKeyState & 256)) {
	        /*
	         *	Filter keys which also have a ascii representation.
	         */
	        switch (key_event_record.Event.KeyEvent.wVirtualKeyCode) {
	        	case VK_BACK:
	        	case VK_TAB:
	        	case VK_RETURN:
	        	case VK_ESCAPE:
	        	case VK_CLEAR:
				return key_event_record.Event.KeyEvent.wVirtualKeyCode + HT_VK + ht_key_meta(true, true, true);
	        }
		/*
		 *	Local keys, which can only be access via AltGr
		 *	[in german e.g. '\'=(altgr+'-') and '@'=(altgr+'q')]
		 *	are handled separately
		 */
		switch (key_event_record.Event.KeyEvent.uChar.AsciiChar) {
			case '\\':
			case '@':
			case '|':
			case '