/* * input_id - input device classification * * Copyright (C) 2009 Martin Pitt * Portions Copyright (C) 2004 David Zeuthen, * * 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; either version 2 of the License, or * (at your option) any later version. * * 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. * * You should have received a copy of the GNU General Public License * along with keymap; if not, write to the Free Software Foundation, * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. */ #include #include #include #include #include #include #include "libudev.h" /*------------------------------------------------------------------------------------------*\ \*------------------------------------------------------------------------------------------*/ /*--- #define HAVE_LINKAT ---*/ /*--- XXX BUSYBOX PATCH ---*/ #ifndef HAVE_LINKAT #ifndef AT_FDCWD #define AT_FDCWD -100 /* Special value used to indicate openat should use the current working directory. */ #endif #ifndef AT_REMOVEDIR #define AT_REMOVEDIR 0x200 /* Remove directory instead of unlinking file. */ #endif #define IS_ABSOLUTE_FILE_NAME(FNAME) ((FNAME)[0] == '/') /* Simulate unlinkat by doing save_cwd/fchdir/(unlink|rmdir)/restore_cwd. If either the save_cwd or the restore_cwd fails (relatively unlikely), then give a diagnostic and exit nonzero. Otherwise, upon failure, set errno and return -1, as unlinkat does. Upon successful completion, return a file descriptor. */ int unlinkat (int fd, char const *file, int flags) { char working_dir[PATH_MAX + 1]; int err; mode_t mode = 0; if(fd == AT_FDCWD || IS_ABSOLUTE_FILE_NAME (file)) { if(flags & AT_REMOVEDIR) return rmdir(file); else return unlink(file); } if(!getcwd(working_dir, PATH_MAX)) return -1; err = fchdir (fd); if(!err) return err; if(flags & AT_REMOVEDIR) err = rmdir(file); else err = unlink(file); if (chdir(working_dir) != 0) return -1; return err; } /* Simulate readlinkat by doing save_cwd/fchdir/readlink/restore_cwd. If either the save_cwd or the restore_cwd fails (relatively unlikely), then give a diagnostic and exit nonzero. Otherwise, upon failure, set errno and return -1, as readlinkat does. Upon successful completion, return a file descriptor. */ int readlinkat(int fd, const char *path, char *buf, size_t bufsize) { char working_dir[PATH_MAX + 1]; int err; mode_t mode = 0; if(fd == AT_FDCWD || IS_ABSOLUTE_FILE_NAME (path)) return readlink(path, buf, bufsize); if(!getcwd(working_dir, PATH_MAX)) return -1; err = fchdir (fd); if(!err) return err; err = readlink(path, buf, bufsize); if (chdir(working_dir) != 0) return -1; return err; } #endif /* #ifndef HAVE_LINKAT */ /*--- BUSYBOX PATCH XXX ---*/ /*------------------------------------------------------------------------------------------*\ \*------------------------------------------------------------------------------------------*/ /* we must use this kernel-compatible implementation */ #define BITS_PER_LONG (sizeof(unsigned long) * 8) #define NBITS(x) ((((x)-1)/BITS_PER_LONG)+1) #define OFF(x) ((x)%BITS_PER_LONG) #define BIT(x) (1UL<> OFF(bit)) & 1) /* * Read a capability attribute and return bitmask. * @param dev udev_device * @param attr sysfs attribute name (e. g. "capabilities/key") * @param bitmask: Output array; must have max_size elements */ static void get_cap_mask (struct udev_device *dev, const char* attr, unsigned long *bitmask, size_t max_size) { char text[4096]; int i; char* word; unsigned long val; snprintf(text, sizeof(text), "%s", udev_device_get_sysattr_value(dev, attr)); memset (bitmask, 0, max_size); i = 0; while ((word = strrchr(text, ' ')) != NULL) { val = strtoul (word+1, NULL, 16); bitmask[i] = val; *word = '\0'; ++i; } val = strtoul (text, NULL, 16); bitmask[i] = val; } /* pointer devices */ static void test_pointers (const unsigned long* bitmask_ev, const unsigned long* bitmask_abs, const unsigned long* bitmask_key, const unsigned long* bitmask_rel) { int is_mouse = 0; int is_touchpad = 0; if (!test_bit (EV_KEY, bitmask_ev)) return; if (test_bit (EV_ABS, bitmask_ev) && test_bit (ABS_X, bitmask_abs) && test_bit (ABS_Y, bitmask_abs)) { if (test_bit (BTN_STYLUS, bitmask_key) || test_bit (BTN_TOOL_PEN, bitmask_key)) puts("ID_INPUT_TABLET=1"); else if (test_bit (BTN_TOOL_FINGER, bitmask_key) && !test_bit (BTN_TOOL_PEN, bitmask_key)) is_touchpad = 1; else if (test_bit (BTN_TRIGGER, bitmask_key) || test_bit (BTN_A, bitmask_key) || test_bit (BTN_1, bitmask_key)) puts("ID_INPUT_JOYSTICK=1"); else if (test_bit (BTN_MOUSE, bitmask_key)) /* This path is taken by VMware's USB mouse, which has * absolute axes, but no touch/pressure button. */ is_mouse = 1; else if (test_bit (BTN_TOUCH, bitmask_key)) puts("ID_INPUT_TOUCHSCREEN=1"); } if (test_bit (EV_REL, bitmask_ev) && test_bit (REL_X, bitmask_rel) && test_bit (REL_Y, bitmask_rel) && test_bit (BTN_MOUSE, bitmask_key)) is_mouse = 1; if (is_mouse) puts("ID_INPUT_MOUSE=1"); if (is_touchpad) puts("ID_INPUT_TOUCHPAD=1"); } /* key like devices */ static void test_key (const unsigned long* bitmask_ev, const unsigned long* bitmask_key) { unsigned i; unsigned long acc; unsigned long mask; /* do we have any KEY_* capability? */ if (!test_bit (EV_KEY, bitmask_ev)) return; acc = 0; for (i = 0; i < BTN_MISC/BITS_PER_LONG; ++i) acc |= bitmask_key[i]; if (acc > 0) puts("ID_INPUT_KEY=1"); /* the first 32 bits are ESC, numbers, and Q to D; if we have all of * those, consider it a full keyboard; do not test KEY_RESERVED, though */ mask = 0xFFFFFFFE; if ((bitmask_key[0] & mask) == mask) puts("ID_INPUT_KEYBOARD=1"); } int main (int argc, char** argv) { struct udev *udev; struct udev_device *dev; char devpath[PATH_MAX]; unsigned long bitmask_ev[NBITS(EV_MAX)]; unsigned long bitmask_abs[NBITS(ABS_MAX)]; unsigned long bitmask_key[NBITS(KEY_MAX)]; unsigned long bitmask_rel[NBITS(REL_MAX)]; if (argc != 2) { fprintf(stderr, "Usage: %s \n", argv[0]); exit(1); } /* get the device */ udev = udev_new(); if (udev == NULL) return 1; snprintf(devpath, sizeof(devpath), "%s/%s", udev_get_sys_path(udev), argv[1]); dev = udev_device_new_from_syspath(udev, devpath); if (dev == NULL) { fprintf(stderr, "unable to access '%s'\n", devpath); return 1; } /* walk up the parental chain until we find the real input device; the * argument is very likely a subdevice of this, like eventN */ while (dev != NULL && udev_device_get_sysattr_value(dev, "capabilities/ev") == NULL) dev = udev_device_get_parent_with_subsystem_devtype(dev, "input", NULL); /* not an "input" class device */ if (dev == NULL) return 0; /* Use this as a flag that input devices were detected, so that this * program doesn't need to be called more than once per device */ puts("ID_INPUT=1"); get_cap_mask (dev, "capabilities/ev", bitmask_ev, sizeof (bitmask_ev)); get_cap_mask (dev, "capabilities/abs", bitmask_abs, sizeof (bitmask_abs)); get_cap_mask (dev, "capabilities/rel", bitmask_rel, sizeof (bitmask_rel)); get_cap_mask (dev, "capabilities/key", bitmask_key, sizeof (bitmask_key)); test_pointers(bitmask_ev, bitmask_abs, bitmask_key, bitmask_rel); test_key(bitmask_ev, bitmask_key); return 0; }