3 * Denis Peter, MPL AG Switzerland
5 * Part of this source has been derived from the Linux USB
8 * SPDX-License-Identifier: GPL-2.0+
14 #include <stdio_dev.h>
15 #include <asm/byteorder.h>
20 * If overwrite_console returns 1, the stdin, stderr and stdout
21 * are switched to the serial port, else the settings in the
22 * environment are used
24 #ifdef CONFIG_SYS_CONSOLE_OVERWRITE_ROUTINE
25 extern int overwrite_console(void);
27 int overwrite_console(void)
33 /* Keyboard sampling rate */
34 #define REPEAT_RATE (40 / 4) /* 40msec -> 25cps */
35 #define REPEAT_DELAY 10 /* 10 x REPEAT_RATE = 400msec */
38 #define CAPS_LOCK 0x39
39 #define SCROLL_LOCK 0x47
42 #define LEFT_CNTR (1 << 0)
43 #define LEFT_SHIFT (1 << 1)
44 #define LEFT_ALT (1 << 2)
45 #define LEFT_GUI (1 << 3)
46 #define RIGHT_CNTR (1 << 4)
47 #define RIGHT_SHIFT (1 << 5)
48 #define RIGHT_ALT (1 << 6)
49 #define RIGHT_GUI (1 << 7)
51 /* Size of the keyboard buffer */
52 #define USB_KBD_BUFFER_LEN 0x20
55 #define DEVNAME "usbkbd"
58 static const unsigned char usb_kbd_numkey
[] = {
59 '1', '2', '3', '4', '5', '6', '7', '8', '9', '0',
60 '\r', 0x1b, '\b', '\t', ' ', '-', '=', '[', ']',
61 '\\', '#', ';', '\'', '`', ',', '.', '/'
63 static const unsigned char usb_kbd_numkey_shifted
[] = {
64 '!', '@', '#', '$', '%', '^', '&', '*', '(', ')',
65 '\r', 0x1b, '\b', '\t', ' ', '_', '+', '{', '}',
66 '|', '~', ':', '"', '~', '<', '>', '?'
69 static const unsigned char usb_kbd_num_keypad
[] = {
70 '/', '*', '-', '+', '\r',
71 '1', '2', '3', '4', '5', '6', '7', '8', '9', '0',
76 * map arrow keys to ^F/^B ^N/^P, can't really use the proper
77 * ANSI sequence for arrow keys because the queuing code breaks
78 * when a single keypress expands to 3 queue elements
80 static const unsigned char usb_kbd_arrow
[] = {
85 * NOTE: It's important for the NUM, CAPS, SCROLL-lock bits to be in this
86 * order. See usb_kbd_setled() function!
88 #define USB_KBD_NUMLOCK (1 << 0)
89 #define USB_KBD_CAPSLOCK (1 << 1)
90 #define USB_KBD_SCROLLLOCK (1 << 2)
91 #define USB_KBD_CTRL (1 << 3)
93 #define USB_KBD_LEDMASK \
94 (USB_KBD_NUMLOCK | USB_KBD_CAPSLOCK | USB_KBD_SCROLLLOCK)
97 * USB Keyboard reports are 8 bytes in boot protocol.
98 * Appendix B of HID Device Class Definition 1.11
100 #define USB_KBD_BOOT_REPORT_SIZE 8
102 struct usb_kbd_pdata
{
103 unsigned long intpipe
;
106 struct int_queue
*intq
;
108 uint32_t repeat_delay
;
110 uint32_t usb_in_pointer
;
111 uint32_t usb_out_pointer
;
112 uint8_t usb_kbd_buffer
[USB_KBD_BUFFER_LEN
];
115 uint8_t old
[USB_KBD_BOOT_REPORT_SIZE
];
120 extern int __maybe_unused net_busy_flag
;
122 /* The period of time between two calls of usb_kbd_testc(). */
123 static unsigned long __maybe_unused kbd_testc_tms
;
125 /* Puts character in the queue and sets up the in and out pointer. */
126 static void usb_kbd_put_queue(struct usb_kbd_pdata
*data
, char c
)
128 if (data
->usb_in_pointer
== USB_KBD_BUFFER_LEN
- 1) {
129 /* Check for buffer full. */
130 if (data
->usb_out_pointer
== 0)
133 data
->usb_in_pointer
= 0;
135 /* Check for buffer full. */
136 if (data
->usb_in_pointer
== data
->usb_out_pointer
- 1)
139 data
->usb_in_pointer
++;
142 data
->usb_kbd_buffer
[data
->usb_in_pointer
] = c
;
146 * Set the LEDs. Since this is used in the irq routine, the control job is
147 * issued with a timeout of 0. This means, that the job is queued without
148 * waiting for job completion.
150 static void usb_kbd_setled(struct usb_device
*dev
)
152 struct usb_interface
*iface
= &dev
->config
.if_desc
[0];
153 struct usb_kbd_pdata
*data
= dev
->privptr
;
154 ALLOC_ALIGN_BUFFER(uint32_t, leds
, 1, USB_DMA_MINALIGN
);
156 *leds
= data
->flags
& USB_KBD_LEDMASK
;
157 usb_control_msg(dev
, usb_sndctrlpipe(dev
, 0),
158 USB_REQ_SET_REPORT
, USB_TYPE_CLASS
| USB_RECIP_INTERFACE
,
159 0x200, iface
->desc
.bInterfaceNumber
, leds
, 1, 0);
162 #define CAPITAL_MASK 0x20
163 /* Translate the scancode in ASCII */
164 static int usb_kbd_translate(struct usb_kbd_pdata
*data
, unsigned char scancode
,
165 unsigned char modifier
, int pressed
)
171 data
->repeat_delay
= 0;
176 data
->repeat_delay
++;
177 if (data
->repeat_delay
< REPEAT_DELAY
)
180 data
->repeat_delay
= REPEAT_DELAY
;
183 /* Alphanumeric values */
184 if ((scancode
> 3) && (scancode
<= 0x1d)) {
185 keycode
= scancode
- 4 + 'a';
187 if (data
->flags
& USB_KBD_CAPSLOCK
)
188 keycode
&= ~CAPITAL_MASK
;
190 if (modifier
& (LEFT_SHIFT
| RIGHT_SHIFT
)) {
191 /* Handle CAPSLock + Shift pressed simultaneously */
192 if (keycode
& CAPITAL_MASK
)
193 keycode
&= ~CAPITAL_MASK
;
195 keycode
|= CAPITAL_MASK
;
199 if ((scancode
> 0x1d) && (scancode
< 0x3a)) {
201 if (modifier
& (LEFT_SHIFT
| RIGHT_SHIFT
))
202 keycode
= usb_kbd_numkey_shifted
[scancode
- 0x1e];
204 keycode
= usb_kbd_numkey
[scancode
- 0x1e];
208 if ((scancode
>= 0x4f) && (scancode
<= 0x52))
209 keycode
= usb_kbd_arrow
[scancode
- 0x4f];
212 if ((scancode
>= 0x54) && (scancode
<= 0x67))
213 keycode
= usb_kbd_num_keypad
[scancode
- 0x54];
215 if (data
->flags
& USB_KBD_CTRL
)
216 keycode
= scancode
- 0x3;
219 if (scancode
== NUM_LOCK
) {
220 data
->flags
^= USB_KBD_NUMLOCK
;
224 if (scancode
== CAPS_LOCK
) {
225 data
->flags
^= USB_KBD_CAPSLOCK
;
228 if (scancode
== SCROLL_LOCK
) {
229 data
->flags
^= USB_KBD_SCROLLLOCK
;
234 /* Report keycode if any */
236 debug("%c", keycode
);
237 usb_kbd_put_queue(data
, keycode
);
243 static uint32_t usb_kbd_service_key(struct usb_device
*dev
, int i
, int up
)
246 struct usb_kbd_pdata
*data
= dev
->privptr
;
259 (memscan(new + 2, old
[i
], USB_KBD_BOOT_REPORT_SIZE
- 2) ==
260 new + USB_KBD_BOOT_REPORT_SIZE
)) {
261 res
|= usb_kbd_translate(data
, old
[i
], data
->new[0], up
);
267 /* Interrupt service routine */
268 static int usb_kbd_irq_worker(struct usb_device
*dev
)
270 struct usb_kbd_pdata
*data
= dev
->privptr
;
273 /* No combo key pressed */
274 if (data
->new[0] == 0x00)
275 data
->flags
&= ~USB_KBD_CTRL
;
276 /* Left or Right Ctrl pressed */
277 else if ((data
->new[0] == LEFT_CNTR
) || (data
->new[0] == RIGHT_CNTR
))
278 data
->flags
|= USB_KBD_CTRL
;
280 for (i
= 2; i
< USB_KBD_BOOT_REPORT_SIZE
; i
++) {
281 res
|= usb_kbd_service_key(dev
, i
, 0);
282 res
|= usb_kbd_service_key(dev
, i
, 1);
285 /* Key is still pressed */
286 if ((data
->new[2] > 3) && (data
->old
[2] == data
->new[2]))
287 res
|= usb_kbd_translate(data
, data
->new[2], data
->new[0], 2);
292 memcpy(data
->old
, data
->new, USB_KBD_BOOT_REPORT_SIZE
);
297 /* Keyboard interrupt handler */
298 static int usb_kbd_irq(struct usb_device
*dev
)
300 if ((dev
->irq_status
!= 0) ||
301 (dev
->irq_act_len
!= USB_KBD_BOOT_REPORT_SIZE
)) {
302 debug("USB KBD: Error %lX, len %d\n",
303 dev
->irq_status
, dev
->irq_act_len
);
307 return usb_kbd_irq_worker(dev
);
310 /* Interrupt polling */
311 static inline void usb_kbd_poll_for_event(struct usb_device
*dev
)
313 #if defined(CONFIG_SYS_USB_EVENT_POLL)
314 struct usb_kbd_pdata
*data
= dev
->privptr
;
316 /* Submit a interrupt transfer request */
317 usb_submit_int_msg(dev
, data
->intpipe
, &data
->new[0], data
->intpktsize
,
320 usb_kbd_irq_worker(dev
);
321 #elif defined(CONFIG_SYS_USB_EVENT_POLL_VIA_CONTROL_EP)
322 struct usb_interface
*iface
;
323 struct usb_kbd_pdata
*data
= dev
->privptr
;
324 iface
= &dev
->config
.if_desc
[0];
325 usb_get_report(dev
, iface
->desc
.bInterfaceNumber
,
326 1, 0, data
->new, USB_KBD_BOOT_REPORT_SIZE
);
327 if (memcmp(data
->old
, data
->new, USB_KBD_BOOT_REPORT_SIZE
))
328 usb_kbd_irq_worker(dev
);
329 #elif defined(CONFIG_SYS_USB_EVENT_POLL_VIA_INT_QUEUE)
330 struct usb_kbd_pdata
*data
= dev
->privptr
;
331 if (poll_int_queue(dev
, data
->intq
)) {
332 usb_kbd_irq_worker(dev
);
333 /* We've consumed all queued int packets, create new */
334 destroy_int_queue(dev
, data
->intq
);
335 data
->intq
= create_int_queue(dev
, data
->intpipe
, 1,
336 USB_KBD_BOOT_REPORT_SIZE
, data
->new,
342 /* test if a character is in the queue */
343 static int usb_kbd_testc(struct stdio_dev
*sdev
)
345 struct stdio_dev
*dev
;
346 struct usb_device
*usb_kbd_dev
;
347 struct usb_kbd_pdata
*data
;
349 #ifdef CONFIG_CMD_NET
351 * If net_busy_flag is 1, NET transfer is running,
352 * then we check key-pressed every second (first check may be
353 * less than 1 second) to improve TFTP booting performance.
355 if (net_busy_flag
&& (get_timer(kbd_testc_tms
) < CONFIG_SYS_HZ
))
357 kbd_testc_tms
= get_timer(0);
359 dev
= stdio_get_by_name(DEVNAME
);
360 usb_kbd_dev
= (struct usb_device
*)dev
->priv
;
361 data
= usb_kbd_dev
->privptr
;
363 usb_kbd_poll_for_event(usb_kbd_dev
);
365 return !(data
->usb_in_pointer
== data
->usb_out_pointer
);
368 /* gets the character from the queue */
369 static int usb_kbd_getc(struct stdio_dev
*sdev
)
371 struct stdio_dev
*dev
;
372 struct usb_device
*usb_kbd_dev
;
373 struct usb_kbd_pdata
*data
;
375 dev
= stdio_get_by_name(DEVNAME
);
376 usb_kbd_dev
= (struct usb_device
*)dev
->priv
;
377 data
= usb_kbd_dev
->privptr
;
379 while (data
->usb_in_pointer
== data
->usb_out_pointer
)
380 usb_kbd_poll_for_event(usb_kbd_dev
);
382 if (data
->usb_out_pointer
== USB_KBD_BUFFER_LEN
- 1)
383 data
->usb_out_pointer
= 0;
385 data
->usb_out_pointer
++;
387 return data
->usb_kbd_buffer
[data
->usb_out_pointer
];
390 /* probes the USB device dev for keyboard type. */
391 static int usb_kbd_probe(struct usb_device
*dev
, unsigned int ifnum
)
393 struct usb_interface
*iface
;
394 struct usb_endpoint_descriptor
*ep
;
395 struct usb_kbd_pdata
*data
;
397 if (dev
->descriptor
.bNumConfigurations
!= 1)
400 iface
= &dev
->config
.if_desc
[ifnum
];
402 if (iface
->desc
.bInterfaceClass
!= 3)
405 if (iface
->desc
.bInterfaceSubClass
!= 1)
408 if (iface
->desc
.bInterfaceProtocol
!= 1)
411 if (iface
->desc
.bNumEndpoints
!= 1)
414 ep
= &iface
->ep_desc
[0];
416 /* Check if endpoint 1 is interrupt endpoint */
417 if (!(ep
->bEndpointAddress
& 0x80))
420 if ((ep
->bmAttributes
& 3) != 3)
423 debug("USB KBD: found set protocol...\n");
425 data
= malloc(sizeof(struct usb_kbd_pdata
));
427 printf("USB KBD: Error allocating private data\n");
431 /* Clear private data */
432 memset(data
, 0, sizeof(struct usb_kbd_pdata
));
434 /* allocate input buffer aligned and sized to USB DMA alignment */
435 data
->new = memalign(USB_DMA_MINALIGN
,
436 roundup(USB_KBD_BOOT_REPORT_SIZE
, USB_DMA_MINALIGN
));
438 /* Insert private data into USB device structure */
441 /* Set IRQ handler */
442 dev
->irq_handle
= usb_kbd_irq
;
444 data
->intpipe
= usb_rcvintpipe(dev
, ep
->bEndpointAddress
);
445 data
->intpktsize
= min(usb_maxpacket(dev
, data
->intpipe
),
446 USB_KBD_BOOT_REPORT_SIZE
);
447 data
->intinterval
= ep
->bInterval
;
449 /* We found a USB Keyboard, install it. */
450 usb_set_protocol(dev
, iface
->desc
.bInterfaceNumber
, 0);
452 debug("USB KBD: found set idle...\n");
453 usb_set_idle(dev
, iface
->desc
.bInterfaceNumber
, REPEAT_RATE
, 0);
455 debug("USB KBD: enable interrupt pipe...\n");
456 #ifdef CONFIG_SYS_USB_EVENT_POLL_VIA_INT_QUEUE
457 data
->intq
= create_int_queue(dev
, data
->intpipe
, 1,
458 USB_KBD_BOOT_REPORT_SIZE
, data
->new,
462 if (usb_submit_int_msg(dev
, data
->intpipe
, data
->new, data
->intpktsize
,
463 data
->intinterval
) < 0) {
465 printf("Failed to get keyboard state from device %04x:%04x\n",
466 dev
->descriptor
.idVendor
, dev
->descriptor
.idProduct
);
467 /* Abort, we don't want to use that non-functional keyboard. */
475 static int probe_usb_keyboard(struct usb_device
*dev
)
478 struct stdio_dev usb_kbd_dev
;
481 /* Try probing the keyboard */
482 if (usb_kbd_probe(dev
, 0) != 1)
485 /* Register the keyboard */
486 debug("USB KBD: register.\n");
487 memset(&usb_kbd_dev
, 0, sizeof(struct stdio_dev
));
488 strcpy(usb_kbd_dev
.name
, DEVNAME
);
489 usb_kbd_dev
.flags
= DEV_FLAGS_INPUT
| DEV_FLAGS_SYSTEM
;
490 usb_kbd_dev
.getc
= usb_kbd_getc
;
491 usb_kbd_dev
.tstc
= usb_kbd_testc
;
492 usb_kbd_dev
.priv
= (void *)dev
;
493 error
= stdio_register(&usb_kbd_dev
);
497 stdinname
= getenv("stdin");
498 #ifdef CONFIG_CONSOLE_MUX
499 error
= iomux_doenv(stdin
, stdinname
);
503 /* Check if this is the standard input device. */
504 if (strcmp(stdinname
, DEVNAME
))
507 /* Reassign the console */
508 if (overwrite_console())
511 error
= console_assign(stdin
, DEVNAME
);
519 /* Search for keyboard and register it if found. */
520 int drv_usb_kbd_init(void)
524 debug("%s: Probing for keyboard\n", __func__
);
527 * TODO: We should add USB_DEVICE() declarations to each USB ethernet
528 * driver and then most of this file can be removed.
534 ret
= uclass_get(UCLASS_USB
, &uc
);
537 uclass_foreach_dev(bus
, uc
) {
538 for (i
= 0; i
< USB_MAX_DEVICE
; i
++) {
539 struct usb_device
*dev
;
541 dev
= usb_get_dev_index(bus
, i
); /* get device */
542 debug("i=%d, %p\n", i
, dev
);
544 break; /* no more devices available */
546 error
= probe_usb_keyboard(dev
);
549 if (error
&& error
!= -ENOENT
)
554 /* Scan all USB Devices */
555 for (i
= 0; i
< USB_MAX_DEVICE
; i
++) {
556 struct usb_device
*dev
;
558 /* Get USB device. */
559 dev
= usb_get_dev_index(i
);
563 if (dev
->devnum
== -1)
566 error
= probe_usb_keyboard(dev
);
569 if (error
&& error
!= -ENOENT
)
574 /* No USB Keyboard found */
578 /* Deregister the keyboard. */
579 int usb_kbd_deregister(int force
)
581 #ifdef CONFIG_SYS_STDIO_DEREGISTER
582 struct stdio_dev
*dev
;
583 struct usb_device
*usb_kbd_dev
;
584 struct usb_kbd_pdata
*data
;
586 dev
= stdio_get_by_name(DEVNAME
);
588 usb_kbd_dev
= (struct usb_device
*)dev
->priv
;
589 data
= usb_kbd_dev
->privptr
;
590 if (stdio_deregister_dev(dev
, force
) != 0)
592 #ifdef CONFIG_CONSOLE_MUX
593 if (iomux_doenv(stdin
, getenv("stdin")) != 0)
596 #ifdef CONFIG_SYS_USB_EVENT_POLL_VIA_INT_QUEUE
597 destroy_int_queue(usb_kbd_dev
, data
->intq
);