3 * Denis Peter, MPL AG Switzerland
5 * Part of this source has been derived from the Linux USB
8 * See file CREDITS for list of people who contributed to this
11 * This program is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU General Public License as
13 * published by the Free Software Foundation; either version 2 of
14 * the License, or (at your option) any later version.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
29 #include <asm/byteorder.h>
35 * if overwrite_console returns 1, the stdin, stderr and stdout
36 * are switched to the serial port, else the settings in the
37 * environment are used
39 #ifdef CONFIG_SYS_CONSOLE_OVERWRITE_ROUTINE
40 extern int overwrite_console (void);
42 int overwrite_console (void)
49 #define USB_KBD_PRINTF(fmt,args...) printf (fmt ,##args)
51 #define USB_KBD_PRINTF(fmt,args...)
55 #define REPEAT_RATE 40/4 /* 40msec -> 25cps */
56 #define REPEAT_DELAY 10 /* 10 x REAPEAT_RATE = 400msec */
59 #define CAPS_LOCK 0x39
60 #define SCROLL_LOCK 0x47
73 #define USB_KBD_BUFFER_LEN 0x20 /* size of the keyboardbuffer */
75 static volatile char usb_kbd_buffer[USB_KBD_BUFFER_LEN];
76 static volatile int usb_in_pointer = 0;
77 static volatile int usb_out_pointer = 0;
82 #define DEVNAME "usbkbd"
83 static unsigned char num_lock = 0;
84 static unsigned char caps_lock = 0;
85 static unsigned char scroll_lock = 0;
86 static unsigned char ctrl = 0;
88 static unsigned char leds __attribute__ ((aligned (0x4)));
90 static unsigned char usb_kbd_numkey[] = {
91 '1', '2', '3', '4', '5', '6', '7', '8', '9', '0','\r',0x1b,'\b','\t',' ', '-',
92 '=', '[', ']','\\', '#', ';', '\'', '`', ',', '.', '/'
94 static unsigned char usb_kbd_numkey_shifted[] = {
95 '!', '@', '#', '$', '%', '^', '&', '*', '(', ')','\r',0x1b,'\b','\t',' ', '_',
96 '+', '{', '}', '|', '~', ':', '"', '~', '<', '>', '?'
99 /******************************************************************
101 ******************************************************************/
102 /* puts character in the queue and sets up the in and out pointer */
103 static void usb_kbd_put_queue(char data)
105 if((usb_in_pointer+1)==USB_KBD_BUFFER_LEN) {
106 if(usb_out_pointer==0) {
107 return; /* buffer full */
112 if((usb_in_pointer+1)==usb_out_pointer)
113 return; /* buffer full */
116 usb_kbd_buffer[usb_in_pointer]=data;
120 /* test if a character is in the queue */
121 static int usb_kbd_testc(void)
123 #ifdef CONFIG_SYS_USB_EVENT_POLL
126 if(usb_in_pointer==usb_out_pointer)
127 return(0); /* no data */
131 /* gets the character from the queue */
132 static int usb_kbd_getc(void)
135 while(usb_in_pointer==usb_out_pointer) {
136 #ifdef CONFIG_SYS_USB_EVENT_POLL
140 if((usb_out_pointer+1)==USB_KBD_BUFFER_LEN)
144 c=usb_kbd_buffer[usb_out_pointer];
149 /* forward decleration */
150 static int usb_kbd_probe(struct usb_device *dev, unsigned int ifnum);
152 /* search for keyboard and register it if found */
153 int drv_usb_kbd_init(void)
156 device_t usb_kbd_dev,*old_dev;
157 struct usb_device *dev;
158 char *stdinname = getenv ("stdin");
162 /* scan all USB Devices */
163 for(i=0;i<USB_MAX_DEVICE;i++) {
164 dev=usb_get_dev_index(i); /* get device */
167 if(dev->devnum!=-1) {
168 if(usb_kbd_probe(dev,0)==1) { /* Ok, we found a keyboard */
169 /* check, if it is already registered */
170 USB_KBD_PRINTF("USB KBD found set up device.\n");
171 old_dev = device_get_by_name(DEVNAME);
173 /* ok, already registered, just return ok */
174 USB_KBD_PRINTF("USB KBD is already registered.\n");
177 /* register the keyboard */
178 USB_KBD_PRINTF("USB KBD register.\n");
179 memset (&usb_kbd_dev, 0, sizeof(device_t));
180 strcpy(usb_kbd_dev.name, DEVNAME);
181 usb_kbd_dev.flags = DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
182 usb_kbd_dev.putc = NULL;
183 usb_kbd_dev.puts = NULL;
184 usb_kbd_dev.getc = usb_kbd_getc;
185 usb_kbd_dev.tstc = usb_kbd_testc;
186 error = device_register (&usb_kbd_dev);
188 /* check if this is the standard input device */
189 if(strcmp(stdinname,DEVNAME)==0) {
190 /* reassign the console */
191 if(overwrite_console()) {
194 error=console_assign(stdin,DEVNAME);
206 /* no USB Keyboard found */
211 /* deregistering the keyboard */
212 int usb_kbd_deregister(void)
214 #ifdef CONFIG_SYS_DEVICE_DEREGISTER
215 return device_deregister(DEVNAME);
221 /**************************************************************************
225 /* set the LEDs. Since this is used in the irq routine, the control job
226 is issued with a timeout of 0. This means, that the job is queued without
227 waiting for job completion */
229 static void usb_kbd_setled(struct usb_device *dev)
231 struct usb_interface_descriptor *iface;
232 iface = &dev->config.if_desc[0];
242 usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
243 USB_REQ_SET_REPORT, USB_TYPE_CLASS | USB_RECIP_INTERFACE,
244 0x200, iface->bInterfaceNumber,(void *)&leds, 1, 0);
249 #define CAPITAL_MASK 0x20
250 /* Translate the scancode in ASCII */
251 static int usb_kbd_translate(unsigned char scancode,unsigned char modifier,int pressed)
253 unsigned char keycode;
262 if(repeat_delay<REPEAT_DELAY)
264 repeat_delay=REPEAT_DELAY;
267 if((scancode>3) && (scancode<=0x1d)) { /* alpha numeric values */
268 keycode=scancode-4 + 0x61;
270 keycode&=~CAPITAL_MASK; /* switch to capital Letters */
271 if(((modifier&(1<<LEFT_SHIFT))!=0)||((modifier&(1<<RIGHT_SHIFT))!=0)) {
272 if(keycode & CAPITAL_MASK)
273 keycode&=~CAPITAL_MASK; /* switch to capital Letters */
275 keycode|=CAPITAL_MASK; /* switch to non capital Letters */
278 if((scancode>0x1d) && (scancode<0x3A)) {
279 if(((modifier&(1<<LEFT_SHIFT))!=0)||((modifier&(1<<RIGHT_SHIFT))!=0)) /* shifted */
280 keycode=usb_kbd_numkey_shifted[scancode-0x1e];
281 else /* non shifted */
282 keycode=usb_kbd_numkey[scancode-0x1e];
286 keycode = scancode - 0x3;
289 if(scancode==NUM_LOCK) {
293 if(scancode==CAPS_LOCK) {
294 caps_lock=~caps_lock;
297 if(scancode==SCROLL_LOCK) {
298 scroll_lock=~scroll_lock;
303 USB_KBD_PRINTF("%c",keycode);
304 usb_kbd_put_queue(keycode);
309 /* Interrupt service routine */
310 static int usb_kbd_irq(struct usb_device *dev)
314 if((dev->irq_status!=0)||(dev->irq_act_len!=8))
316 USB_KBD_PRINTF("usb_keyboard Error %lX, len %d\n",dev->irq_status,dev->irq_act_len);
322 case 0x0: /* No combo key pressed */
325 case 0x01: /* Left Ctrl pressed */
326 case 0x10: /* Right Ctrl pressed */
331 for (i = 2; i < 8; i++) {
332 if (old[i] > 3 && memscan(&new[2], old[i], 6) == &new[8]) {
333 res|=usb_kbd_translate(old[i],new[0],0);
335 if (new[i] > 3 && memscan(&old[2], new[i], 6) == &old[8]) {
336 res|=usb_kbd_translate(new[i],new[0],1);
339 if((new[2]>3) && (old[2]==new[2])) /* still pressed */
340 res|=usb_kbd_translate(new[2],new[0],2);
343 memcpy(&old[0],&new[0], 8);
344 return 1; /* install IRQ Handler again */
347 /* probes the USB device dev for keyboard type */
348 static int usb_kbd_probe(struct usb_device *dev, unsigned int ifnum)
350 struct usb_interface_descriptor *iface;
351 struct usb_endpoint_descriptor *ep;
354 if (dev->descriptor.bNumConfigurations != 1) return 0;
355 iface = &dev->config.if_desc[ifnum];
357 if (iface->bInterfaceClass != 3) return 0;
358 if (iface->bInterfaceSubClass != 1) return 0;
359 if (iface->bInterfaceProtocol != 1) return 0;
360 if (iface->bNumEndpoints != 1) return 0;
362 ep = &iface->ep_desc[0];
364 if (!(ep->bEndpointAddress & 0x80)) return 0;
365 if ((ep->bmAttributes & 3) != 3) return 0;
366 USB_KBD_PRINTF("USB KBD found set protocol...\n");
367 /* ok, we found a USB Keyboard, install it */
368 /* usb_kbd_get_hid_desc(dev); */
369 usb_set_protocol(dev, iface->bInterfaceNumber, 0);
370 USB_KBD_PRINTF("USB KBD found set idle...\n");
371 usb_set_idle(dev, iface->bInterfaceNumber, REPEAT_RATE, 0);
372 memset(&new[0], 0, 8);
373 memset(&old[0], 0, 8);
375 pipe = usb_rcvintpipe(dev, ep->bEndpointAddress);
376 maxp = usb_maxpacket(dev, pipe);
377 dev->irq_handle=usb_kbd_irq;
378 USB_KBD_PRINTF("USB KBD enable interrupt pipe...\n");
379 usb_submit_int_msg(dev,pipe,&new[0], maxp > 8 ? 8 : maxp,ep->bInterval);
385 struct usb_hid_descriptor {
386 unsigned char bLength;
387 unsigned char bDescriptorType; /* 0x21 for HID */
388 unsigned short bcdHID; /* release number */
389 unsigned char bCountryCode;
390 unsigned char bNumDescriptors;
391 unsigned char bReportDescriptorType;
392 unsigned short wDescriptorLength;
393 } __attribute__ ((packed));
396 * We parse each description item into this structure. Short items data
397 * values are expanded to 32-bit signed int, long items contain a pointer
398 * into the data area.
402 unsigned char format;
413 unsigned char *longdata;
418 * HID report item format
421 #define HID_ITEM_FORMAT_SHORT 0
422 #define HID_ITEM_FORMAT_LONG 1
425 * Special tag indicating long items
428 #define HID_ITEM_TAG_LONG 15
431 static struct usb_hid_descriptor usb_kbd_hid_desc;
433 void usb_kbd_display_hid(struct usb_hid_descriptor *hid)
435 printf("USB_HID_DESC:\n");
436 printf(" bLenght 0x%x\n",hid->bLength);
437 printf(" bcdHID 0x%x\n",hid->bcdHID);
438 printf(" bCountryCode %d\n",hid->bCountryCode);
439 printf(" bNumDescriptors 0x%x\n",hid->bNumDescriptors);
440 printf(" bReportDescriptorType 0x%x\n",hid->bReportDescriptorType);
441 printf(" wDescriptorLength 0x%x\n",hid->wDescriptorLength);
446 * Fetch a report description item from the data stream. We support long
447 * items, though they are not used yet.
450 static int fetch_item(unsigned char *start,unsigned char *end, struct hid_item *item)
452 if((end - start) > 0) {
453 unsigned char b = *start++;
454 item->type = (b >> 2) & 3;
455 item->tag = (b >> 4) & 15;
456 if (item->tag == HID_ITEM_TAG_LONG) {
457 item->format = HID_ITEM_FORMAT_LONG;
458 if ((end - start) >= 2) {
459 item->size = *start++;
460 item->tag = *start++;
461 if ((end - start) >= item->size) {
462 item->data.longdata = start;
468 item->format = HID_ITEM_FORMAT_SHORT;
470 switch (item->size) {
474 if ((end - start) >= 1) {
475 item->data.u8 = *start++;
480 if ((end - start) >= 2) {
481 item->data.u16 = le16_to_cpu((unsigned short *)start);
487 if ((end - start) >= 4) {
488 item->data.u32 = le32_to_cpu((unsigned long *)start);
499 * HID report descriptor item type (prefix bit 2,3)
502 #define HID_ITEM_TYPE_MAIN 0
503 #define HID_ITEM_TYPE_GLOBAL 1
504 #define HID_ITEM_TYPE_LOCAL 2
505 #define HID_ITEM_TYPE_RESERVED 3
507 * HID report descriptor main item tags
510 #define HID_MAIN_ITEM_TAG_INPUT 8
511 #define HID_MAIN_ITEM_TAG_OUTPUT 9
512 #define HID_MAIN_ITEM_TAG_FEATURE 11
513 #define HID_MAIN_ITEM_TAG_BEGIN_COLLECTION 10
514 #define HID_MAIN_ITEM_TAG_END_COLLECTION 12
516 * HID report descriptor main item contents
519 #define HID_MAIN_ITEM_CONSTANT 0x001
520 #define HID_MAIN_ITEM_VARIABLE 0x002
521 #define HID_MAIN_ITEM_RELATIVE 0x004
522 #define HID_MAIN_ITEM_WRAP 0x008
523 #define HID_MAIN_ITEM_NONLINEAR 0x010
524 #define HID_MAIN_ITEM_NO_PREFERRED 0x020
525 #define HID_MAIN_ITEM_NULL_STATE 0x040
526 #define HID_MAIN_ITEM_VOLATILE 0x080
527 #define HID_MAIN_ITEM_BUFFERED_BYTE 0x100
530 * HID report descriptor collection item types
533 #define HID_COLLECTION_PHYSICAL 0
534 #define HID_COLLECTION_APPLICATION 1
535 #define HID_COLLECTION_LOGICAL 2
537 * HID report descriptor global item tags
540 #define HID_GLOBAL_ITEM_TAG_USAGE_PAGE 0
541 #define HID_GLOBAL_ITEM_TAG_LOGICAL_MINIMUM 1
542 #define HID_GLOBAL_ITEM_TAG_LOGICAL_MAXIMUM 2
543 #define HID_GLOBAL_ITEM_TAG_PHYSICAL_MINIMUM 3
544 #define HID_GLOBAL_ITEM_TAG_PHYSICAL_MAXIMUM 4
545 #define HID_GLOBAL_ITEM_TAG_UNIT_EXPONENT 5
546 #define HID_GLOBAL_ITEM_TAG_UNIT 6
547 #define HID_GLOBAL_ITEM_TAG_REPORT_SIZE 7
548 #define HID_GLOBAL_ITEM_TAG_REPORT_ID 8
549 #define HID_GLOBAL_ITEM_TAG_REPORT_COUNT 9
550 #define HID_GLOBAL_ITEM_TAG_PUSH 10
551 #define HID_GLOBAL_ITEM_TAG_POP 11
554 * HID report descriptor local item tags
557 #define HID_LOCAL_ITEM_TAG_USAGE 0
558 #define HID_LOCAL_ITEM_TAG_USAGE_MINIMUM 1
559 #define HID_LOCAL_ITEM_TAG_USAGE_MAXIMUM 2
560 #define HID_LOCAL_ITEM_TAG_DESIGNATOR_INDEX 3
561 #define HID_LOCAL_ITEM_TAG_DESIGNATOR_MINIMUM 4
562 #define HID_LOCAL_ITEM_TAG_DESIGNATOR_MAXIMUM 5
563 #define HID_LOCAL_ITEM_TAG_STRING_INDEX 7
564 #define HID_LOCAL_ITEM_TAG_STRING_MINIMUM 8
565 #define HID_LOCAL_ITEM_TAG_STRING_MAXIMUM 9
566 #define HID_LOCAL_ITEM_TAG_DELIMITER 10
569 static void usb_kbd_show_item(struct hid_item *item)
572 case HID_ITEM_TYPE_MAIN:
574 case HID_MAIN_ITEM_TAG_INPUT:
575 printf("Main Input");
577 case HID_MAIN_ITEM_TAG_OUTPUT:
578 printf("Main Output");
580 case HID_MAIN_ITEM_TAG_FEATURE:
581 printf("Main Feature");
583 case HID_MAIN_ITEM_TAG_BEGIN_COLLECTION:
584 printf("Main Begin Collection");
586 case HID_MAIN_ITEM_TAG_END_COLLECTION:
587 printf("Main End Collection");
590 printf("Main reserved %d",item->tag);
594 case HID_ITEM_TYPE_GLOBAL:
596 case HID_GLOBAL_ITEM_TAG_USAGE_PAGE:
597 printf("- Global Usage Page");
599 case HID_GLOBAL_ITEM_TAG_LOGICAL_MINIMUM:
600 printf("- Global Logical Minimum");
602 case HID_GLOBAL_ITEM_TAG_LOGICAL_MAXIMUM:
603 printf("- Global Logical Maximum");
605 case HID_GLOBAL_ITEM_TAG_PHYSICAL_MINIMUM:
606 printf("- Global physical Minimum");
608 case HID_GLOBAL_ITEM_TAG_PHYSICAL_MAXIMUM:
609 printf("- Global physical Maximum");
611 case HID_GLOBAL_ITEM_TAG_UNIT_EXPONENT:
612 printf("- Global Unit Exponent");
614 case HID_GLOBAL_ITEM_TAG_UNIT:
615 printf("- Global Unit");
617 case HID_GLOBAL_ITEM_TAG_REPORT_SIZE:
618 printf("- Global Report Size");
620 case HID_GLOBAL_ITEM_TAG_REPORT_ID:
621 printf("- Global Report ID");
623 case HID_GLOBAL_ITEM_TAG_REPORT_COUNT:
624 printf("- Global Report Count");
626 case HID_GLOBAL_ITEM_TAG_PUSH:
627 printf("- Global Push");
629 case HID_GLOBAL_ITEM_TAG_POP:
630 printf("- Global Pop");
633 printf("- Global reserved %d",item->tag);
637 case HID_ITEM_TYPE_LOCAL:
639 case HID_LOCAL_ITEM_TAG_USAGE:
640 printf("-- Local Usage");
642 case HID_LOCAL_ITEM_TAG_USAGE_MINIMUM:
643 printf("-- Local Usage Minimum");
645 case HID_LOCAL_ITEM_TAG_USAGE_MAXIMUM:
646 printf("-- Local Usage Maximum");
648 case HID_LOCAL_ITEM_TAG_DESIGNATOR_INDEX:
649 printf("-- Local Designator Index");
651 case HID_LOCAL_ITEM_TAG_DESIGNATOR_MINIMUM:
652 printf("-- Local Designator Minimum");
654 case HID_LOCAL_ITEM_TAG_DESIGNATOR_MAXIMUM:
655 printf("-- Local Designator Maximum");
657 case HID_LOCAL_ITEM_TAG_STRING_INDEX:
658 printf("-- Local String Index");
660 case HID_LOCAL_ITEM_TAG_STRING_MINIMUM:
661 printf("-- Local String Minimum");
663 case HID_LOCAL_ITEM_TAG_STRING_MAXIMUM:
664 printf("-- Local String Maximum");
666 case HID_LOCAL_ITEM_TAG_DELIMITER:
667 printf("-- Local Delimiter");
670 printf("-- Local reserved %d",item->tag);
675 printf("--- reserved %d",item->type);
680 printf(" %d",item->data.u8);
683 printf(" %d",item->data.u16);
686 printf(" %ld",item->data.u32);
693 static int usb_kbd_get_hid_desc(struct usb_device *dev)
695 unsigned char buffer[256];
696 struct usb_descriptor_header *head;
697 struct usb_config_descriptor *config;
699 unsigned char *start, *end;
700 struct hid_item item;
702 if(usb_get_configuration_no(dev,&buffer[0],0)==-1)
704 head =(struct usb_descriptor_header *)&buffer[0];
705 if(head->bDescriptorType!=USB_DT_CONFIG) {
706 printf(" ERROR: NOT USB_CONFIG_DESC %x\n",head->bDescriptorType);
710 config=(struct usb_config_descriptor *)&buffer[0];
711 len=le16_to_cpu(config->wTotalLength);
712 /* Ok the first entry must be a configuration entry, now process the others */
713 head=(struct usb_descriptor_header *)&buffer[index];
714 while(index+1 < len) {
715 if(head->bDescriptorType==USB_DT_HID) {
716 printf("HID desc found\n");
717 memcpy(&usb_kbd_hid_desc,&buffer[index],buffer[index]);
718 le16_to_cpus(&usb_kbd_hid_desc.bcdHID);
719 le16_to_cpus(&usb_kbd_hid_desc.wDescriptorLength);
720 usb_kbd_display_hid(&usb_kbd_hid_desc);
724 index+=head->bLength;
725 head=(struct usb_descriptor_header *)&buffer[index];
729 len=usb_kbd_hid_desc.wDescriptorLength;
730 if((index = usb_get_class_descriptor(dev, 0, USB_DT_REPORT, 0, &buffer[0], len)) < 0) {
731 printf("reading report descriptor failed\n");
734 printf(" report descriptor (size %u, read %d)\n", len, index);
739 index=fetch_item(start,end,&item);
743 usb_kbd_show_item(&item);