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