Subversion Repositories HelenOS

/*

 * Copyright (c) 2009 Jiri Svoboda

 * All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions

 * are met:

 *

 * - Redistributions of source code must retain the above copyright

 *   notice, this list of conditions and the following disclaimer.

 * - Redistributions in binary form must reproduce the above copyright

 *   notice, this list of conditions and the following disclaimer in the

 *   documentation and/or other materials provided with the distribution.

 * - The name of the author may not be used to endorse or promote products

 *   derived from this software without specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR

 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES

 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.

 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,

 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT

 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,

 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY

 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT

 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF

 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

 */

/** @addtogroup kbd_ctl

 * @ingroup kbd

 * @{

 */

/**

 * @file

 * @brief	GXEmul framebuffer-mode keyboard controller driver.

 */

#include <kbd.h>

#include <kbd/kbd.h>

#include <kbd/keycode.h>

#include <kbd_ctl.h>

static void parse_ds_start(int scancode);

static void parse_ds_e(int scancode);

static void parse_ds_e1(int scancode);

static void parse_ds_e1a(int scancode);

static void parse_ds_e1b(int scancode);

static void parse_ds_e1c(int scancode);

static void parse_leaf(int scancode, int (*map)[2], size_t map_length);

enum dec_state {

	ds_start,

	ds_e,

	ds_e1,

	ds_e1a,

	ds_e1b,

	ds_e1c

};

static int map_start[][2] = {

	[0x60] = { 0, KC_BACKTICK },

	[0x31] = { 0, KC_1 },

	[0x32] = { 0, KC_2 },

	[0x33] = { 0, KC_3 },

	[0x34] = { 0, KC_4 },

	[0x35] = { 0, KC_5 },

	[0x36] = { 0, KC_6 },

	[0x37] = { 0, KC_7 },

	[0x38] = { 0, KC_8 },

	[0x39] = { 0, KC_9 },

	[0x30] = { 0, KC_0 },

	[0x2d] = { 0, KC_MINUS },

	[0x3d] = { 0, KC_EQUALS },

	[0x08] = { 0, KC_BACKSPACE },

	[0x0f] = { 0, KC_TAB },

	[0x71] = { 0, KC_Q },

	[0x77] = { 0, KC_W },

	[0x65] = { 0, KC_E },

	[0x72] = { 0, KC_R },

	[0x74] = { 0, KC_T },

	[0x79] = { 0, KC_Y },

	[0x75] = { 0, KC_U },

	[0x69] = { 0, KC_I },

	[0x6f] = { 0, KC_O },

	[0x70] = { 0, KC_P },

	[0x5b] = { 0, KC_LBRACKET },

	[0x5d] = { 0, KC_RBRACKET },

	[0x61] = { 0, KC_A },

	[0x73] = { 0, KC_S },

	[0x64] = { 0, KC_D },

	[0x66] = { 0, KC_F },

	[0x67] = { 0, KC_G },

	[0x68] = { 0, KC_H },

	[0x6a] = { 0, KC_J },

	[0x6b] = { 0, KC_K },

	[0x6c] = { 0, KC_L },

	[0x3b] = { 0, KC_SEMICOLON },

	[0x27] = { 0, KC_QUOTE },

	[0x5c] = { 0, KC_BACKSLASH },

	[0x7a] = { 0, KC_Z },

	[0x78] = { 0, KC_X },

	[0x63] = { 0, KC_C },

	[0x76] = { 0, KC_V },

	[0x62] = { 0, KC_B },

	[0x6e] = { 0, KC_N },

	[0x6d] = { 0, KC_M },

	[0x2c] = { 0, KC_COMMA },

	[0x2e] = { 0, KC_PERIOD },

	[0x2f] = { 0, KC_SLASH },

	[0x20] = { 0, KC_SPACE },

	[0x1b] = { 0, KC_ESCAPE },

	[0x0a] = { 0, KC_ENTER },

	[0x0d] = { 0, KC_ENTER },

	/* with Shift pressed */

	[0x7e] = { KM_LSHIFT, KC_BACKTICK },

	[0x21] = { KM_LSHIFT, KC_1 },

	[0x40] = { KM_LSHIFT, KC_2 },

	[0x23] = { KM_LSHIFT, KC_3 },

	[0x24] = { KM_LSHIFT, KC_4 },

	[0x25] = { KM_LSHIFT, KC_5 },

	[0x5e] = { KM_LSHIFT, KC_6 },

	[0x26] = { KM_LSHIFT, KC_7 },

	[0x2a] = { KM_LSHIFT, KC_8 },

	[0x28] = { KM_LSHIFT, KC_9 },

	[0x29] = { KM_LSHIFT, KC_0 },

	[0x5f] = { KM_LSHIFT, KC_MINUS },

	[0x2b] = { KM_LSHIFT, KC_EQUALS },

	[0x51] = { KM_LSHIFT, KC_Q },

	[0x57] = { KM_LSHIFT, KC_W },

	[0x45] = { KM_LSHIFT, KC_E },

	[0x52] = { KM_LSHIFT, KC_R },

	[0x54] = { KM_LSHIFT, KC_T },

	[0x59] = { KM_LSHIFT, KC_Y },

	[0x55] = { KM_LSHIFT, KC_U },

	[0x49] = { KM_LSHIFT, KC_I },

	[0x4f] = { KM_LSHIFT, KC_O },

	[0x50] = { KM_LSHIFT, KC_P },

	[0x7b] = { KM_LSHIFT, KC_LBRACKET },

	[0x7d] = { KM_LSHIFT, KC_RBRACKET },

	[0x41] = { KM_LSHIFT, KC_A },

	[0x53] = { KM_LSHIFT, KC_S },

	[0x44] = { KM_LSHIFT, KC_D },

	[0x46] = { KM_LSHIFT, KC_F },

	[0x47] = { KM_LSHIFT, KC_G },

	[0x48] = { KM_LSHIFT, KC_H },

	[0x4a] = { KM_LSHIFT, KC_J },

	[0x4b] = { KM_LSHIFT, KC_K },

	[0x4c] = { KM_LSHIFT, KC_L },

	[0x3a] = { KM_LSHIFT, KC_SEMICOLON },

	[0x22] = { KM_LSHIFT, KC_QUOTE },

	[0x7c] = { KM_LSHIFT, KC_BACKSLASH },

	[0x5a] = { KM_LSHIFT, KC_Z },

	[0x58] = { KM_LSHIFT, KC_X },

	[0x43] = { KM_LSHIFT, KC_C },

	[0x56] = { KM_LSHIFT, KC_V },

	[0x42] = { KM_LSHIFT, KC_B },

	[0x4e] = { KM_LSHIFT, KC_N },

	[0x4d] = { KM_LSHIFT, KC_M },

	[0x3c] = { KM_LSHIFT, KC_COMMA },

	[0x3e] = { KM_LSHIFT, KC_PERIOD },

	[0x3f] = { KM_LSHIFT, KC_SLASH }

};

