ctkeyb.c

来自「开放源码的编译器open watcom 1.6.0版的源代码」· C语言 代码 · 共 652 行 · 第 1/2 页

/****************************************************************************
*
*                            Open Watcom Project
*
*    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
*
*  ========================================================================
*
*    This file contains Original Code and/or Modifications of Original
*    Code as defined in and that are subject to the Sybase Open Watcom
*    Public License version 1.0 (the 'License'). You may not use this file
*    except in compliance with the License. BY USING THIS FILE YOU AGREE TO
*    ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is
*    provided with the Original Code and Modifications, and is also
*    available at www.sybase.com/developer/opensource.
*
*    The Original Code and all software distributed under the License are
*    distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
*    EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM
*    ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
*    MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR
*    NON-INFRINGEMENT. Please see the License for the specific language
*    governing rights and limitations under the License.
*
*  ========================================================================
*
* Description:  WHEN YOU FIGURE OUT WHAT THIS FILE DOES, PLEASE
*               DESCRIBE IT HERE!
*
****************************************************************************/


#include <stddef.h>
#include <stdlib.h>
#include <sys/types.h>
#include <unistd.h>
#include <fcntl.h>
#include <termios.h>
#include <string.h>
#include <sys/kernel.h>
#include <sys/dev.h>
#include <sys/sidinfo.h>
#include <errno.h>
#include <sys/psinfo.h>
#include <sys/proxy.h>
#include <sys/qioctl.h>
#include <sys/console.h>
#include <fcntl.h>
#include <assert.h>
#include <term.h>
#include <ctype.h>
#include <signal.h>
#include "uidef.h"
#include "uishift.h"

#include "uivirt.h"
#include "qnxuiext.h"
#include "qdebug.h"

#include "trie.h"
#include "tixparse.h"

enum {
    EV_STICKY_FUNC      = 0xff0,
    EV_STICKY_SHIFT,
    EV_STICKY_CTRL,
    EV_STICKY_ALT,
    EV_STICKY_INTRO     = 0xfff,
    S_FUNC              = S_CAPS,
    S_INTRO             = S_KANJI_LOCK
};

#define NUM_ELTS( a )   (sizeof( a ) / sizeof( a[0] ))

extern struct _console_ctrl *   UIConCtrl;
extern unsigned                 UIDisableShiftChanges;


static struct termios   SaveTermSet;
static int              SaveProtocol;
static int              SaveCtrl;
static pid_t            SavePGroup;

static unsigned short   ShftState;
static unsigned short   sticky;
static unsigned short   real_shift;


#define evmap( ev, f )  { EV_##ev, offsetof( struct _strs, f ) },

