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

 * @brief   Serial TTY-like 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_e2(int scancode);

static void parse_ds_e2a(int scancode);

static void parse_ds_e2b(int scancode);

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

enum dec_state {

    ds_start,

    ds_e,

    ds_e1,

    ds_e2,

    ds_e2a,

    ds_e2b

};

static int map_start[] = {

    [0x60] = KC_BACKTICK,

    [0x31] = KC_1,

    [0x32] = KC_2,

    [0x33] = KC_3,

    [0x34] = KC_4,

    [0x35] = KC_5,

    [0x36] = KC_6,

    [0x37] = KC_7,

    [0x38] = KC_8,

    [0x39] = KC_9,

    [0x30] = KC_0,

    [0x2d] = KC_MINUS,

    [0x3d] = KC_EQUALS,

    [0x08] = KC_BACKSPACE,

    [0x0f] = KC_TAB,

    [0x71] = KC_Q,

    [0x77] = KC_W,

    [0x65] = KC_E,

    [0x72] = KC_R,

    [0x74] = KC_T,

    [0x79] = KC_Y,

    [0x75] = KC_U,

    [0x69] = KC_I,

    [0x6f] = KC_O,

    [0x70] = KC_P,

    [0x5b] = KC_LBRACKET,

    [0x5d] = KC_RBRACKET,

//  [0x3a] = KC_CAPS_LOCK,

    [0x61] = KC_A,

    [0x73] = KC_S,

    [0x64] = KC_D,

    [0x66] = KC_F,

    [0x67] = KC_G,

    [0x68] = KC_H,

    [0x6a] = KC_J,

    [0x6b] = KC_K,

    [0x6c] = KC_L,

    [0x3b] = KC_SEMICOLON,

    [0x27] = KC_QUOTE,

    [0x5c] = KC_BACKSLASH,

//  [0x2a] = KC_LSHIFT,

    [0x7a] = KC_Z,

    [0x78] = KC_X,

    [0x63] = KC_C,

    [0x76] = KC_V,

    [0x62] = KC_B,

    [0x6e] = KC_N,

    [0x6d] = KC_M,

    [0x2c] = KC_COMMA,

    [0x2e] = KC_PERIOD,

    [0x2f] = KC_SLASH,

//  [0x36] = KC_RSHIFT,

//  [0x1d] = KC_LCTRL,

//  [0x38] = KC_LALT,

    [0x20] = KC_SPACE,

    [0x1b] = KC_ESCAPE,

    [0x0a] = KC_ENTER,

    [0x0d] = KC_ENTER

/*

    [0x1] = KC_PRNSCR,

    [0x1] = KC_SCROLL_LOCK,

    [0x1] = KC_PAUSE,

*/

};

static int map_e1[] =

{

    [0x50] = KC_F1,

    [0x51] = KC_F2,

    [0x52] = KC_F3,

    [0x53] = KC_F4,

};

static int map_e2[] =

{

    [0x41] = KC_UP,

    [0x42] = KC_DOWN,

    [0x44] = KC_LEFT,

    [0x43] = KC_RIGHT,

};

static int map_e2a[] =

{

    [0x35] = KC_F5,

    [0x37] = KC_F6,

    [0x38] = KC_F7,

    [0x39] = KC_F8,

};

static int map_e2b[] =

{

    [0x30] = KC_F9,

    [0x31] = KC_F10,

    [0x32] = KC_F11,

    [0x33] = KC_F12,

};

static enum dec_state ds;

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_e2: parse_ds_e2(scancode); break;

    case ds_e2a:    parse_ds_e2a(scancode); break;

    case ds_e2b:    parse_ds_e2b(scancode); break;

    }

}

static void parse_ds_start(int scancode)

{

    if (scancode < 0 || scancode >= sizeof(map_start) / sizeof(int))

        return;

    if (scancode == 0x1b) {

        ds = ds_e;

        return;

    }

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

}

static void parse_ds_e(int scancode)

{

    if (scancode < 0 || scancode >= 0x80) return;

    switch (scancode) {

    case 0x4f: ds = ds_e1; return;

    case 0x5b: ds = ds_e2; return;

    case 0x1b: ds = ds_start; break;

    default: ds = ds_start; return;

    }

    kbd_push_ev(KE_PRESS, KC_ESCAPE, 0);

}

static void parse_ds_e1(int scancode)

{

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

}

static void parse_ds_e2(int scancode)

{

    switch (scancode) {

    case 0x31: ds = ds_e2a; break;

    case 0x32: ds = ds_e2b; break;

    default: ds = ds_start; break;

    }

    parse_leaf(scancode, map_e2, sizeof(map_e2) / sizeof(int));

}

static void parse_ds_e2a(int scancode)

{

    parse_leaf(scancode, map_e2a, sizeof(map_e2a) / sizeof(int));

}

static void parse_ds_e2b(int scancode)

{

    parse_leaf(scancode, map_e2b, sizeof(map_e2b) / sizeof(int));

}

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

{

    unsigned int key;

    ds = ds_start;

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

        return;

    key = map[scancode];

    if (key != 0)

        kbd_push_ev(KE_PRESS, key, 0);

}

/**

 * @}

 */