1N/A/***************************************************************************
1N/A *
1N/A * probe-xkb.c : Probe for keyboard device information
1N/A *
1N/A * Copyright 2009 Sun Microsystems, Inc. All rights reserved.
1N/A * Use is subject to license terms.
1N/A *
1N/A * Licensed under the Academic Free License version 2.1
1N/A *
1N/A **************************************************************************/
1N/A
1N/A#ifdef HAVE_CONFIG_H
1N/A#include <config.h>
1N/A#endif
1N/A
1N/A#include <errno.h>
1N/A#include <string.h>
1N/A#include <strings.h>
1N/A#include <ctype.h>
1N/A#include <stdlib.h>
1N/A#include <stdio.h>
1N/A#include <sys/ioctl.h>
1N/A#include <sys/stropts.h>
1N/A#include <fcntl.h>
1N/A#include <unistd.h>
1N/A#include <priv.h>
1N/A
1N/A#include <sys/kbd.h>
1N/A#include <sys/kbio.h>
1N/A
1N/A#include <libhal.h>
1N/A#include <logger.h>
1N/A
1N/A#define MAXLINELEN 256
1N/A#define COMMENTCHAR '#'
1N/A#define KBD_DEFAULT_DEVICE "/dev/kbd"
1N/A#define XKBTABLE_PATH "/usr/X11/lib/X11/xkb/xkbtable.map"
1N/A
1N/Astatic int global_linenumber = 0;
1N/Astatic char line[MAXLINELEN + 1];
1N/A
1N/Astatic void
1N/Adrop_privileges()
1N/A{
1N/A priv_set_t *pPrivSet = NULL;
1N/A priv_set_t *lPrivSet = NULL;
1N/A
1N/A /*
1N/A * Start with the 'basic' privilege set and then remove any
1N/A * of the 'basic' privileges that will not be needed.
1N/A */
1N/A if ((pPrivSet = priv_str_to_set("basic", ",", NULL)) == NULL) {
1N/A HAL_INFO(("Error in setting the priv"));
1N/A return;
1N/A }
1N/A
1N/A /* Clear privileges we will not need from the 'basic' set */
1N/A (void) priv_delset(pPrivSet, PRIV_FILE_LINK_ANY);
1N/A (void) priv_delset(pPrivSet, PRIV_PROC_INFO);
1N/A (void) priv_delset(pPrivSet, PRIV_PROC_SESSION);
1N/A (void) priv_delset(pPrivSet, PRIV_PROC_EXEC);
1N/A (void) priv_delset(pPrivSet, PRIV_PROC_FORK);
1N/A
1N/A (void) priv_addset(pPrivSet, PRIV_SYS_DEVICES);
1N/A (void) priv_addset(pPrivSet, PRIV_FILE_DAC_READ);
1N/A
1N/A /* Set the permitted privilege set. */
1N/A if (setppriv(PRIV_SET, PRIV_PERMITTED, pPrivSet) != 0) {
1N/A return;
1N/A }
1N/A
1N/A /* Clear the limit set. */
1N/A if ((lPrivSet = priv_allocset()) == NULL) {
1N/A return;
1N/A }
1N/A
1N/A priv_emptyset(lPrivSet);
1N/A
1N/A if (setppriv(PRIV_SET, PRIV_LIMIT, lPrivSet) != 0) {
1N/A return;
1N/A }
1N/A
1N/A priv_freeset(lPrivSet);
1N/A priv_freeset(pPrivSet);
1N/A}
1N/A
1N/Astatic int
1N/Aget_kbd_layout_type(char *device_file, int *kbd_type, int *kbd_layout)
1N/A{
1N/A int ret = 1;
1N/A int fd = -1;
1N/A
1N/A if ((fd = open(device_file, O_RDONLY | O_NONBLOCK)) < 0) {
1N/A HAL_DEBUG(("Cannot open %s: %s", device_file, strerror(errno)));
1N/A goto out;
1N/A }
1N/A
1N/A /*
1N/A * For usb keyboard devices, we need to first push "usbkbm" module upon
1N/A * the stream.
1N/A */
1N/A if (strstr(device_file, "hid") != NULL) {
1N/A if (ioctl(fd, I_FIND, "usbkbm") == 0) {
1N/A (void) ioctl(fd, I_PUSH, "usbkbm");
1N/A HAL_DEBUG(("usbkbm module has been pushed %s", strerror(errno)));
1N/A }
1N/A }
1N/A
1N/A if (ioctl(fd, KIOCTYPE, kbd_type) < 0) {
1N/A HAL_DEBUG(("get keyboard type failed %s: %s",
1N/A device_file, strerror(errno)));
1N/A goto out;
1N/A }
1N/A if (ioctl(fd, KIOCLAYOUT, kbd_layout) < 0) {
1N/A HAL_DEBUG(("get keyboard layout failed %s: %s",
1N/A device_file, strerror(errno)));
1N/A goto out;
1N/A }
1N/A
1N/A ret = 0;
1N/A
1N/Aout: if (fd >= 0) {
1N/A close(fd);
1N/A }
1N/A
1N/A return (ret);
1N/A}
1N/A
1N/A/* Skips over the white space character in the string. */
1N/Astatic char *
1N/Askipwhite(char *ptr)
1N/A{
1N/A while ((*ptr == ' ') || (*ptr == '\t')) {
1N/A ptr++;
1N/A }
1N/A
1N/A /* This should not occur. but .. */
1N/A if (*ptr == '\n') {
1N/A ptr = '\0';
1N/A }
1N/A
1N/A return (ptr);
1N/A}
1N/A
1N/Astatic char *
1N/Agetaline(FILE *fp)
1N/A{
1N/A char *ptr;
1N/A char *tmp;
1N/A int index;
1N/A int c;
1N/A
1N/A while (1) {
1N/A ptr = fgets(line, MAXLINELEN, fp);
1N/A if (!ptr) {
1N/A (void) fclose(fp);
1N/A return (NULL);
1N/A }
1N/A
1N/A global_linenumber++;
1N/A
1N/A /* Comment line */
1N/A if (ptr[0] == COMMENTCHAR) {
1N/A continue;
1N/A }
1N/A
1N/A /* Blank line */
1N/A if (ptr[0] == '\n') {
1N/A continue;
1N/A }
1N/A
1N/A if ((tmp = strchr(ptr, '#')) != NULL) {
1N/A *tmp = '\0';
1N/A }
1N/A
1N/A if (ptr[strlen(ptr) - 1] == '\n') {
1N/A /* get rid of '\n' */
1N/A ptr[strlen(ptr) - 1] = '\0';
1N/A }
1N/A
1N/A ptr = skipwhite(ptr);
1N/A if (*ptr) {
1N/A break;
1N/A }
1N/A }
1N/A return (ptr);
1N/A}
1N/A
1N/Astatic int
1N/Asun_find_xkbnames(int kb_type, int kb_layout, char **xkb_keymap,
1N/A char **xkb_model, char **xkb_layout)
1N/A{
1N/A const char *type, *layout;
1N/A char *keymap, *defkeymap = NULL;
1N/A char *model, *defmodel = NULL;
1N/A char *xkblay, *defxkblay = NULL;
1N/A FILE *fp;
1N/A int found_error = 0, found_keytable = 0;
1N/A int ret = 1;
1N/A
1N/A if ((fp = fopen(XKBTABLE_PATH, "r")) == NULL) {
1N/A return (ret);
1N/A }
1N/A
1N/A global_linenumber = 0;
1N/A while (getaline(fp)) {
1N/A if ((type = strtok(line, " \t\n")) == NULL) {
1N/A found_error = 1;
1N/A }
1N/A
1N/A if ((layout = strtok(NULL, " \t\n")) == NULL) {
1N/A found_error = 1;
1N/A }
1N/A
1N/A if ((keymap = strtok(NULL, " \t\n")) == NULL) {
1N/A found_error = 1;
1N/A }
1N/A
1N/A /* These two are optional entries */
1N/A model = strtok(NULL, " \t\n");
1N/A if ((model == NULL) || (*model == COMMENTCHAR)) {
1N/A model = xkblay = NULL;
1N/A } else {
1N/A xkblay = strtok(NULL, " \t\n");
1N/A if ((xkblay != NULL) && (*xkblay == COMMENTCHAR)) {
1N/A xkblay = NULL;
1N/A }
1N/A }
1N/A
1N/A if (found_error) {
1N/A found_error = 0;
1N/A continue;
1N/A }
1N/A
1N/A /* record default entry if/when found */
1N/A if (*type == '*') {
1N/A if (defkeymap == NULL) {
1N/A defkeymap = strdup(keymap);
1N/A defmodel = strdup(model);
1N/A defxkblay = strdup(xkblay);
1N/A }
1N/A } else if (atoi(type) == kb_type) {
1N/A if (*layout == '*') {
1N/A defkeymap = strdup(keymap);
1N/A defmodel = strdup(model);
1N/A defxkblay = strdup(xkblay);
1N/A } else if (atoi(layout) == kb_layout) {
1N/A found_keytable = 1;
1N/A break;
1N/A }
1N/A }
1N/A }
1N/A
1N/A (void) fclose(fp);
1N/A
1N/A if (!found_keytable) {
1N/A keymap = defkeymap;
1N/A model = defmodel;
1N/A xkblay = defxkblay;
1N/A }
1N/A
1N/A if ((keymap != NULL) && (strcmp(keymap, "-") != 0)) {
1N/A *xkb_keymap = keymap;
1N/A }
1N/A if ((model != NULL) && (strcmp(model, "-") != 0)) {
1N/A *xkb_model = model;
1N/A }
1N/A if ((xkblay != NULL) && (strcmp(xkblay, "-") != 0)) {
1N/A *xkb_layout = xkblay;
1N/A }
1N/A
1N/A return (0);
1N/A}
1N/A
1N/Aint
1N/Amain(int argc, char *argv[])
1N/A{
1N/A int ret = 1;
1N/A char *udi;
1N/A char *device_file;
1N/A LibHalContext *ctx = NULL;
1N/A LibHalChangeSet *cs = NULL;
1N/A DBusError error;
1N/A int kbd_type, kbd_layout;
1N/A char *xkbkeymap = NULL, *xkbmodel = NULL, *xkblayout = NULL;
1N/A
1N/A if ((udi = getenv("UDI")) == NULL) {
1N/A goto out;
1N/A }
1N/A
1N/A if ((device_file = getenv("HAL_PROP_INPUT_DEVICE")) == NULL) {
1N/A goto out;
1N/A }
1N/A
1N/A drop_privileges();
1N/A setup_logger();
1N/A
1N/A dbus_error_init(&error);
1N/A if ((ctx = libhal_ctx_init_direct(&error)) == NULL) {
1N/A goto out;
1N/A }
1N/A
1N/A if ((cs = libhal_device_new_changeset(udi)) == NULL) {
1N/A HAL_DEBUG(("Cannot allocate changeset"));
1N/A goto out;
1N/A }
1N/A
1N/A HAL_DEBUG(("Doing probe-xkb for %s (udi=%s)", device_file, udi));
1N/A
1N/A if (get_kbd_layout_type(device_file, &kbd_type, &kbd_layout)) {
1N/A goto out;
1N/A }
1N/A
1N/A /*
1N/A * For some usb keyboard that is not self-identifying, get keyboard's
1N/A * layout and type from system default keyboard device--/dev/kbd.
1N/A */
1N/A if ((kbd_layout == 0) && (strstr(device_file, "hid") != NULL)) {
1N/A if (get_kbd_layout_type(KBD_DEFAULT_DEVICE,
1N/A &kbd_type, &kbd_layout)) {
1N/A goto out;
1N/A }
1N/A }
1N/A
1N/A if (sun_find_xkbnames(kbd_type, kbd_layout,
1N/A &xkbkeymap, &xkbmodel, &xkblayout)) {
1N/A goto out;
1N/A }
1N/A
1N/A /*
1N/A * If doesn't find matching entry in xkbtable.map, using default
1N/A * values setting in 10-x11-input.fdi
1N/A */
1N/A if ((xkbmodel != NULL) && (xkblayout != NULL)) {
1N/A libhal_changeset_set_property_string(cs,
1N/A "input.x11_options.XkbModel", xkbmodel);
1N/A libhal_changeset_set_property_string(cs,
1N/A "input.x11_options.XkbLayout", xkblayout);
1N/A
1N/A libhal_device_commit_changeset(ctx, cs, &error);
1N/A }
1N/A
1N/A ret = 0;
1N/A
1N/Aout:
1N/A if (cs != NULL) {
1N/A libhal_device_free_changeset(cs);
1N/A }
1N/A
1N/A if (ctx != NULL) {
1N/A libhal_ctx_shutdown(ctx, &error);
1N/A libhal_ctx_free(ctx);
1N/A if (dbus_error_is_set(&error)) {
1N/A dbus_error_free(&error);
1N/A }
1N/A }
1N/A return (ret);
1N/A}