static const struct {
    EVENT               ev;
    unsigned short      offset;
} InTerminfo[] = {
    evmap( RUB_OUT,             _ky_backspace )
    evmap( RUB_OUT,             _ky_clear )
    evmap( DELETE,              _ky_dc )
    evmap( CURSOR_DOWN,         _ky_down )
    evmap( INSERT,              _ky_ic )
    evmap( FUNC(1),             _ky_f1 )
    evmap( FUNC(2),             _ky_f2 )
    evmap( FUNC(3),             _ky_f3 )
    evmap( FUNC(4),             _ky_f4 )
    evmap( FUNC(5),             _ky_f5 )
    evmap( FUNC(6),             _ky_f6 )
    evmap( FUNC(7),             _ky_f7 )
    evmap( FUNC(8),             _ky_f8 )
    evmap( FUNC(9),             _ky_f9 )
    evmap( FUNC(10),            _ky_f10 )
    evmap( FUNC(11),            _ky_f11 )
    evmap( FUNC(12),            _ky_f12 )
    evmap( SHIFT_FUNC(1),       _ky_f13 )
    evmap( SHIFT_FUNC(2),       _ky_f14 )
    evmap( SHIFT_FUNC(3),       _ky_f15 )
    evmap( SHIFT_FUNC(4),       _ky_f16 )
    evmap( SHIFT_FUNC(5),       _ky_f17 )
    evmap( SHIFT_FUNC(6),       _ky_f18 )
    evmap( SHIFT_FUNC(7),       _ky_f19 )
    evmap( SHIFT_FUNC(8),       _ky_f20 )
    evmap( SHIFT_FUNC(9),       _ky_f21 )
    evmap( SHIFT_FUNC(10),      _ky_f22 )
    evmap( SHIFT_FUNC(11),      _ky_f23 )
    evmap( SHIFT_FUNC(12),      _ky_f24 )
    evmap( CTRL_FUNC(1),        _ky_f25 )
    evmap( CTRL_FUNC(2),        _ky_f26 )
    evmap( CTRL_FUNC(3),        _ky_f27 )
    evmap( CTRL_FUNC(4),        _ky_f28 )
    evmap( CTRL_FUNC(5),        _ky_f29 )
    evmap( CTRL_FUNC(6),        _ky_f30 )
    evmap( CTRL_FUNC(7),        _ky_f31 )
    evmap( CTRL_FUNC(8),        _ky_f32 )
    evmap( CTRL_FUNC(9),        _ky_f33 )
    evmap( CTRL_FUNC(10),       _ky_f34 )
    evmap( CTRL_FUNC(11),       _ky_f35 )
    evmap( CTRL_FUNC(12),       _ky_f36 )
    evmap( ALT_FUNC(1),         _ky_f37 )
    evmap( ALT_FUNC(2),         _ky_f38 )
    evmap( ALT_FUNC(3),         _ky_f39 )
    evmap( ALT_FUNC(4),         _ky_f40 )
    evmap( ALT_FUNC(5),         _ky_f41 )
    evmap( ALT_FUNC(6),         _ky_f42 )
    evmap( ALT_FUNC(7),         _ky_f43 )
    evmap( ALT_FUNC(8),         _ky_f44 )
    evmap( ALT_FUNC(9),         _ky_f45 )
    evmap( ALT_FUNC(10),        _ky_f46 )
    evmap( ALT_FUNC(11),        _ky_f47 )
    evmap( ALT_FUNC(12),        _ky_f48 )
    evmap( HOME,                _ky_home )
    evmap( CURSOR_LEFT,         _ky_left )
    evmap( PAGE_DOWN,           _ky_npage )
    evmap( PAGE_UP,             _ky_ppage )
    evmap( CURSOR_RIGHT,        _ky_right )
    evmap( SCROLL_LINE_DOWN,    _ky_sf )
    evmap( SCROLL_LINE_UP,      _ky_sr )
    evmap( CURSOR_UP,           _ky_up )
    evmap( HOME,                _ky_beg )
    evmap( ESCAPE,              _ky_cancel )
    evmap( END,                 _ky_end )
    evmap( ENTER,               _ky_enter )
    evmap( TAB_FORWARD,         _ky_next )
    evmap( TAB_BACKWARD,        _ky_previous )
    evmap( SHIFT_HOME,          _ky_sbeg )
    evmap( SHIFT_END,           _ky_send )
    evmap( SHIFT_CURSOR_LEFT,   _ky_sleft )
    evmap( TAB_BACKWARD,        _ky_snext )
    evmap( TAB_FORWARD,         _ky_sprevious )
    evmap( SHIFT_CURSOR_RIGHT,  _ky_sright )
    evmap( TAB_BACKWARD,        _ky_btab )
};

static const struct {
    EVENT       ev;
    char        ch;
} InStandard[] = {
/*

See ck_keyboard_event function for special handling of these codes.

    { EV_REDRAW_SCREEN, '\x0c' },
    { EV_RUB_OUT,       '\x08' },
    { EV_TAB_FORWARD,   '\x09' },
*/
    { EV_ENTER,         '\r' },
    { EV_ENTER,         '\n' },
    { EV_RUB_OUT,       '\x7f' },
    { EV_ESCAPE,        '\x1b' },
};

typedef struct {
    EVENT       normal;
    EVENT       shift;
    EVENT       ctrl;
    EVENT       alt;
} event_shift_map;

#define SPECIAL_MAP( name, c )  { c, c, c, EV_ALT_##name }
#define LETTER_MAP( let, c )    { c+' ', c, c-'@', EV_ALT_##let }
#define FUNC_MAP( n )           { EV_FUNC(n),EV_SHIFT_FUNC(n),\
                                EV_CTRL_FUNC(n),EV_ALT_FUNC(n) }
