悪名高いものからデータを読み取る Perl スクリプトを作成して/dev/input/event*
いますが、カーネルによって生成されたキー コードを ASCII に変換する方法が見つかりませんでした。
ここで、この表の Linux キー コードについて話しているのですが、配列をスクリプトにハードコーディングせずに変換するのに役立つものを見つけることができないようです。何か不足していますか?
良い習慣ではないように見えるので、配列部分をスキップしたいので、何か考えはありますか? :)
残念ながら、私は Perl でプログラミングしていませんが、ここに C で書かれた簡単な例を示します。
/*
* Based on keytable.c by Mauro Carvalho Chehab
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, version 2 of the License.
*
* This program 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 General Public License for more details.
*/
#include <stdlib.h>
#include <stdio.h>
#include <fcntl.h>
#include <linux/input.h>
#include <string.h>
#include <linux/input.h>
#include <sys/ioctl.h>
#define KEY_RELEASE 0
#define KEY_PRESS 1
#define KEY_KEEPING_PRESSED 2
#include "parse.h"
void prtcode(int codes) {
struct parse_key *p;
for (p = keynames; p->name != NULL; p++) {
if (p->value == (unsigned) codes) {
printf("scancode %s (0x%02x)\n", p->name, codes);
return;
}
}
if (isprint(codes)) {
printf("scancode '%c' (0x%02x)\n", codes, codes);
} else {
printf("scancode 0x%02x\n", codes);
}
}
int main (int argc, char *argv[]) {
int i, fd;
struct input_event ev[64];
if (argc != 2) {
fprintf(stderr, "usage: %s event-device (/dev/input/eventX)\n", argv[0]);
return 1;
}
if ((fd = open(argv[1], O_RDONLY)) < 0) {
perror("Couldn't open input device");
return 1;
}
while (1) {
size_t rb = read(fd, ev, sizeof(ev));
if (rb < (int) sizeof(struct input_event)) {
perror("short read");
return 1;
}
for (i = 0; i < (int) (rb / sizeof(struct input_event)); i++) {
if (EV_KEY == ev[i].type) {
if ((ev[i].value == KEY_PRESS) || (ev[i].value == KEY_KEEPING_PRESSED)) {
prtcode(ev[i].code);
printf("type %d code %d value %d\n", ev[i].type, ev[i].code, ev[i].value);
printf("\n");
}
}
}
}
return 0;
}
parse.h を生成するには、これを に入れますMakefile
:
parse.h: /usr/include/linux/input.h
@echo generating parse.h
@echo -en "struct parse_key {\n\tchar *name;\n\tunsigned int value;\n} " >parse.h
@echo -en "keynames[] = {\n" >>parse.h
@more /usr/include/linux/input.h |perl -n \
-e 'if (m/^\#define\s+(KEY_[^\s]+)\s+(0x[\d\w]+|[\d]+)/) ' \
-e '{ printf "\t{\"%s\", %s},\n",$$1,$$2; }' \
-e 'if (m/^\#define\s+(BTN_[^\s]+)\s+(0x[\d\w]+|[\d]+)/) ' \
-e '{ printf "\t{\"%s\", %s},\n",$$1,$$2; }' \
>> parse.h
@echo -en "\t{ NULL, 0}\n};\n" >>parse.h
次に、次のように使用します。
./keytable /dev/input/by-path/platform-i8042-serio-0-event-kbd
基本的に地図の問題です。キーコードを取得し、それに相当する ASCII を検索する必要があります。「配列部分」については、良い習慣ではないと思いますか?
このためのモジュールは CPAN にはありませんでしたが、それはあなたがそれを最初にアップロードするチャンスがあることを意味します。:)