Add another keyboard event test program test/handle_keys.cxx
This program logs all keyboard events to a built-in Fl_Terminal widget. WIP: version 0.80
This commit is contained in:
Albrecht Schlosser
parent
290e95eaef
commit
7bbe75c84e
@ -115,6 +115,7 @@ fl_create_example(grid_buttons grid_buttons.cxx fltk::fltk)
|
||||
fl_create_example(grid_dialog grid_dialog.cxx fltk::fltk)
|
||||
fl_create_example(grid_login grid_login.cxx fltk::fltk)
|
||||
fl_create_example(handle_events handle_events.cxx "${GLDEMO_LIBS}")
|
||||
fl_create_example(handle_keys handle_keys.cxx fltk::fltk)
|
||||
fl_create_example(hello hello.cxx fltk::fltk)
|
||||
fl_create_example(help_dialog help_dialog.cxx fltk::images)
|
||||
fl_create_example(icon icon.cxx fltk::fltk)
|
||||
|
||||
330
test/handle_keys.cxx
Normal file
330
test/handle_keys.cxx
Normal file
@ -0,0 +1,330 @@
|
||||
//
|
||||
// Keyboard event test program for the Fast Light Tool Kit (FLTK).
|
||||
//
|
||||
// Copyright 2024 by Bill Spitzak and others.
|
||||
//
|
||||
// This library is free software. Distribution and use rights are outlined in
|
||||
// the file "COPYING" which should have been included with this file. If this
|
||||
// file is missing or damaged, see the license at:
|
||||
//
|
||||
// https://www.fltk.org/COPYING.php
|
||||
//
|
||||
// Please see the following page on how to report bugs and issues:
|
||||
//
|
||||
// https://www.fltk.org/bugs.php
|
||||
//
|
||||
|
||||
#include <FL/Fl.H>
|
||||
#include <FL/Fl_Double_Window.H>
|
||||
#include <FL/Fl_Box.H>
|
||||
#include <FL/Fl_Terminal.H>
|
||||
#include <FL/Fl_Grid.H>
|
||||
#include <FL/Fl_Button.H>
|
||||
#include <FL/Fl_Light_Button.H>
|
||||
#include <FL/names.h>
|
||||
#include <stdio.h>
|
||||
|
||||
// Global variables to simplify the code
|
||||
|
||||
Fl_Light_Button *keydown = NULL;
|
||||
Fl_Light_Button *keyup = NULL;
|
||||
Fl_Light_Button *shortcut = NULL;
|
||||
|
||||
// Text in the headline and after clearing the terminal buffer. For alignment ...
|
||||
// 1 2 3 4 5 6 7 8
|
||||
// 12345678901234567890123456789012345678901234567890123456789012345678901234567890
|
||||
static const char *headline_text =
|
||||
"[nnn] Event Key Name, Flags: C A S M N L Text Unicode UTF-8/hex";
|
||||
|
||||
// Tooltip for headline and terminal widgets
|
||||
static const char *tt =
|
||||
"Flags:\n"
|
||||
"C=Ctrl, A=Alt, S=Shift, M=Meta\n"
|
||||
"N=NumLock, L=CapsLock";
|
||||
|
||||
// This table is a duplicate of the table in test/keyboard.cxx.
|
||||
// In the future this should be moved to the FLTK core so FLTK key
|
||||
// numbers can be translated to strings (key names) in user programs.
|
||||
|
||||
struct keycode_table {
|
||||
int n; // key code
|
||||
const char* text; // key name
|
||||
} key_table[] = {
|
||||
{ FL_Escape, "FL_Escape"},
|
||||
{ FL_BackSpace, "FL_BackSpace"},
|
||||
{ FL_Tab, "FL_Tab"},
|
||||
{ FL_Iso_Key, "FL_Iso_Key"},
|
||||
{ FL_Enter, "FL_Enter"},
|
||||
{ FL_Print, "FL_Print"},
|
||||
{ FL_Scroll_Lock, "FL_Scroll_Lock"},
|
||||
{ FL_Pause, "FL_Pause"},
|
||||
{ FL_Insert, "FL_Insert"},
|
||||
{ FL_Home, "FL_Home"},
|
||||
{ FL_Page_Up, "FL_Page_Up"},
|
||||
{ FL_Delete, "FL_Delete"},
|
||||
{ FL_End, "FL_End"},
|
||||
{ FL_Page_Down, "FL_Page_Down"},
|
||||
{ FL_Left, "FL_Left"},
|
||||
{ FL_Up, "FL_Up"},
|
||||
{ FL_Right, "FL_Right"},
|
||||
{ FL_Down, "FL_Down"},
|
||||
{ FL_Shift_L, "FL_Shift_L"},
|
||||
{ FL_Shift_R, "FL_Shift_R"},
|
||||
{ FL_Control_L, "FL_Control_L"},
|
||||
{ FL_Control_R, "FL_Control_R"},
|
||||
{ FL_Caps_Lock, "FL_Caps_Lock"},
|
||||
{ FL_Alt_L, "FL_Alt_L"},
|
||||
{ FL_Alt_R, "FL_Alt_R"},
|
||||
{ FL_Meta_L, "FL_Meta_L"},
|
||||
{ FL_Meta_R, "FL_Meta_R"},
|
||||
{ FL_Menu, "FL_Menu"},
|
||||
{ FL_Help, "FL_Help"},
|
||||
{ FL_Num_Lock, "FL_Num_Lock"},
|
||||
{ FL_KP_Enter, "FL_KP_Enter"},
|
||||
{ FL_Alt_Gr, "FL_Alt_Gr"}
|
||||
};
|
||||
|
||||
// This function is very similar to the code in test/keyboard.cxx.
|
||||
// In the future this should be moved to the FLTK core so FLTK key
|
||||
// numbers can be translated to strings (key names) in user programs.
|
||||
|
||||
// Returns:
|
||||
// - function return is a pointer to the key name string
|
||||
// - parameter lg returns the length in characters (not bytes)
|
||||
// The latter can be used to align strings.
|
||||
|
||||
// Todo: this function may not be complete yet and is
|
||||
// maybe not correct for all key values.
|
||||
|
||||
const char *get_keyname(int k, int &lg) {
|
||||
static char buffer[32];
|
||||
if (!k) {
|
||||
return "0";
|
||||
}
|
||||
else if (k < 32) { // control character
|
||||
sprintf(buffer, "^%c", (char)(k + 64));
|
||||
lg = 2;
|
||||
}
|
||||
else if (k < 128) { // ASCII
|
||||
snprintf(buffer, sizeof(buffer), "'%c'", k);
|
||||
lg = 3;
|
||||
} else if (k >= 0xa0 && k <= 0xff) { // ISO-8859-1 (international keyboards)
|
||||
char key[8];
|
||||
int kl = fl_utf8encode((unsigned)k, key);
|
||||
key[kl] = '\0';
|
||||
snprintf(buffer, sizeof(buffer), "'%s'", key);
|
||||
lg = 3;
|
||||
} else if (k > FL_F && k <= FL_F_Last) {
|
||||
lg = snprintf(buffer, sizeof(buffer), "FL_F+%d", k - FL_F);
|
||||
} else if (k >= FL_KP && k <= FL_KP_Last) {
|
||||
if (k == FL_KP_Enter)
|
||||
lg = snprintf(buffer, sizeof(buffer), "FL_KP_Enter");
|
||||
else
|
||||
lg = snprintf(buffer, sizeof(buffer), "FL_KP+'%c'", k-FL_KP);
|
||||
} else if (k >= FL_Button && k <= FL_Button+7) {
|
||||
lg = snprintf(buffer, sizeof(buffer), "FL_Button+%d", k-FL_Button);
|
||||
} else {
|
||||
lg = snprintf(buffer, sizeof(buffer), "0x%04x", k);
|
||||
for (int i = 0; i < int(sizeof(key_table)/sizeof(*key_table)); i++) {
|
||||
if (key_table[i].n == k) {
|
||||
lg = strlen(key_table[i].text);
|
||||
return key_table[i].text;
|
||||
}
|
||||
}
|
||||
}
|
||||
return buffer;
|
||||
}
|
||||
|
||||
// Class to handle events
|
||||
class app : public Fl_Double_Window {
|
||||
protected:
|
||||
int handle(int) FL_OVERRIDE;
|
||||
public:
|
||||
// storage for the last event
|
||||
int eventnum;
|
||||
const char *eventname;
|
||||
Fl_Terminal *tty;
|
||||
Fl_Box *headline;
|
||||
app(int X, int Y, int W, int H, const char *L = 0)
|
||||
: Fl_Double_Window(X, Y, W, H, L) {
|
||||
eventname = NULL;
|
||||
eventnum = 0;
|
||||
headline = new Fl_Box(2, 0, W - 4, 25);
|
||||
headline->color(FL_LIGHT2);
|
||||
headline->box(FL_FLAT_BOX);
|
||||
headline->align(FL_ALIGN_LEFT | FL_ALIGN_INSIDE);
|
||||
headline->labelfont(FL_COURIER);
|
||||
headline->labelsize(12);
|
||||
headline->label(headline_text);
|
||||
headline->tooltip(tt);
|
||||
tty = new Fl_Terminal(0, 25, W, H - 125);
|
||||
tty->color(FL_WHITE);
|
||||
tty->textfgcolor(fl_darker(FL_BLUE));
|
||||
tty->selectionbgcolor(FL_BLUE);
|
||||
tty->selectionfgcolor(FL_WHITE);
|
||||
tty->textfont(FL_COURIER);
|
||||
tty->textsize(12);
|
||||
// tty->selection_color(FL_RED);
|
||||
tty->tooltip(tt);
|
||||
}
|
||||
int print_event(int ev);
|
||||
};
|
||||
|
||||
// print_event() counts and prints the current event.
|
||||
// Returns 1 if printed (used), 0 if suppressed.
|
||||
// The event counter is incremented only if the event is printed
|
||||
// and wraps at 1000.
|
||||
|
||||
int app::print_event(int ev) {
|
||||
switch(ev) {
|
||||
case FL_KEYBOARD:
|
||||
if (!keydown->value()) return 0;
|
||||
break;
|
||||
case FL_KEYUP:
|
||||
if (!keyup->value()) return 0;
|
||||
break;
|
||||
case FL_SHORTCUT:
|
||||
if (!shortcut->value()) return 0;
|
||||
break;
|
||||
default:
|
||||
return 0;
|
||||
}
|
||||
eventnum++;
|
||||
eventnum %= 1000;
|
||||
eventname = fl_eventnames[ev];
|
||||
tty->printf("[%3d] %-12s", eventnum, eventname);
|
||||
return 1;
|
||||
} // app::print_event()
|
||||
|
||||
// Event handling
|
||||
int app::handle(int ev) {
|
||||
int res = Fl_Double_Window::handle(ev);
|
||||
// filter and output keyboard events only
|
||||
if (!print_event(ev))
|
||||
return res;
|
||||
|
||||
const char *etxt = Fl::event_text();
|
||||
int ekey = Fl::event_key();
|
||||
int elen = Fl::event_length();
|
||||
char ctrl = (Fl::event_state() & FL_COMMAND) ? 'C' : '.';
|
||||
char alt = (Fl::event_state() & FL_ALT) ? 'A' : '.';
|
||||
char shift = (Fl::event_state() & FL_SHIFT) ? 'S' : '.';
|
||||
char meta = (Fl::event_state() & FL_META) ? 'M' : '.';
|
||||
char numlk = (Fl::event_state() & FL_NUM_LOCK) ? 'N' : '.';
|
||||
char capslk = (Fl::event_state() & FL_CAPS_LOCK) ? 'L' : '.';
|
||||
|
||||
tty->printf("%06x ", ekey); // event key number (hex)
|
||||
int lg;
|
||||
tty->printf("%s", get_keyname(ekey, lg));
|
||||
for (int i = lg; i < 14; i++) {
|
||||
tty->printf(" ");
|
||||
}
|
||||
|
||||
tty->printf("%c %c %c %c %c %c ", ctrl, alt, shift, meta, numlk, capslk);
|
||||
|
||||
if (elen) {
|
||||
if (elen == 1 && etxt[0] < 32) { // control character (0-31)
|
||||
tty->printf("'^%c' ", (char)(etxt[0] + 64));
|
||||
} else {
|
||||
tty->printf("'%s' ", etxt);
|
||||
}
|
||||
unsigned int ucs = fl_utf8decode(etxt, etxt + elen, NULL);
|
||||
tty->printf(" U+%04x ", ucs);
|
||||
for (int i = 0; i < Fl::event_length(); i++) {
|
||||
tty->printf(" %02x", Fl::event_text()[i]&0xff);
|
||||
}
|
||||
} else {
|
||||
tty->printf("'' ");
|
||||
}
|
||||
tty->printf("\n");
|
||||
return res;
|
||||
} // app::handle()
|
||||
|
||||
// Quit button callback: closes the window
|
||||
void quit_cb(Fl_Widget *w, void *) {
|
||||
w->window()->hide();
|
||||
}
|
||||
|
||||
// Clear button callback: clears the terminal display
|
||||
void clear_cb(Fl_Button *b, void *) {
|
||||
Fl_Terminal *tty = ((app *)b->window())->tty;
|
||||
tty->clear_screen_home();
|
||||
tty->clear_history();
|
||||
tty->printf("%s\n", headline_text); // test, helpful for copy to clipboard
|
||||
tty->redraw();
|
||||
tty->take_focus();
|
||||
}
|
||||
|
||||
// Callback for all (light) buttons
|
||||
void toggle_cb(Fl_Widget *w, void *) {
|
||||
Fl_Terminal *tty = ((app *)w->window())->tty;
|
||||
tty->take_focus();
|
||||
}
|
||||
|
||||
// Window close callback (Esc does not close the window)
|
||||
void close_cb(Fl_Widget *win, void *) {
|
||||
if (Fl::event() == FL_SHORTCUT)
|
||||
return;
|
||||
win->hide();
|
||||
}
|
||||
|
||||
// Main program
|
||||
|
||||
int main(int argc, char **argv) {
|
||||
|
||||
// Set an appropriate font for Wine on Linux (test only).
|
||||
// This is very likely not necessary on a real Windows system
|
||||
|
||||
#if (1) // test/experimental for wine on Linux (maybe missing fonts)
|
||||
#ifdef _WIN32
|
||||
// Fl::set_font(FL_COURIER, " DejaVu Sans Mono"); // DejaVu Mono
|
||||
// Fl::set_font(FL_COURIER, "BNimbus Mono PS"); // Nimbus Mono PS bold
|
||||
Fl::set_font(FL_COURIER, " Liberation Mono"); // Liberation Mono
|
||||
#endif
|
||||
#endif // test
|
||||
|
||||
const int WW = 700, WH = 400;
|
||||
app *win = new app(0, 0, WW, WH);
|
||||
win->tty->box(FL_DOWN_BOX);
|
||||
win->tty->printf("Please press any key ...\n");
|
||||
|
||||
Fl_Grid *grid = new Fl_Grid(0, WH - 100, WW, 100);
|
||||
grid->layout(2, 5, 5, 5);
|
||||
|
||||
keydown = new Fl_Light_Button(0, 0, 80, 30, "Keydown");
|
||||
grid->widget(keydown, 0, 1);
|
||||
keydown->value(1);
|
||||
keydown->callback(toggle_cb);
|
||||
keydown->tooltip("Show FL_KEYDOWN aka FL_KEYBOARD events");
|
||||
|
||||
keyup = new Fl_Light_Button(0, 0, 80, 30, "Keyup");
|
||||
grid->widget(keyup, 0, 2);
|
||||
keyup->value(0);
|
||||
keyup->callback(toggle_cb);
|
||||
keyup->tooltip("Show FL_KEYUP events");
|
||||
|
||||
shortcut = new Fl_Light_Button(0, 0, 80, 30, "Shortcut");
|
||||
grid->widget(shortcut, 0, 3);
|
||||
shortcut->value(0);
|
||||
shortcut->callback(toggle_cb);
|
||||
shortcut->tooltip("Show FL_SHORTCUT events");
|
||||
|
||||
Fl_Button *clear = new Fl_Button(0, 0, 80, 30, "Clear");
|
||||
grid->widget(clear, 1, 0);
|
||||
clear->callback((Fl_Callback *)clear_cb);
|
||||
clear->tooltip("Clear the display");
|
||||
|
||||
Fl_Button *quit = new Fl_Button(WW - 70, WH - 50, 80, 30, "Quit");
|
||||
grid->widget(quit, 1, 4);
|
||||
quit->box(FL_THIN_UP_BOX);
|
||||
quit->callback((Fl_Callback *)quit_cb);
|
||||
quit->tooltip("Exit the program");
|
||||
|
||||
grid->end();
|
||||
win->end();
|
||||
win->callback(close_cb);
|
||||
win->resizable(win->tty);
|
||||
win->size_range(660, 300);
|
||||
win->show(argc, argv);
|
||||
return Fl::run();
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user