2001-11-27 20:44:08 +03:00
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// "$Id$"
|
2001-11-27 20:44:08 +03:00
|
|
|
//
|
|
|
|
// MacOS keyboard state routines for the Fast Light Tool Kit (FLTK).
|
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// Copyright 1998-2005 by Bill Spitzak and others.
|
2001-11-27 20:44:08 +03:00
|
|
|
//
|
|
|
|
// This library is free software; you can redistribute it and/or
|
|
|
|
// modify it under the terms of the GNU Library General Public
|
|
|
|
// License as published by the Free Software Foundation; either
|
|
|
|
// version 2 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
|
|
|
|
// Library General Public License for more details.
|
|
|
|
//
|
|
|
|
// You should have received a copy of the GNU Library 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.
|
|
|
|
//
|
2005-04-16 04:13:17 +04:00
|
|
|
// Please report all bugs and problems on the following page:
|
|
|
|
//
|
|
|
|
// http://www.fltk.org/str.php
|
2001-11-27 20:44:08 +03:00
|
|
|
//
|
|
|
|
|
|
|
|
// Return the current state of a key. Keys are named by fltk symbols,
|
|
|
|
// which are actually X keysyms. So this has to translate to macOS
|
|
|
|
// symbols.
|
|
|
|
|
|
|
|
#include <FL/Fl.H>
|
2002-06-07 20:56:15 +04:00
|
|
|
#include <FL/x.H>
|
2004-08-25 04:20:27 +04:00
|
|
|
#include <config.h>
|
|
|
|
|
2001-11-27 20:44:08 +03:00
|
|
|
// convert an FLTK (X) keysym to a MacOS symbol:
|
|
|
|
// See also the inverse converter in Fl_mac.cxx
|
|
|
|
// This table is in numeric order by FLTK symbol order for binary search:
|
|
|
|
|
|
|
|
static const struct {unsigned short vk, fltk;} vktab[] = {
|
|
|
|
{ 49, ' ' }, { 39, '\'' }, { 43, ',' }, { 27, '-' }, { 47, '.' }, { 44, '/' },
|
|
|
|
{ 29, '0' }, { 18, '1' }, { 19, '2' }, { 20, '3' },
|
|
|
|
{ 21, '4' }, { 23, '5' }, { 22, '6' }, { 26, '7' },
|
|
|
|
{ 28, '8' }, { 25, '9' }, { 41, ';' }, { 24, '=' },
|
|
|
|
{ 0, 'A' }, { 11, 'B' }, { 8, 'C' }, { 2, 'D' },
|
|
|
|
{ 14, 'E' }, { 3, 'F' }, { 5, 'G' }, { 4, 'H' },
|
|
|
|
{ 34, 'I' }, { 38, 'J' }, { 40, 'K' }, { 37, 'L' },
|
|
|
|
{ 46, 'M' }, { 45, 'N' }, { 31, 'O' }, { 35, 'P' },
|
|
|
|
{ 12, 'Q' }, { 15, 'R' }, { 1, 'S' }, { 17, 'T' },
|
|
|
|
{ 32, 'U' }, { 9, 'V' }, { 13, 'W' }, { 7, 'X' },
|
|
|
|
{ 16, 'Y' }, { 6, 'Z' },
|
|
|
|
{ 33, '[' }, { 30, ']' }, { 50, '`' }, { 42, '|' },
|
2001-12-22 10:16:12 +03:00
|
|
|
{ 51, FL_BackSpace }, { 48, FL_Tab }, { 36, FL_Enter }, { 127, FL_Pause },
|
|
|
|
{ 107, FL_Scroll_Lock }, { 53, FL_Escape }, { 0x73, FL_Home }, { 123, FL_Left },
|
2001-11-27 20:44:08 +03:00
|
|
|
{ 126, FL_Up }, { 124, FL_Right }, { 125, FL_Down }, { 0x74, FL_Page_Up },
|
2001-12-22 10:16:12 +03:00
|
|
|
{ 0x79, FL_Page_Down }, { 119, FL_End }, { 0x71, FL_Print }, { 127, FL_Insert },
|
2004-06-19 05:50:31 +04:00
|
|
|
{ 0x6e, FL_Menu }, { 114, FL_Help }, { 0x47, FL_Num_Lock },
|
2001-11-27 20:44:08 +03:00
|
|
|
{ 76, FL_KP_Enter }, { 67, FL_KP+'*' }, { 69, FL_KP+'+'}, { 78, FL_KP+'-' }, { 65, FL_KP+'.' }, { 75, FL_KP+'/' },
|
|
|
|
{ 82, FL_KP+'0' }, { 83, FL_KP+'1' }, { 84, FL_KP+'2' }, { 85, FL_KP+'3' },
|
|
|
|
{ 86, FL_KP+'4' }, { 87, FL_KP+'5' }, { 88, FL_KP+'6' }, { 89, FL_KP+'7' },
|
|
|
|
{ 91, FL_KP+'8' }, { 92, FL_KP+'9' }, { 81, FL_KP+'=' },
|
|
|
|
{ 0x7a, FL_F+1 }, { 0x78, FL_F+2 }, { 0x63, FL_F+3 }, { 0x76, FL_F+4 },
|
|
|
|
{ 0x60, FL_F+5 }, { 0x61, FL_F+6 }, { 0x62, FL_F+7 }, { 0x64, FL_F+8 },
|
|
|
|
{ 0x65, FL_F+9 }, { 0x6D, FL_F+10 }, { 0x67, FL_F+11 }, { 0x6f, FL_F+12 },
|
2003-05-28 09:10:05 +04:00
|
|
|
{ 56, FL_Shift_L }, { 56, FL_Shift_R }, { 59, FL_Control_L }, { 59, FL_Control_R },
|
|
|
|
{ 57, FL_Caps_Lock }, { 55, FL_Meta_L }, { 55, FL_Meta_R },
|
2004-06-19 05:50:31 +04:00
|
|
|
{ 58, FL_Alt_L }, { 58, FL_Alt_R }, { 0x75, FL_Delete },
|
2001-11-27 20:44:08 +03:00
|
|
|
};
|
|
|
|
|
|
|
|
static int fltk2mac(int fltk) {
|
|
|
|
int a = 0;
|
|
|
|
int b = sizeof(vktab)/sizeof(*vktab);
|
|
|
|
while (a < b) {
|
|
|
|
int c = (a+b)/2;
|
|
|
|
if (vktab[c].fltk == fltk) return vktab[c].vk;
|
|
|
|
if (vktab[c].fltk < fltk) a = c+1; else b = c;
|
|
|
|
}
|
|
|
|
return 127;
|
|
|
|
}
|
|
|
|
|
|
|
|
//: returns true, if that key was pressed during the last event
|
|
|
|
int Fl::event_key(int k) {
|
2002-01-03 11:08:21 +03:00
|
|
|
return get_key(k);
|
2001-11-27 20:44:08 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
//: returns true, if that key is pressed right now
|
|
|
|
int Fl::get_key(int k) {
|
|
|
|
KeyMap foo;
|
|
|
|
GetKeys(foo);
|
|
|
|
#ifdef MAC_TEST_FOR_KEYCODES
|
|
|
|
static int cnt = 0;
|
|
|
|
if (cnt++>1024) {
|
|
|
|
cnt = 0;
|
|
|
|
printf("%08x %08x %08x %08x\n", (ulong*)(foo)[3], (ulong*)(foo)[2], (ulong*)(foo)[1], (ulong*)(foo)[0]);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
int i = fltk2mac(k);
|
|
|
|
unsigned char *b = (unsigned char*)foo;
|
|
|
|
return (b[i>>3]>>(i&7))&1;
|
|
|
|
}
|
|
|
|
|
|
|
|
//
|
2005-02-25 00:55:12 +03:00
|
|
|
// End of "$Id$".
|
2001-11-27 20:44:08 +03:00
|
|
|
//
|