| /* |
| * DOS interrupt 09h handler (IRQ1 - KEYBOARD) |
| * |
| * Copyright 1999 Ove Kåven |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library 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 |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| */ |
| |
| #include <stdarg.h> |
| #include <stdlib.h> |
| #include <string.h> |
| |
| #include "windef.h" |
| #include "winbase.h" |
| #include "wingdi.h" |
| #include "winuser.h" |
| #include "miscemu.h" |
| #include "wine/debug.h" |
| #include "dosexe.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(int); |
| |
| #define QUEUELEN 31 |
| |
| static struct |
| { |
| BYTE queuelen,queue[QUEUELEN],ascii[QUEUELEN]; |
| } kbdinfo; |
| |
| |
| /* |
| * Update the BIOS data segment's keyboard status flags (mem 0x40:0x17/0x18) |
| * if modifier/special keys have been pressed. |
| * FIXME: we merely toggle key status and don't actively set it instead, |
| * so we might be out of sync with the real current system status of these keys. |
| * Probably doesn't matter too much, though. |
| */ |
| void DOSVM_Int09UpdateKbdStatusFlags(BYTE scan, BOOL extended, BIOSDATA *data, BOOL *modifier) |
| { |
| BYTE realscan = scan & 0x7f; /* remove 0x80 make/break flag */ |
| BYTE bit1 = 255, bit2 = 255; |
| INPUT_RECORD msg; |
| DWORD res; |
| |
| *modifier = TRUE; |
| |
| switch (realscan) |
| { |
| case 0x36: /* r shift */ |
| bit1 = 0; |
| break; |
| case 0x2a: /* l shift */ |
| bit1 = 1; |
| break; |
| case 0x1d: /* l/r control */ |
| bit1 = 2; |
| if (!extended) /* left control only */ |
| bit2 = 0; |
| break; |
| case 0x37: /* SysRq inner parts */ |
| /* SysRq scan code sequence: 38, e0, 37, e0, b7, b8 */ |
| FIXME("SysRq not handled yet.\n"); |
| break; |
| case 0x38: /* l/r menu/alt, SysRq outer parts */ |
| bit1 = 3; |
| if (!extended) /* left alt only */ |
| bit2 = 1; |
| break; |
| case 0x46: /* scroll lock */ |
| bit1 = 4; |
| if (!extended) /* left ctrl only */ |
| bit2 = 4; |
| break; |
| case 0x45: /* num lock, pause */ |
| if (extended) /* distinguish from non-extended Pause key */ |
| { /* num lock */ |
| bit1 = 5; |
| bit2 = 5; |
| } |
| else |
| { /* pause */ |
| if (!(scan & 0x80)) /* "make" code */ |
| bit2 = 3; |
| } |
| break; |
| case 0x3a: /* caps lock */ |
| bit1 = 6; |
| bit2 = 6; |
| break; |
| case 0x52: /* insert */ |
| bit1 = 7; |
| bit2 = 7; |
| *modifier = FALSE; /* insert is no modifier: thus pass to int16 */ |
| break; |
| } |
| /* now that we know which bits to set, update them */ |
| if (!(scan & 0x80)) /* "make" code (keypress) */ |
| { |
| if (bit2 != 255) |
| { |
| if (bit2 == 3) |
| { |
| data->KbdFlags2 |= 1 << bit2; /* set "Pause" flag */ |
| TRACE("PAUSE key, sleeping !\n"); |
| /* wait for keypress to unlock pause */ |
| do { |
| Sleep(55); |
| } while (!(ReadConsoleInputA(GetStdHandle(STD_INPUT_HANDLE),&msg,1,&res) && (msg.EventType == KEY_EVENT))); |
| data->KbdFlags2 &= ~(1 << bit2); /* release "Pause" flag */ |
| } |
| else |
| data->KbdFlags2 |= 1 << bit2; |
| } |
| if (bit1 != 255) |
| { |
| if (bit1 < 4) /* key "pressed" flag */ |
| data->KbdFlags1 |= 1 << bit1; |
| else /* key "active" flag */ |
| data->KbdFlags1 ^= 1 << bit1; |
| } |
| } |
| else /* "break" / release */ |
| { |
| if (bit2 != 255) |
| data->KbdFlags2 &= ~(1 << bit2); |
| if (bit1 < 4) /* is it a key "pressed" bit ? */ |
| data->KbdFlags1 &= ~(1 << bit1); |
| } |
| TRACE("ext. %d, bits %d/%d, KbdFlags %02x/%02x\n", extended, bit1, bit2, data->KbdFlags1, data->KbdFlags2); |
| } |
| |
| /********************************************************************** |
| * DOSVM_Int09Handler (WINEDOS16.109) |
| * |
| * Handler for int 09h. |
| * See http://www.execpc.com/~geezer/osd/kbd/ for a very good description |
| * of keyboard mapping modes. |
| */ |
| void WINAPI DOSVM_Int09Handler( CONTEXT86 *context ) |
| { |
| BIOSDATA *data = DOSVM_BiosData(); |
| BYTE ascii, scan = DOSVM_Int09ReadScan(&ascii); |
| BYTE realscan = scan & 0x7f; /* remove 0x80 make/break flag */ |
| BOOL modifier = FALSE; |
| static BOOL extended = FALSE; /* indicates start of extended key sequence */ |
| BYTE ch[2]; |
| int cnt, c2; |
| |
| TRACE("scan=%02x, ascii=%02x[%c]\n",scan, ascii, ascii ? ascii : ' '); |
| |
| if (scan == 0xe0) /* extended keycode */ |
| extended = TRUE; |
| |
| /* check for keys concerning keyboard status flags */ |
| if ((realscan == 0x52 /* insert */) |
| || (realscan == 0x3a /* caps lock */) |
| || (realscan == 0x45 /* num lock (extended) or pause/break */) |
| || (realscan == 0x46 /* scroll lock */) |
| || (realscan == 0x2a /* l shift */) |
| || (realscan == 0x36 /* r shift */) |
| || (realscan == 0x37 /* SysRq */) |
| || (realscan == 0x38 /* l/r menu/alt, SysRq */) |
| || (realscan == 0x1d /* l/r control */)) |
| DOSVM_Int09UpdateKbdStatusFlags(scan, extended, data, &modifier); |
| |
| if (scan != 0xe0) |
| extended = FALSE; /* reset extended flag now */ |
| |
| /* only interested in "make" (press) codes, not "break" (release), |
| * and also not in "modifier key only" (w/o ascii) notifications */ |
| if (!(scan & 0x80) && !(modifier && !ascii)) |
| { |
| if (ascii) { |
| /* we already have an ASCII code, no translation necessary */ |
| if (data->KbdFlags1 & 8) /* Alt key ? */ |
| ch[0] = 0; /* ASCII code needs to be 0 if Alt also pressed */ |
| else |
| ch[0] = ascii; |
| /* FIXME: need to handle things such as Shift-F1 etc. */ |
| cnt = 1; |
| } else { |
| /* translate */ |
| UINT vkey = MapVirtualKeyA(scan&0x7f, 1); |
| BYTE keystate[256]; |
| GetKeyboardState(keystate); |
| cnt = ToAscii(vkey, scan, keystate, (LPWORD)ch, 0); |
| } |
| if (cnt>0) { |
| for (c2=0; c2<cnt; c2++) |
| DOSVM_Int16AddChar(ch[c2], scan); |
| } else |
| if (cnt==0) { |
| /* FIXME: need to handle things like shift-F-keys, |
| * 0xE0 extended keys, etc */ |
| DOSVM_Int16AddChar(0, scan); |
| } |
| } |
| |
| DOSVM_AcknowledgeIRQ( context ); |
| } |
| |
| static void KbdRelay( CONTEXT86 *context, void *data ) |
| { |
| if (kbdinfo.queuelen) { |
| /* cleanup operation, called from DOSVM_PIC_ioport_out: |
| * we'll remove current scancode from keyboard buffer here, |
| * rather than in ReadScan, because some DOS apps depend on |
| * the scancode being available for reading multiple times... */ |
| if (--kbdinfo.queuelen) { |
| memmove(kbdinfo.queue,kbdinfo.queue+1,kbdinfo.queuelen); |
| memmove(kbdinfo.ascii,kbdinfo.ascii+1,kbdinfo.queuelen); |
| } |
| } |
| } |
| |
| void WINAPI DOSVM_Int09SendScan( BYTE scan, BYTE ascii ) |
| { |
| if (kbdinfo.queuelen == QUEUELEN) { |
| ERR("keyboard queue overflow\n"); |
| return; |
| } |
| /* add scancode to queue */ |
| kbdinfo.queue[kbdinfo.queuelen] = scan; |
| kbdinfo.ascii[kbdinfo.queuelen++] = ascii; |
| /* tell app to read it by triggering IRQ 1 (int 09) */ |
| DOSVM_QueueEvent(1,DOS_PRIORITY_KEYBOARD,KbdRelay,NULL); |
| } |
| |
| /********************************************************************** |
| * KbdReadScan (WINEDOS.@) |
| */ |
| BYTE WINAPI DOSVM_Int09ReadScan( BYTE*ascii ) |
| { |
| if (ascii) *ascii = kbdinfo.ascii[0]; |
| return kbdinfo.queue[0]; |
| } |
