8 #include <sys/select.h>
14 #include <linux/usbdevice_fs.h>
15 #include <linux/usb/ch9.h>
16 #include <linux/input.h>
18 #define ARRAY_SIZE(x) (sizeof(x) / sizeof(x[0]))
28 /* return 1 if founf, 0 if not, < 0 on error */
29 static int find_device(struct teensy_dev *dev,
30 uint16_t vendor, uint16_t product)
32 const char path_root[] = "/dev/bus/usb";
34 struct usb_descriptor_header hdr;
35 struct usb_device_descriptor d;
36 struct usb_config_descriptor c;
37 struct usb_interface_descriptor i;
38 struct usb_endpoint_descriptor e;
39 char space[0x100]; /* enough? */
41 char path_bus[256], path_dev[256];
42 struct dirent *ent, *ent_bus;
43 DIR *dir = NULL, *dir_bus = NULL;
49 memset(dev, 0xff, sizeof(*dev));
51 dir = opendir(path_root);
57 for (ent = readdir(dir); ent != NULL; ent = readdir(dir)) {
58 /* should be a number like 000 */
59 if (sscanf(ent->d_name, "%03d", &num) != 1)
62 snprintf(path_bus, sizeof(path_bus), "%s/%s",
63 path_root, ent->d_name);
65 dir_bus = opendir(path_bus);
69 ent_bus = readdir(dir_bus);
70 for (; ent_bus != NULL; ent_bus = readdir(dir_bus)) {
71 if (sscanf(ent->d_name, "%03d", &num) != 1)
74 snprintf(path_dev, sizeof(path_dev), "%s/%s/%s",
75 path_root, ent->d_name, ent_bus->d_name);
77 fd = open(path_dev, O_RDWR);
81 ret = read(fd, &desc.d, sizeof(desc.d));
82 if (ret != sizeof(desc.d)) {
83 fprintf(stderr, "desc read: %d/%zd: ", ret, sizeof(desc.d));
88 if (desc.d.bDescriptorType != USB_DT_DEVICE) {
89 fprintf(stderr, "%s: bad DT: 0x%02x\n",
90 path_dev, desc.d.bDescriptorType);
94 if (desc.d.idVendor == vendor && desc.d.idProduct == product)
111 if (desc.d.bNumConfigurations != 1) {
112 fprintf(stderr, "unexpected bNumConfigurations: %u\n",
113 desc.d.bNumConfigurations);
117 /* walk through all descriptors */
120 ret = read(fd, &desc.hdr, sizeof(desc.hdr));
123 if (ret != sizeof(desc.hdr)) {
124 fprintf(stderr, "desc.hdr read: %d/%zd: ", ret, sizeof(desc.hdr));
129 ret = (int)lseek(fd, -sizeof(desc.hdr), SEEK_CUR);
135 ret = read(fd, &desc, desc.hdr.bLength);
136 if (ret != desc.hdr.bLength) {
137 fprintf(stderr, "desc read: %d/%u: ", ret, desc.hdr.bLength);
142 switch (desc.hdr.bDescriptorType) {
144 if (desc.c.bNumInterfaces != 2) {
145 fprintf(stderr, "unexpected bNumInterfaces: %u\n",
146 desc.c.bNumInterfaces);
151 case USB_DT_INTERFACE:
152 if (desc.i.bInterfaceClass != USB_CLASS_HID
153 || desc.i.bInterfaceSubClass != 0
154 || desc.i.bInterfaceProtocol != 0) {
155 fprintf(stderr, "unexpected interface %x:%x:%x\n",
156 desc.i.bInterfaceClass, desc.i.bInterfaceSubClass,
157 desc.i.bInterfaceProtocol);
160 if (desc.i.bNumEndpoints != 2) {
161 fprintf(stderr, "unexpected bNumEndpoints: %u\n",
162 desc.i.bNumEndpoints);
168 case USB_DT_ENDPOINT:
169 if (iface < 0 || iface >= ARRAY_SIZE(dev->ifaces)) {
170 fprintf(stderr, "bad iface: %d\n", iface);
173 if (desc.e.wMaxPacketSize != 64 && desc.e.wMaxPacketSize != 32) {
174 fprintf(stderr, "iface %d, EP %02x: "
175 "unexpected wMaxPacketSize: %u\n",
176 iface, desc.e.bEndpointAddress, desc.e.wMaxPacketSize);
179 if (desc.e.bEndpointAddress & 0x80)
180 dev->ifaces[iface].ep_in = desc.e.bEndpointAddress; // & 0x7F;
182 dev->ifaces[iface].ep_out = desc.e.bEndpointAddress;
190 fprintf(stderr, "skipping desc 0x%02x\n",
191 desc.hdr.bDescriptorType);
196 /* claim interfaces */
197 for (iface = 0; iface < ARRAY_SIZE(dev->ifaces); iface++) {
198 struct usbdevfs_ioctl usbio;
200 if (dev->ifaces[iface].ep_in == -1) {
201 fprintf(stderr, "missing ep_in, iface: %d\n", iface);
204 if (dev->ifaces[iface].ep_out == -1) {
205 fprintf(stderr, "missing ep_out, iface: %d\n", iface);
209 /* disconnect default driver */
210 memset(&usbio, 0, sizeof(usbio));
212 usbio.ioctl_code = USBDEVFS_DISCONNECT;
213 ret = ioctl(fd, USBDEVFS_IOCTL, &usbio);
214 if (ret != 0 && errno != ENODATA)
215 perror("USBDEVFS_DISCONNECT");
217 ret = ioctl(fd, USBDEVFS_CLAIMINTERFACE, &iface);
219 perror("USBDEVFS_CLAIMINTERFACE");
237 static int enable_echo(int enable)
239 const char *portname = "/dev/tty";
245 memset(&tty, 0, sizeof(tty));
247 fd = open(portname, O_RDWR | O_NOCTTY | O_SYNC);
249 fprintf(stderr, "open %s: ", portname);
254 ret = tcgetattr(fd, &tty);
260 // printf("lflag: 0%o\n", tty.c_lflag);
264 tty.c_lflag &= ~ECHO;
266 ret = tcsetattr(fd, TCSANOW, &tty);
279 static void signal_handler(int sig)
282 signal(sig, SIG_DFL);
286 /* ?0SA 00DU, ?1CB RLDU */
287 #define STATE_BYTES 2
289 static uint8_t fixed_input_state[STATE_BYTES] = { 0x33, 0x3f };
302 static const enum mdbtn evdev_md_map[KEY_CNT] = {
304 [KEY_DOWN] = MDBTN_DOWN,
305 [KEY_LEFT] = MDBTN_LEFT,
306 [KEY_RIGHT] = MDBTN_RIGHT,
307 [KEY_HOME] = MDBTN_A,
308 [KEY_PAGEDOWN] = MDBTN_B,
310 [KEY_LEFTALT] = MDBTN_START,
313 int do_evdev_input(int fd)
315 uint8_t old_state[STATE_BYTES];
316 uint8_t changed_bits[STATE_BYTES] = { 0, };
317 struct input_event ev;
321 ret = read(fd, &ev, sizeof(ev));
322 if (ret != sizeof(ev)) {
323 fprintf(stderr, "evdev read %d/%zd: ", ret, sizeof(ev));
328 if (ev.type != EV_KEY)
331 if (ev.value != 0 && ev.value != 1)
334 if ((uint32_t)ev.code >= ARRAY_SIZE(evdev_md_map)) {
335 fprintf(stderr, "evdev read bad key: %u\n", ev.code);
339 mdbtn = evdev_md_map[ev.code];
343 memcpy(old_state, fixed_input_state, STATE_BYTES);
345 /* ?0SA 00DU, ?1CB RLDU */
348 changed_bits[0] = 0x01;
349 changed_bits[1] = 0x01;
352 changed_bits[0] = 0x02;
353 changed_bits[1] = 0x02;
356 changed_bits[0] = 0x00;
357 changed_bits[1] = 0x04;
360 changed_bits[0] = 0x00;
361 changed_bits[1] = 0x08;
364 changed_bits[0] = 0x10;
365 changed_bits[1] = 0x00;
368 changed_bits[0] = 0x00;
369 changed_bits[1] = 0x10;
372 changed_bits[0] = 0x00;
373 changed_bits[1] = 0x20;
376 changed_bits[0] = 0x20;
377 changed_bits[1] = 0x00;
383 for (i = 0; i < STATE_BYTES; i++)
384 fixed_input_state[i] &= ~changed_bits[i];
388 for (i = 0; i < STATE_BYTES; i++)
389 fixed_input_state[i] |= changed_bits[i];
392 return memcmp(old_state, fixed_input_state, STATE_BYTES) ? 1 : 0;
402 int main(int argc, char *argv[])
404 char buf_dbg[64 + 1], buf_in[64], buf_out[64];
405 struct teensy_dev dev;
406 struct usbdevfs_urb urb[URB_CNT];
407 struct usbdevfs_urb *reaped_urb;
408 int fixed_input_changed;
410 int evdev_fd_cnt = 0;
414 int data_in_sent = 0;
419 for (i = 1; i < argc; i++) {
420 if (evdev_fd_cnt >= ARRAY_SIZE(evdev_fds)) {
421 fprintf(stderr, "too many evdevs\n");
424 fd = open(argv[i], O_RDONLY);
426 fprintf(stderr, "open %s: ", argv[i]);
431 ret = ioctl(fd, EVIOCGBIT(0, sizeof(evdev_support)),
435 if (!(evdev_support & (1 << EV_KEY))) {
436 fprintf(stderr, "%s doesn't have keys\n", argv[i]);
440 evdev_fds[evdev_fd_cnt++] = fd;
444 signal(SIGINT, signal_handler);
451 ret = find_device(&dev, 0x16C0, 0x0486);
457 printf("waiting for device..\n");
470 memset(&urb[URB_DATA_IN], 0, sizeof(urb[URB_DATA_IN]));
471 urb[URB_DATA_IN].type = USBDEVFS_URB_TYPE_INTERRUPT;
472 urb[URB_DATA_IN].endpoint = dev.ifaces[0].ep_in;
473 urb[URB_DATA_IN].buffer = buf_in;
474 urb[URB_DATA_IN].buffer_length = sizeof(buf_in);
476 ret = ioctl(dev.fd, USBDEVFS_SUBMITURB, &urb[URB_DATA_IN]);
478 perror("USBDEVFS_SUBMITURB URB_DATA_IN");
484 memset(&urb[URB_DBG_IN], 0, sizeof(urb[URB_DBG_IN]));
485 urb[URB_DBG_IN].type = USBDEVFS_URB_TYPE_INTERRUPT;
486 urb[URB_DBG_IN].endpoint = dev.ifaces[1].ep_in;
487 urb[URB_DBG_IN].buffer = buf_dbg;
488 urb[URB_DBG_IN].buffer_length = sizeof(buf_dbg) - 1;
490 ret = ioctl(dev.fd, USBDEVFS_SUBMITURB, &urb[URB_DBG_IN]);
492 perror("USBDEVFS_SUBMITURB URB_DBG_IN");
499 for (i = 0; i < evdev_fd_cnt; i++)
500 FD_SET(evdev_fds[i], &rfds);
503 FD_SET(dev.fd, &wfds);
505 ret = select(dev.fd + 1, &rfds, &wfds, NULL, NULL);
511 /* something from input devices? */
512 fixed_input_changed = 0;
513 for (i = 0; i < evdev_fd_cnt; i++) {
514 if (FD_ISSET(evdev_fds[i], &rfds)) {
515 fixed_input_changed |=
516 do_evdev_input(evdev_fds[i]);
520 /* something from USB? */
521 if (FD_ISSET(dev.fd, &wfds)) {
523 ret = ioctl(dev.fd, USBDEVFS_REAPURB, &reaped_urb);
527 perror("USBDEVFS_REAPURB");
531 if (reaped_urb != NULL && reaped_urb->status != 0) {
532 errno = -reaped_urb->status;
533 perror("urb status");
534 if (reaped_urb->status == -EILSEQ) {
535 /* this is usually a sign of disconnect.. */
541 if (reaped_urb == &urb[URB_DATA_IN]) {
545 if (reaped_urb == &urb[URB_DATA_OUT]) {
547 else if (reaped_urb == &urb[URB_DBG_IN]) {
549 buf_dbg[reaped_urb->actual_length] = 0;
550 printf("%s", buf_dbg);
554 fprintf(stderr, "reaped unknown urb? %p\n", reaped_urb);
558 /* something to send? */
559 if (fixed_input_changed) {
560 memset(buf_out, 0, sizeof(buf_out));
561 memcpy(buf_out, fixed_input_state, sizeof(fixed_input_state));
563 memset(&urb[URB_DATA_OUT], 0, sizeof(urb[URB_DATA_OUT]));
564 urb[URB_DATA_OUT].type = USBDEVFS_URB_TYPE_INTERRUPT;
565 urb[URB_DATA_OUT].endpoint = dev.ifaces[0].ep_out;
566 urb[URB_DATA_OUT].buffer = buf_out;
567 urb[URB_DATA_OUT].buffer_length = sizeof(buf_out);
569 ret = ioctl(dev.fd, USBDEVFS_SUBMITURB, &urb[URB_DATA_OUT]);
571 perror("USBDEVFS_SUBMITURB URB_DATA_OUT");
588 // vim: ts=2:sw=2:expandtab