Home | History | Annotate | Line # | Download | only in wsconsctl
keyboard.c revision 1.8.22.1
      1  1.8.22.1      yamt /*	$NetBSD: keyboard.c,v 1.8.22.1 2008/05/18 12:30:55 yamt Exp $ */
      2       1.1   hannken 
      3       1.1   hannken /*-
      4       1.6      jmmv  * Copyright (c) 1998, 2004 The NetBSD Foundation, Inc.
      5       1.1   hannken  * All rights reserved.
      6       1.1   hannken  *
      7       1.1   hannken  * This code is derived from software contributed to The NetBSD Foundation
      8       1.1   hannken  * by Juergen Hannken-Illjes.
      9       1.1   hannken  *
     10       1.1   hannken  * Redistribution and use in source and binary forms, with or without
     11       1.1   hannken  * modification, are permitted provided that the following conditions
     12       1.1   hannken  * are met:
     13       1.1   hannken  * 1. Redistributions of source code must retain the above copyright
     14       1.1   hannken  *    notice, this list of conditions and the following disclaimer.
     15       1.1   hannken  * 2. Redistributions in binary form must reproduce the above copyright
     16       1.1   hannken  *    notice, this list of conditions and the following disclaimer in the
     17       1.1   hannken  *    documentation and/or other materials provided with the distribution.
     18       1.1   hannken  *
     19       1.1   hannken  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20       1.1   hannken  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21       1.1   hannken  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22       1.1   hannken  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23       1.1   hannken  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24       1.1   hannken  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25       1.1   hannken  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26       1.1   hannken  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27       1.1   hannken  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28       1.1   hannken  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29       1.1   hannken  * POSSIBILITY OF SUCH DAMAGE.
     30       1.1   hannken  */
     31       1.1   hannken 
     32       1.1   hannken #include <sys/ioctl.h>
     33       1.1   hannken #include <sys/time.h>
     34       1.8      jmmv 
     35       1.1   hannken #include <dev/wscons/wsksymdef.h>
     36       1.1   hannken #include <dev/wscons/wsconsio.h>
     37       1.8      jmmv 
     38       1.1   hannken #include <err.h>
     39       1.5  christos #include <errno.h>
     40       1.8      jmmv #include <stdlib.h>
     41       1.8      jmmv 
     42       1.1   hannken #include "wsconsctl.h"
     43       1.1   hannken 
     44       1.1   hannken static int kbtype;
     45       1.3        ad static int keyclick;
     46       1.1   hannken static struct wskbd_bell_data bell;
     47       1.1   hannken static struct wskbd_bell_data dfbell;
     48       1.1   hannken static struct wscons_keymap mapdata[KS_NUMKEYCODES];
     49       1.8      jmmv struct wskbd_map_data kbmap = /* used in map_parse.y and in util.c */
     50       1.8      jmmv     { KS_NUMKEYCODES, mapdata };
     51       1.1   hannken static struct wskbd_keyrepeat_data repeat;
     52       1.1   hannken static struct wskbd_keyrepeat_data dfrepeat;
     53       1.4  christos static struct wskbd_scroll_data scroll;
     54       1.1   hannken static int ledstate;
     55       1.2   hannken static kbd_t kbdencoding;
     56       1.5  christos static int havescroll = 1;
     57       1.1   hannken 
     58       1.1   hannken struct field keyboard_field_tab[] = {
     59       1.1   hannken     { "type",			&kbtype,	FMT_KBDTYPE,	FLG_RDONLY },
     60       1.1   hannken     { "bell.pitch",		&bell.pitch,	FMT_UINT,	FLG_MODIFY },
     61       1.1   hannken     { "bell.period",		&bell.period,	FMT_UINT,	FLG_MODIFY },
     62       1.1   hannken     { "bell.volume",		&bell.volume,	FMT_UINT,	FLG_MODIFY },
     63       1.1   hannken     { "bell.pitch.default",	&dfbell.pitch,	FMT_UINT,	FLG_MODIFY },
     64       1.1   hannken     { "bell.period.default",	&dfbell.period,	FMT_UINT,	FLG_MODIFY },
     65       1.1   hannken     { "bell.volume.default",	&dfbell.volume,	FMT_UINT,	FLG_MODIFY },
     66       1.8      jmmv     { "map",			&kbmap,		FMT_KBMAP,	FLG_MODIFY |
     67       1.8      jmmv     								FLG_NOAUTO },
     68       1.1   hannken     { "repeat.del1",		&repeat.del1,	FMT_UINT,	FLG_MODIFY },
     69       1.1   hannken     { "repeat.deln",		&repeat.delN,	FMT_UINT,	FLG_MODIFY },
     70       1.1   hannken     { "repeat.del1.default",	&dfrepeat.del1,	FMT_UINT,	FLG_MODIFY },
     71       1.1   hannken     { "repeat.deln.default",	&dfrepeat.delN,	FMT_UINT,	FLG_MODIFY },
     72       1.1   hannken     { "ledstate",		&ledstate,	FMT_UINT,	0 },
     73       1.1   hannken     { "encoding",		&kbdencoding,	FMT_KBDENC,	FLG_MODIFY },
     74       1.3        ad     { "keyclick",		&keyclick,	FMT_UINT,	FLG_MODIFY },
     75       1.8      jmmv     { "scroll.mode",		&scroll.mode,	FMT_UINT,	FLG_MODIFY },
     76       1.8      jmmv     { "scroll.modifier",	&scroll.modifier, FMT_UINT,	FLG_MODIFY },
     77       1.1   hannken };
     78       1.1   hannken 
     79       1.8      jmmv int keyboard_field_tab_len = sizeof(keyboard_field_tab) /
     80       1.8      jmmv 	sizeof(keyboard_field_tab[0]);
     81       1.1   hannken 
     82       1.1   hannken void
     83       1.7   xtraeme keyboard_get_values(int fd)
     84       1.1   hannken {
     85       1.8      jmmv 
     86       1.1   hannken 	if (field_by_value(&kbtype)->flags & FLG_GET)
     87       1.1   hannken 		if (ioctl(fd, WSKBDIO_GTYPE, &kbtype) < 0)
     88       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_GTYPE");
     89       1.1   hannken 
     90       1.1   hannken 	bell.which = 0;
     91       1.1   hannken 	if (field_by_value(&bell.pitch)->flags & FLG_GET)
     92       1.1   hannken 		bell.which |= WSKBD_BELL_DOPITCH;
     93       1.1   hannken 	if (field_by_value(&bell.period)->flags & FLG_GET)
     94       1.1   hannken 		bell.which |= WSKBD_BELL_DOPERIOD;
     95       1.1   hannken 	if (field_by_value(&bell.volume)->flags & FLG_GET)
     96       1.1   hannken 		bell.which |= WSKBD_BELL_DOVOLUME;
     97       1.1   hannken 	if (bell.which != 0 && ioctl(fd, WSKBDIO_GETBELL, &bell) < 0)
     98       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_GETBELL");
     99       1.1   hannken 
    100       1.1   hannken 	dfbell.which = 0;
    101       1.1   hannken 	if (field_by_value(&dfbell.pitch)->flags & FLG_GET)
    102       1.1   hannken 		dfbell.which |= WSKBD_BELL_DOPITCH;
    103       1.1   hannken 	if (field_by_value(&dfbell.period)->flags & FLG_GET)
    104       1.1   hannken 		dfbell.which |= WSKBD_BELL_DOPERIOD;
    105       1.1   hannken 	if (field_by_value(&dfbell.volume)->flags & FLG_GET)
    106       1.1   hannken 		dfbell.which |= WSKBD_BELL_DOVOLUME;
    107       1.1   hannken 	if (dfbell.which != 0 &&
    108       1.1   hannken 	    ioctl(fd, WSKBDIO_GETDEFAULTBELL, &dfbell) < 0)
    109       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_GETDEFAULTBELL");
    110       1.1   hannken 
    111       1.1   hannken 	if (field_by_value(&kbmap)->flags & FLG_GET) {
    112       1.1   hannken 		kbmap.maplen = KS_NUMKEYCODES;
    113       1.1   hannken 		if (ioctl(fd, WSKBDIO_GETMAP, &kbmap) < 0)
    114       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_GETMAP");
    115       1.1   hannken 	}
    116       1.1   hannken 
    117       1.1   hannken 	repeat.which = 0;
    118       1.1   hannken 	if (field_by_value(&repeat.del1)->flags & FLG_GET)
    119       1.1   hannken 		repeat.which |= WSKBD_KEYREPEAT_DODEL1;
    120       1.1   hannken 	if (field_by_value(&repeat.delN)->flags & FLG_GET)
    121       1.1   hannken 		repeat.which |= WSKBD_KEYREPEAT_DODELN;
    122       1.1   hannken 	if (repeat.which != 0 &&
    123       1.1   hannken 	    ioctl(fd, WSKBDIO_GETKEYREPEAT, &repeat) < 0)
    124       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_GETKEYREPEAT");
    125       1.1   hannken 
    126       1.1   hannken 	dfrepeat.which = 0;
    127       1.1   hannken 	if (field_by_value(&dfrepeat.del1)->flags & FLG_GET)
    128       1.1   hannken 		dfrepeat.which |= WSKBD_KEYREPEAT_DODEL1;
    129       1.1   hannken 	if (field_by_value(&dfrepeat.delN)->flags & FLG_GET)
    130       1.1   hannken 		dfrepeat.which |= WSKBD_KEYREPEAT_DODELN;
    131       1.1   hannken 	if (dfrepeat.which != 0 &&
    132       1.1   hannken 	    ioctl(fd, WSKBDIO_GETKEYREPEAT, &dfrepeat) < 0)
    133       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_GETKEYREPEAT");
    134       1.1   hannken 
    135       1.1   hannken 	if (field_by_value(&ledstate)->flags & FLG_GET)
    136       1.1   hannken 		if (ioctl(fd, WSKBDIO_GETLEDS, &ledstate) < 0)
    137       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_GETLEDS");
    138       1.1   hannken 
    139       1.1   hannken 	if (field_by_value(&kbdencoding)->flags & FLG_GET)
    140       1.1   hannken 		if (ioctl(fd, WSKBDIO_GETENCODING, &kbdencoding) < 0)
    141       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_GETENCODING");
    142       1.3        ad 
    143       1.3        ad 	if (field_by_value(&keyclick)->flags & FLG_GET) {
    144       1.3        ad 		ioctl(fd, WSKBDIO_GETKEYCLICK, &keyclick);
    145       1.3        ad 		/* Optional; don't complain. */
    146       1.3        ad 	}
    147       1.4  christos 
    148       1.4  christos 	scroll.which = 0;
    149       1.4  christos 	if (field_by_value(&scroll.mode)->flags & FLG_GET)
    150       1.4  christos 		scroll.which |= WSKBD_SCROLL_DOMODE;
    151       1.4  christos 	if (field_by_value(&scroll.modifier)->flags & FLG_GET)
    152       1.4  christos 		scroll.which |= WSKBD_SCROLL_DOMODIFIER;
    153       1.5  christos 	if (scroll.which != 0) {
    154       1.5  christos 		if (ioctl(fd, WSKBDIO_GETSCROLL, &scroll) == -1) {
    155       1.5  christos 			if (errno != ENODEV)
    156       1.8      jmmv 				err(EXIT_FAILURE, "WSKBDIO_GETSCROLL");
    157       1.5  christos 			else
    158       1.5  christos 				havescroll = 0;
    159       1.5  christos 		}
    160       1.5  christos 	}
    161       1.1   hannken }
    162       1.1   hannken 
    163       1.1   hannken void
    164       1.7   xtraeme keyboard_put_values(int fd)
    165       1.1   hannken {
    166       1.8      jmmv 
    167       1.1   hannken 	bell.which = 0;
    168       1.1   hannken 	if (field_by_value(&bell.pitch)->flags & FLG_SET)
    169       1.1   hannken 		bell.which |= WSKBD_BELL_DOPITCH;
    170       1.1   hannken 	if (field_by_value(&bell.period)->flags & FLG_SET)
    171       1.1   hannken 		bell.which |= WSKBD_BELL_DOPERIOD;
    172       1.1   hannken 	if (field_by_value(&bell.volume)->flags & FLG_SET)
    173       1.1   hannken 		bell.which |= WSKBD_BELL_DOVOLUME;
    174       1.1   hannken 	if (bell.which != 0 && ioctl(fd, WSKBDIO_SETBELL, &bell) < 0)
    175       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_SETBELL");
    176       1.1   hannken 	if (bell.which & WSKBD_BELL_DOPITCH)
    177       1.1   hannken 		pr_field(field_by_value(&bell.pitch), " -> ");
    178       1.1   hannken 	if (bell.which & WSKBD_BELL_DOPERIOD)
    179       1.1   hannken 		pr_field(field_by_value(&bell.period), " -> ");
    180       1.1   hannken 	if (bell.which & WSKBD_BELL_DOVOLUME)
    181       1.1   hannken 		pr_field(field_by_value(&bell.volume), " -> ");
    182       1.1   hannken 
    183       1.1   hannken 	dfbell.which = 0;
    184       1.1   hannken 	if (field_by_value(&dfbell.pitch)->flags & FLG_SET)
    185       1.1   hannken 		dfbell.which |= WSKBD_BELL_DOPITCH;
    186       1.1   hannken 	if (field_by_value(&dfbell.period)->flags & FLG_SET)
    187       1.1   hannken 		dfbell.which |= WSKBD_BELL_DOPERIOD;
    188       1.1   hannken 	if (field_by_value(&dfbell.volume)->flags & FLG_SET)
    189       1.1   hannken 		dfbell.which |= WSKBD_BELL_DOVOLUME;
    190       1.1   hannken 	if (dfbell.which != 0 &&
    191       1.1   hannken 	    ioctl(fd, WSKBDIO_SETDEFAULTBELL, &dfbell) < 0)
    192       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_SETDEFAULTBELL");
    193       1.1   hannken 	if (dfbell.which & WSKBD_BELL_DOPITCH)
    194       1.1   hannken 		pr_field(field_by_value(&dfbell.pitch), " -> ");
    195       1.1   hannken 	if (dfbell.which & WSKBD_BELL_DOPERIOD)
    196       1.1   hannken 		pr_field(field_by_value(&dfbell.period), " -> ");
    197       1.1   hannken 	if (dfbell.which & WSKBD_BELL_DOVOLUME)
    198       1.1   hannken 		pr_field(field_by_value(&dfbell.volume), " -> ");
    199       1.1   hannken 
    200       1.1   hannken 	if (field_by_value(&kbmap)->flags & FLG_SET) {
    201       1.1   hannken 		if (ioctl(fd, WSKBDIO_SETMAP, &kbmap) < 0)
    202       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_SETMAP");
    203       1.1   hannken 		pr_field(field_by_value(&kbmap), " -> ");
    204       1.1   hannken 	}
    205       1.1   hannken 
    206       1.1   hannken 	repeat.which = 0;
    207       1.1   hannken 	if (field_by_value(&repeat.del1)->flags & FLG_SET)
    208       1.1   hannken 		repeat.which |= WSKBD_KEYREPEAT_DODEL1;
    209       1.1   hannken 	if (field_by_value(&repeat.delN)->flags & FLG_SET)
    210       1.1   hannken 		repeat.which |= WSKBD_KEYREPEAT_DODELN;
    211       1.1   hannken 	if (repeat.which != 0 &&
    212       1.1   hannken 	    ioctl(fd, WSKBDIO_SETKEYREPEAT, &repeat) < 0)
    213       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_SETKEYREPEAT");
    214       1.1   hannken 	if (repeat.which & WSKBD_KEYREPEAT_DODEL1)
    215       1.1   hannken 		pr_field(field_by_value(&repeat.del1), " -> ");
    216       1.1   hannken 	if (repeat.which & WSKBD_KEYREPEAT_DODELN)
    217       1.1   hannken 		pr_field(field_by_value(&repeat.delN), " -> ");
    218       1.1   hannken 
    219       1.1   hannken 	dfrepeat.which = 0;
    220       1.1   hannken 	if (field_by_value(&dfrepeat.del1)->flags & FLG_SET)
    221       1.1   hannken 		dfrepeat.which |= WSKBD_KEYREPEAT_DODEL1;
    222       1.1   hannken 	if (field_by_value(&dfrepeat.delN)->flags & FLG_SET)
    223       1.1   hannken 		dfrepeat.which |= WSKBD_KEYREPEAT_DODELN;
    224       1.1   hannken 	if (dfrepeat.which != 0 &&
    225       1.1   hannken 	    ioctl(fd, WSKBDIO_SETDEFAULTKEYREPEAT, &dfrepeat) < 0)
    226       1.8      jmmv 		err(EXIT_FAILURE, "WSKBDIO_SETDEFAULTKEYREPEAT");
    227       1.1   hannken 	if (dfrepeat.which &WSKBD_KEYREPEAT_DODEL1)
    228       1.1   hannken 		pr_field(field_by_value(&dfrepeat.del1), " -> ");
    229       1.1   hannken 	if (dfrepeat.which & WSKBD_KEYREPEAT_DODELN)
    230       1.1   hannken 		pr_field(field_by_value(&dfrepeat.delN), " -> ");
    231       1.1   hannken 
    232       1.1   hannken 	if (field_by_value(&ledstate)->flags & FLG_SET) {
    233       1.1   hannken 		if (ioctl(fd, WSKBDIO_SETLEDS, &ledstate) < 0)
    234       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_SETLEDS");
    235       1.1   hannken 		pr_field(field_by_value(&ledstate), " -> ");
    236       1.1   hannken 	}
    237       1.1   hannken 
    238       1.1   hannken 	if (field_by_value(&kbdencoding)->flags & FLG_SET) {
    239       1.1   hannken 		if (ioctl(fd, WSKBDIO_SETENCODING, &kbdencoding) < 0)
    240       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_SETENCODING");
    241       1.1   hannken 		pr_field(field_by_value(&kbdencoding), " -> ");
    242       1.3        ad 	}
    243       1.3        ad 
    244       1.3        ad 	if (field_by_value(&keyclick)->flags & FLG_SET) {
    245       1.3        ad 		if (ioctl(fd, WSKBDIO_SETKEYCLICK, &keyclick) < 0)
    246       1.8      jmmv 			err(EXIT_FAILURE, "WSKBDIO_SETKEYCLICK");
    247       1.3        ad 		pr_field(field_by_value(&keyclick), " -> ");
    248       1.1   hannken 	}
    249       1.4  christos 
    250       1.4  christos 
    251       1.5  christos 	if (havescroll == 0)
    252       1.5  christos 		return;
    253       1.5  christos 
    254       1.4  christos 	scroll.which = 0;
    255       1.4  christos 	if (field_by_value(&scroll.mode)->flags & FLG_SET)
    256       1.4  christos 		scroll.which |= WSKBD_SCROLL_DOMODE;
    257       1.4  christos 	if (field_by_value(&scroll.modifier)->flags & FLG_SET)
    258       1.4  christos 		scroll.which |= WSKBD_SCROLL_DOMODIFIER;
    259       1.4  christos 
    260       1.4  christos 	if (scroll.which & WSKBD_SCROLL_DOMODE)
    261       1.4  christos 		pr_field(field_by_value(&scroll.mode), " -> ");
    262       1.4  christos 	if (scroll.which & WSKBD_SCROLL_DOMODIFIER)
    263       1.4  christos 		pr_field(field_by_value(&scroll.modifier), " -> ");
    264       1.5  christos 	if (scroll.which != 0) {
    265       1.5  christos 		if (ioctl(fd, WSKBDIO_SETSCROLL, &scroll) == -1) {
    266       1.5  christos 			if (errno != ENODEV)
    267       1.8      jmmv 				err(EXIT_FAILURE, "WSKBDIO_SETSCROLL");
    268       1.5  christos 			else {
    269       1.8      jmmv 				warnx("scrolling is not supported by this "
    270       1.8      jmmv 				    "kernel");
    271       1.5  christos 				havescroll = 0;
    272       1.5  christos 			}
    273       1.5  christos 		}
    274       1.5  christos 	}
    275       1.1   hannken }
    276       1.4  christos 
    277