static int map_e1[][2] =

{

};

static int map_e1a[][2] =

{

	[0x50] = { 0, KC_F1 },

	[0x51] = { 0, KC_F2 },

	[0x52] = { 0, KC_F3 },

	[0x53] = { 0, KC_F4 },

};

static int map_e1b[][2] =

{

	[0x33] = { 0, KC_F5 },

	[0x37] = { 0, KC_F6 },

	[0x38] = { 0, KC_F7 },

	[0x39] = { 0, KC_F8 },

};

static int map_e1c[][2] =

{

	[0x38] = { 0, KC_F9 },

	[0x39] = { 0, KC_F10 },

	[0x33] = { 0, KC_F11 },

	[0x34] = { 0, KC_F12 },

};

static unsigned int mods_keys[][2] = {

	{ KM_LSHIFT, KC_LSHIFT },

	{ 0, 0 }

};

static enum dec_state ds = ds_start;

void kbd_ctl_parse_scancode(int scancode)

{

	switch (ds) {

	case ds_start:	parse_ds_start(scancode); break;

	case ds_e: 	parse_ds_e(scancode); break;

	case ds_e1:	parse_ds_e1(scancode); break;

	case ds_e1a:	parse_ds_e1a(scancode); break;

	case ds_e1b:	parse_ds_e1b(scancode); break;

	case ds_e1c:	parse_ds_e1c(scancode); break;

	}

}

static void parse_ds_start(int scancode)

{

	if (scancode == 0x1b) {

		ds = ds_e;

		return;

	}

	parse_leaf(scancode, map_start, sizeof(map_start) / (2 * sizeof(int)));

}

static void parse_ds_e(int scancode)

{

	switch (scancode) {

	case 0x5b: ds = ds_e1; return;

	case 0x1b: ds = ds_start; break;

	default: ds = ds_start; return;

	}

	kbd_push_ev(KE_PRESS, KC_ESCAPE);

}

static void parse_ds_e1(int scancode)

{

	switch (scancode) {

	case 0x4f: ds = ds_e1a; return;

	case 0x31: ds = ds_e1b; return;

	case 0x32: ds = ds_e1c; return;

	default: ds = ds_start; break;

	}

	parse_leaf(scancode, map_e1, sizeof(map_e1) / (2 * sizeof(int)));

}

static void parse_ds_e1a(int scancode)

{

	parse_leaf(scancode, map_e1a, sizeof(map_e1a) / (2 * sizeof(int)));

}

static void parse_ds_e1b(int scancode)

{

	parse_leaf(scancode, map_e1b, sizeof(map_e1b) / (2 * sizeof(int)));

}

static void parse_ds_e1c(int scancode)

{

	parse_leaf(scancode, map_e1c, sizeof(map_e1c) / (2 * sizeof(int)));

}

static void parse_leaf(int scancode, int (*map)[2], size_t map_length)

{

	unsigned int key, mod;

	int i;

	ds = ds_start;

	if (scancode < 0 || scancode >= map_length)

		return;

	mod = map[scancode][0];

	key = map[scancode][1];

	/* Simulate modifier pressing. */

	i = 0;

	while (mods_keys[i][0] != 0) {

		if (mod & mods_keys[i][0]) {

			kbd_push_ev(KE_PRESS, mods_keys[i][1]);

		}

		++i;

	}

	if (key != 0) {

		kbd_push_ev(KE_PRESS, key);

		kbd_push_ev(KE_RELEASE, key);

	}

	/* Simulate modifier releasing. */

	i = 0;

	while (mods_keys[i][0] != 0) {

		if (mod & mods_keys[i][0]) {

			kbd_push_ev(KE_RELEASE, mods_keys[i][1]);

		}

		++i;

	}

}

/**

 * @}

 */