352 lines
8.8 KiB
C
352 lines
8.8 KiB
C
/* $NetBSD: util.c,v 1.9 2001/09/19 12:45:24 ad Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c) 1998 The NetBSD Foundation, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to The NetBSD Foundation
|
|
* by Juergen Hannken-Illjes.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the NetBSD
|
|
* Foundation, Inc. and its contributors.
|
|
* 4. Neither the name of The NetBSD Foundation nor the names of its
|
|
* contributors may be used to endorse or promote products derived
|
|
* from this software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
|
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/time.h>
|
|
#include <dev/wscons/wsconsio.h>
|
|
#include <dev/wscons/wsksymdef.h>
|
|
#include <err.h>
|
|
#include <string.h>
|
|
#include <stdio.h>
|
|
#include <unistd.h>
|
|
#include "wsconsctl.h"
|
|
|
|
#define TABLEN(t) (sizeof(t)/sizeof(t[0]))
|
|
|
|
extern struct wskbd_map_data kbmap; /* from keyboard.c */
|
|
extern struct wskbd_map_data newkbmap; /* from map_parse.y */
|
|
|
|
struct nameint {
|
|
int value;
|
|
char *name;
|
|
};
|
|
|
|
static struct nameint kbtype_tab[] = {
|
|
{ WSKBD_TYPE_LK201, "lk201" },
|
|
{ WSKBD_TYPE_LK401, "lk401" },
|
|
{ WSKBD_TYPE_PC_XT, "pc-xt" },
|
|
{ WSKBD_TYPE_PC_AT, "pc-at" },
|
|
{ WSKBD_TYPE_USB, "usb" },
|
|
{ WSKBD_TYPE_HPC_KBD, "hpc-kbd" },
|
|
{ WSKBD_TYPE_HPC_BTN, "hpc-btn" },
|
|
{ WSKBD_TYPE_ARCHIMEDES, "archimedes" },
|
|
{ WSKBD_TYPE_RISCPC, "riscpc" },
|
|
};
|
|
|
|
static struct nameint mstype_tab[] = {
|
|
{ WSMOUSE_TYPE_VSXXX, "dec-tc" },
|
|
{ WSMOUSE_TYPE_PS2, "ps2" },
|
|
{ WSMOUSE_TYPE_USB, "usb" },
|
|
{ WSMOUSE_TYPE_LMS, "logitech-bus" },
|
|
{ WSMOUSE_TYPE_MMS, "ms-inport" },
|
|
{ WSMOUSE_TYPE_TPANEL, "touch-panel" },
|
|
{ WSMOUSE_TYPE_NEXT, "next" },
|
|
{ WSMOUSE_TYPE_ARCHIMEDES, "archimedes" },
|
|
};
|
|
|
|
static struct nameint dpytype_tab[] = {
|
|
{ WSDISPLAY_TYPE_UNKNOWN, "unknown" },
|
|
{ WSDISPLAY_TYPE_PM_MONO, "dec-pm-mono" },
|
|
{ WSDISPLAY_TYPE_PM_COLOR, "dec-pm-color" },
|
|
{ WSDISPLAY_TYPE_CFB, "dec-cfb" },
|
|
{ WSDISPLAY_TYPE_XCFB, "dec-xcfb" },
|
|
{ WSDISPLAY_TYPE_MFB, "dec-mfb" },
|
|
{ WSDISPLAY_TYPE_SFB, "dec-sfb" },
|
|
{ WSDISPLAY_TYPE_ISAVGA, "vga-isa" },
|
|
{ WSDISPLAY_TYPE_PCIVGA, "vga-pci" },
|
|
{ WSDISPLAY_TYPE_TGA, "dec-tga-pci" },
|
|
{ WSDISPLAY_TYPE_SFBP, "dec-sfb+" },
|
|
{ WSDISPLAY_TYPE_PCIMISC, "generic-pci" },
|
|
{ WSDISPLAY_TYPE_NEXTMONO, "next-mono" },
|
|
{ WSDISPLAY_TYPE_PX, "dex-px" },
|
|
{ WSDISPLAY_TYPE_PXG, "dex-pxg" },
|
|
{ WSDISPLAY_TYPE_TX, "dex-tx" },
|
|
{ WSDISPLAY_TYPE_HPCFB, "generic-hpc" },
|
|
{ WSDISPLAY_TYPE_VIDC, "arm-vidc" },
|
|
{ WSDISPLAY_TYPE_SPX, "dec-spx" },
|
|
{ WSDISPLAY_TYPE_GPX, "dec-gpx" },
|
|
{ WSDISPLAY_TYPE_LCG, "dec-lcg" },
|
|
{ WSDISPLAY_TYPE_VAX_MONO, "dec-vax-mono" },
|
|
{ WSDISPLAY_TYPE_SB_P9100, "sparcbook-p9100" },
|
|
{ WSDISPLAY_TYPE_EGA, "ega" },
|
|
{ WSDISPLAY_TYPE_DCPVR, "dreamcast-pvr" },
|
|
};
|
|
|
|
static struct nameint kbdenc_tab[] = {
|
|
KB_ENCTAB
|
|
};
|
|
|
|
static struct nameint kbdvar_tab[] = {
|
|
KB_VARTAB
|
|
};
|
|
|
|
static struct field *field_tab;
|
|
static int field_tab_len;
|
|
|
|
static char *int2name __P((int, int, struct nameint *, int));
|
|
static int name2int __P((char *, struct nameint *, int));
|
|
static void print_kmap __P((struct wskbd_map_data *));
|
|
|
|
void
|
|
field_setup(ftab, len)
|
|
struct field *ftab;
|
|
int len;
|
|
{
|
|
field_tab = ftab;
|
|
field_tab_len = len;
|
|
}
|
|
|
|
struct field *
|
|
field_by_name(name)
|
|
char *name;
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < field_tab_len; i++)
|
|
if (strcmp(field_tab[i].name, name) == 0)
|
|
return(field_tab + i);
|
|
|
|
errx(1, "%s: not found", name);
|
|
}
|
|
|
|
struct field *
|
|
field_by_value(addr)
|
|
void *addr;
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < field_tab_len; i++)
|
|
if (field_tab[i].valp == addr)
|
|
return(field_tab + i);
|
|
|
|
errx(1, "internal error: field_by_value: not found");
|
|
}
|
|
|
|
static char *
|
|
int2name(val, uflag, tab, len)
|
|
int val;
|
|
int uflag;
|
|
struct nameint *tab;
|
|
int len;
|
|
{
|
|
static char tmp[20];
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++)
|
|
if (tab[i].value == val)
|
|
return(tab[i].name);
|
|
|
|
if (uflag) {
|
|
snprintf(tmp, sizeof(tmp), "unknown_%d", val);
|
|
return(tmp);
|
|
} else
|
|
return(NULL);
|
|
}
|
|
|
|
static int
|
|
name2int(val, tab, len)
|
|
char *val;
|
|
struct nameint *tab;
|
|
int len;
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++)
|
|
if (strcmp(tab[i].name, val) == 0)
|
|
return(tab[i].value);
|
|
return(-1);
|
|
}
|
|
|
|
void
|
|
pr_field(f, sep)
|
|
struct field *f;
|
|
char *sep;
|
|
{
|
|
char *p;
|
|
u_int flags;
|
|
int i;
|
|
|
|
if (sep)
|
|
printf("%s%s", f->name, sep);
|
|
|
|
switch (f->format) {
|
|
case FMT_UINT:
|
|
printf("%u", *((u_int *) f->valp));
|
|
break;
|
|
case FMT_KBDTYPE:
|
|
p = int2name(*((u_int *) f->valp), 1,
|
|
kbtype_tab, TABLEN(kbtype_tab));
|
|
printf("%s", p);
|
|
break;
|
|
case FMT_MSTYPE:
|
|
p = int2name(*((u_int *) f->valp), 1,
|
|
mstype_tab, TABLEN(mstype_tab));
|
|
printf("%s", p);
|
|
break;
|
|
case FMT_DPYTYPE:
|
|
p = int2name(*((u_int *) f->valp), 1,
|
|
dpytype_tab, TABLEN(dpytype_tab));
|
|
printf("%s", p);
|
|
break;
|
|
case FMT_KBDENC:
|
|
p = int2name(KB_ENCODING(*((u_int *) f->valp)), 1,
|
|
kbdenc_tab, TABLEN(kbdenc_tab));
|
|
printf("%s", p);
|
|
|
|
flags = KB_VARIANT(*((u_int *) f->valp));
|
|
for (i = 0; i < 32; i++) {
|
|
if (!(flags & (1 << i)))
|
|
continue;
|
|
p = int2name(flags & (1 << i), 1,
|
|
kbdvar_tab, TABLEN(kbdvar_tab));
|
|
printf(".%s", p);
|
|
}
|
|
break;
|
|
case FMT_KBMAP:
|
|
print_kmap((struct wskbd_map_data *) f->valp);
|
|
break;
|
|
default:
|
|
errx(1, "internal error: pr_field: no format %d", f->format);
|
|
break;
|
|
}
|
|
|
|
printf("\n");
|
|
}
|
|
|
|
void
|
|
rd_field(f, val, merge)
|
|
struct field *f;
|
|
char *val;
|
|
int merge;
|
|
{
|
|
int i;
|
|
u_int u;
|
|
char *p;
|
|
struct wscons_keymap *mp;
|
|
|
|
switch (f->format) {
|
|
case FMT_UINT:
|
|
if (sscanf(val, "%u", &u) != 1)
|
|
errx(1, "%s: not a number", val);
|
|
if (merge)
|
|
*((u_int *) f->valp) += u;
|
|
else
|
|
*((u_int *) f->valp) = u;
|
|
break;
|
|
case FMT_KBDENC:
|
|
p = strchr(val, '.');
|
|
if (p != NULL)
|
|
*p++ = '\0';
|
|
|
|
i = name2int(val, kbdenc_tab, TABLEN(kbdenc_tab));
|
|
if (i == -1)
|
|
errx(1, "%s: not a valid encoding", val);
|
|
*((u_int *) f->valp) = i;
|
|
|
|
while (p) {
|
|
val = p;
|
|
p = strchr(p, '.');
|
|
if (p != NULL)
|
|
*p++ = '\0';
|
|
i = name2int(val, kbdvar_tab, TABLEN(kbdvar_tab));
|
|
if (i == -1)
|
|
errx(1, "%s: not a valid variant", val);
|
|
*((u_int *) f->valp) |= i;
|
|
}
|
|
break;
|
|
case FMT_KBMAP:
|
|
if (! merge)
|
|
kbmap.maplen = 0;
|
|
map_scan_setinput(val);
|
|
yyparse();
|
|
if (merge) {
|
|
if (newkbmap.maplen < kbmap.maplen)
|
|
newkbmap.maplen = kbmap.maplen;
|
|
for (i = 0; i < kbmap.maplen; i++) {
|
|
mp = newkbmap.map + i;
|
|
if (mp->command == KS_voidSymbol &&
|
|
mp->group1[0] == KS_voidSymbol &&
|
|
mp->group1[1] == KS_voidSymbol &&
|
|
mp->group2[0] == KS_voidSymbol &&
|
|
mp->group2[1] == KS_voidSymbol)
|
|
*mp = kbmap.map[i];
|
|
}
|
|
}
|
|
kbmap.maplen = newkbmap.maplen;
|
|
bcopy(newkbmap.map, kbmap.map,
|
|
kbmap.maplen*sizeof(struct wscons_keymap));
|
|
break;
|
|
default:
|
|
errx(1, "internal error: rd_field: no format %d", f->format);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void
|
|
print_kmap(map)
|
|
struct wskbd_map_data *map;
|
|
{
|
|
int i;
|
|
struct wscons_keymap *mp;
|
|
|
|
for (i = 0; i < map->maplen; i++) {
|
|
mp = map->map + i;
|
|
|
|
if (mp->command == KS_voidSymbol &&
|
|
mp->group1[0] == KS_voidSymbol &&
|
|
mp->group1[1] == KS_voidSymbol &&
|
|
mp->group2[0] == KS_voidSymbol &&
|
|
mp->group2[1] == KS_voidSymbol)
|
|
continue;
|
|
printf("\n");
|
|
printf("keycode %u =", i);
|
|
if (mp->command != KS_voidSymbol)
|
|
printf(" %s", ksym2name(mp->command));
|
|
printf(" %s", ksym2name(mp->group1[0]));
|
|
if (mp->group1[0] != mp->group1[1] ||
|
|
mp->group1[0] != mp->group2[0] ||
|
|
mp->group1[0] != mp->group2[1]) {
|
|
printf(" %s", ksym2name(mp->group1[1]));
|
|
if (mp->group1[0] != mp->group2[0] ||
|
|
mp->group1[1] != mp->group2[1]) {
|
|
printf(" %s", ksym2name(mp->group2[0]));
|
|
printf(" %s", ksym2name(mp->group2[1]));
|
|
}
|
|
}
|
|
}
|
|
}
|