#define MOTION_MAP( k )         { EV_##k,EV_SHIFT_##k,EV_CTRL_##k,EV_ALT_##k}
#define EV_SHIFT_INSERT EV_INSERT
#define EV_SHIFT_DELETE EV_DELETE
/*
    NOTE: this table has to be in increasing value of the first column.
*/
static const event_shift_map ShiftMap[] = {
    SPECIAL_MAP( SPACE, ' ' ),
    SPECIAL_MAP( MINUS, '-' ),
    SPECIAL_MAP( 0, '0' ),
    SPECIAL_MAP( 1, '1' ),
    SPECIAL_MAP( 2, '2' ),
    SPECIAL_MAP( 3, '3' ),
    SPECIAL_MAP( 4, '4' ),
    SPECIAL_MAP( 5, '5' ),
    SPECIAL_MAP( 6, '6' ),
    SPECIAL_MAP( 7, '7' ),
    SPECIAL_MAP( 8, '8' ),
    SPECIAL_MAP( 9, '9' ),
    SPECIAL_MAP( EQUAL, '=' ),
    LETTER_MAP( A, 'A' ),
    LETTER_MAP( B, 'B' ),
    LETTER_MAP( C, 'C' ),
    LETTER_MAP( D, 'D' ),
    LETTER_MAP( E, 'E' ),
    LETTER_MAP( F, 'F' ),
    LETTER_MAP( G, 'G' ),
    LETTER_MAP( H, 'H' ),
    LETTER_MAP( I, 'I' ),
    LETTER_MAP( J, 'J' ),
    LETTER_MAP( K, 'K' ),
    LETTER_MAP( L, 'L' ),
    LETTER_MAP( M, 'M' ),
    LETTER_MAP( N, 'N' ),
    LETTER_MAP( O, 'O' ),
    LETTER_MAP( P, 'P' ),
    LETTER_MAP( Q, 'Q' ),
    LETTER_MAP( R, 'R' ),
    LETTER_MAP( S, 'S' ),
    LETTER_MAP( T, 'T' ),
    LETTER_MAP( U, 'U' ),
    LETTER_MAP( V, 'V' ),
    LETTER_MAP( W, 'W' ),
    LETTER_MAP( X, 'X' ),
    LETTER_MAP( Y, 'Y' ),
    LETTER_MAP( Z, 'Z' ),
    { EV_TAB_FORWARD, EV_TAB_BACKWARD, EV_CTRL_TAB, EV_TAB_FORWARD },
    FUNC_MAP( 1 ),
    FUNC_MAP( 2 ),
    FUNC_MAP( 3 ),
    FUNC_MAP( 4 ),
    FUNC_MAP( 5 ),
    FUNC_MAP( 6 ),
    FUNC_MAP( 7 ),
    FUNC_MAP( 8 ),
    FUNC_MAP( 9 ),
    FUNC_MAP( 10 ),
    MOTION_MAP( HOME ),
    MOTION_MAP( CURSOR_UP ),
    MOTION_MAP( PAGE_UP ),
    MOTION_MAP( CURSOR_LEFT ),
    MOTION_MAP( CURSOR_RIGHT ),
    MOTION_MAP( END ),
    MOTION_MAP( CURSOR_DOWN ),
    MOTION_MAP( PAGE_DOWN ),
    MOTION_MAP( INSERT ),
    MOTION_MAP( DELETE ),
    FUNC_MAP( 11 ),
    FUNC_MAP( 12 ),
};

void intern clear_shift()
{
    ShftState = 0;
    real_shift = 0;
}

static int ck_unevent( EVENT ev )
/*******************************/

// Somebody wants us to pretend that the specified event has occurred
// (one of EV_SHIFT/CTRL/ALT_RELEASE) so that the corresponding press
// event will be generated for the next keystroke (if that shift key
// is pressed).

{
    ev = ev;
    return( 0 );
}

void intern ck_arm()
/******************/
{
    /*
        Yes I know that this can be done in the dev_read call, but there
        are enough weird paths dealing with mouse events under QNX windows
        that we've got problems where sometimes the arming of the proxy
        would not happen. This way, we *know* that the proxy is going to
        be armed for the keyboard (and mouse under QNX windows). If only
        there was a mouse_arm() function. Sigh.
    */
    dev_arm( UIConHandle, UIRemProxy, _DEV_EVENT_INPUT );
}


#define PUSHBACK_SIZE   32

static char     UnreadBuffer[ PUSHBACK_SIZE ];
static int      UnreadPos = sizeof( UnreadBuffer );

int nextc(int n)
/**************/
{
    unsigned char       ch;
    unsigned            least;

    if( UnreadPos < sizeof( UnreadBuffer ) ) return( UnreadBuffer[ UnreadPos++ ] );

    least = (n != 0) ? 1 : 0;

    dev_arm( UIConHandle, _DEV_DISARM, _DEV_EVENT_INPUT );
    if (dev_read( UIConHandle, &ch, 1, least ,0, n, 0, 0 ) <= 0 ) {
            return -1;
    }
    return ch;
}