1 /* Teensyduino Core Library
2 * http://www.pjrc.com/teensy/
3 * Copyright (c) 2013 PJRC.COM, LLC.
4 * Modifications by Jacob Alexander (2013-2014)
6 * Permission is hereby granted, free of charge, to any person obtaining
7 * a copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sublicense, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * 1. The above copyright notice and this permission notice shall be
15 * included in all copies or substantial portions of the Software.
17 * 2. If the Software is incorporated into a build system that allows
18 * selection among a list of target devices, then similar target
19 * devices manufactured by PJRC.COM must be included in the list of
20 * target devices and selectable in the same manner.
22 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
26 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
27 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
28 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
32 // ----- Includes -----
35 #include <Lib/OutputLib.h>
44 // ----- Defines -----
47 // XXX - Only use when using usbMuxUart Module
48 // Delay causes issues initializing more than 1 hid device (i.e. NKRO keyboard)
49 //#define UART_DEBUG 1
50 // Debug Unknown USB requests, usually what you want to debug USB issues
51 //#define UART_DEBUG_UNKNOWN 1
54 #define TX_STATE_BOTH_FREE_EVEN_FIRST 0
55 #define TX_STATE_BOTH_FREE_ODD_FIRST 1
56 #define TX_STATE_EVEN_FREE 2
57 #define TX_STATE_ODD_FREE 3
58 #define TX_STATE_NONE_FREE_EVEN_FIRST 4
59 #define TX_STATE_NONE_FREE_ODD_FIRST 5
62 #define BDT_DATA1 0x40
63 #define BDT_DATA0 0x00
65 #define BDT_STALL 0x04
76 #define CLEAR_FEATURE 1
79 #define GET_DESCRIPTOR 6
80 #define SET_DESCRIPTOR 7
81 #define GET_CONFIGURATION 8
82 #define SET_CONFIGURATION 9
83 #define GET_INTERFACE 10
84 #define SET_INTERFACE 11
85 #define SYNCH_FRAME 12
87 #define TX_STATE_BOTH_FREE_EVEN_FIRST 0
88 #define TX_STATE_BOTH_FREE_ODD_FIRST 1
89 #define TX_STATE_EVEN_FREE 2
90 #define TX_STATE_ODD_FREE 3
91 #define TX_STATE_NONE_FREE 4
99 #define BDT_PID(n) (((n) >> 2) & 15)
101 #define BDT_DESC(count, data) (BDT_OWN | BDT_DTS \
102 | ((data) ? BDT_DATA1 : BDT_DATA0) \
105 #define index(endpoint, tx, odd) (((endpoint) << 2) | ((tx) << 1) | (odd))
106 #define stat2bufferdescriptor(stat) (table + ((stat) >> 2))
110 // ----- Structs -----
112 // buffer descriptor table
123 uint8_t bmRequestType;
126 uint16_t wRequestAndType;
140 // ----- Variables -----
142 __attribute__ ((section(".usbdescriptortable"), used))
143 static bdt_t table[ (NUM_ENDPOINTS + 1) * 4 ];
145 static usb_packet_t *rx_first [ NUM_ENDPOINTS ];
146 static usb_packet_t *rx_last [ NUM_ENDPOINTS ];
147 static usb_packet_t *tx_first [ NUM_ENDPOINTS ];
148 static usb_packet_t *tx_last [ NUM_ENDPOINTS ];
149 uint16_t usb_rx_byte_count_data[ NUM_ENDPOINTS ];
151 static uint8_t tx_state[NUM_ENDPOINTS];
153 // SETUP always uses a DATA0 PID for the data field of the SETUP transaction.
154 // transactions in the data phase start with DATA1 and toggle (figure 8-12, USB1.1)
155 // Status stage uses a DATA1 PID.
157 static uint8_t ep0_rx0_buf[EP0_SIZE] __attribute__ ((aligned (4)));
158 static uint8_t ep0_rx1_buf[EP0_SIZE] __attribute__ ((aligned (4)));
159 static const uint8_t *ep0_tx_ptr = NULL;
160 static uint16_t ep0_tx_len;
161 static uint8_t ep0_tx_bdt_bank = 0;
162 static uint8_t ep0_tx_data_toggle = 0;
163 uint8_t usb_rx_memory_needed = 0;
165 volatile uint8_t usb_configuration = 0;
166 volatile uint8_t usb_reboot_timer = 0;
168 static uint8_t reply_buffer[8];
172 // ----- Functions -----
174 static void endpoint0_stall()
176 USB0_ENDPT0 = USB_ENDPT_EPSTALL | USB_ENDPT_EPRXEN | USB_ENDPT_EPTXEN | USB_ENDPT_EPHSHK;
179 static void endpoint0_transmit( const void *data, uint32_t len )
181 table[index(0, TX, ep0_tx_bdt_bank)].addr = (void *)data;
182 table[index(0, TX, ep0_tx_bdt_bank)].desc = BDT_DESC(len, ep0_tx_data_toggle);
183 ep0_tx_data_toggle ^= 1;
184 ep0_tx_bdt_bank ^= 1;
187 static void usb_setup()
189 const uint8_t *data = NULL;
190 uint32_t datalen = 0;
191 const usb_descriptor_list_t *list;
193 volatile uint8_t *reg;
198 switch ( setup.wRequestAndType )
200 case 0x0500: // SET_ADDRESS
202 case 0x0900: // SET_CONFIGURATION
204 print("CONFIGURE - ");
206 usb_configuration = setup.wValue;
208 cfg = usb_endpoint_config_table;
209 // clear all BDT entries, free any allocated memory...
210 for ( i = 4; i < ( NUM_ENDPOINTS + 1) * 4; i++ )
212 if ( table[i].desc & BDT_OWN )
214 usb_free( (usb_packet_t *)((uint8_t *)(table[ i ].addr) - 8) );
217 // free all queued packets
218 for ( i = 0; i < NUM_ENDPOINTS; i++ )
228 rx_first[ i ] = NULL;
237 tx_first[ i ] = NULL;
239 usb_rx_byte_count_data[i] = 0;
241 switch ( tx_state[ i ] )
243 case TX_STATE_EVEN_FREE:
244 case TX_STATE_NONE_FREE_EVEN_FIRST:
245 tx_state[ i ] = TX_STATE_BOTH_FREE_EVEN_FIRST;
247 case TX_STATE_ODD_FREE:
248 case TX_STATE_NONE_FREE_ODD_FIRST:
249 tx_state[ i ] = TX_STATE_BOTH_FREE_ODD_FIRST;
255 usb_rx_memory_needed = 0;
256 for ( i = 1; i <= NUM_ENDPOINTS; i++ )
261 if ( epconf & USB_ENDPT_EPRXEN )
267 table[ index( i, RX, EVEN ) ].addr = p->buf;
268 table[ index( i, RX, EVEN ) ].desc = BDT_DESC( 64, 0 );
272 table[ index( i, RX, EVEN ) ].desc = 0;
273 usb_rx_memory_needed++;
278 table[ index( i, RX, ODD ) ].addr = p->buf;
279 table[ index( i, RX, ODD ) ].desc = BDT_DESC( 64, 1 );
283 table[ index( i, RX, ODD ) ].desc = 0;
284 usb_rx_memory_needed++;
287 table[ index( i, TX, EVEN ) ].desc = 0;
288 table[ index( i, TX, ODD ) ].desc = 0;
291 case 0x0880: // GET_CONFIGURATION
292 reply_buffer[0] = usb_configuration;
296 case 0x0080: // GET_STATUS (device)
302 case 0x0082: // GET_STATUS (endpoint)
303 if ( setup.wIndex > NUM_ENDPOINTS )
305 // TODO: do we need to handle IN vs OUT here?
311 if ( *(uint8_t *)(&USB0_ENDPT0 + setup.wIndex * 4) & 0x02 )
316 case 0x0100: // CLEAR_FEATURE (device)
317 case 0x0101: // CLEAR_FEATURE (interface)
318 // TODO: Currently ignoring, perhaps useful? -HaaTa
321 case 0x0102: // CLEAR_FEATURE (interface)
322 i = setup.wIndex & 0x7F;
323 if ( i > NUM_ENDPOINTS || setup.wValue != 0 )
328 //(*(uint8_t *)(&USB0_ENDPT0 + setup.wIndex * 4)) &= ~0x02;
329 // TODO: do we need to clear the data toggle here?
332 // FIXME: Clearing causes keyboard to freeze, likely an invalid clear
333 // XXX: Ignoring seems to work, though this may not be the ideal behaviour -HaaTa
336 case 0x0300: // SET_FEATURE (device)
337 case 0x0301: // SET_FEATURE (interface)
338 // TODO: Currently ignoring, perhaps useful? -HaaTa
341 case 0x0302: // SET_FEATURE (endpoint)
342 i = setup.wIndex & 0x7F;
343 if ( i > NUM_ENDPOINTS || setup.wValue != 0 )
345 // TODO: do we need to handle IN vs OUT here?
349 (*(uint8_t *)(&USB0_ENDPT0 + setup.wIndex * 4)) |= 0x02;
350 // TODO: do we need to clear the data toggle here?
352 case 0x0680: // GET_DESCRIPTOR
356 printHex( setup.wValue );
359 for ( list = usb_descriptor_list; 1; list++ )
361 if ( list->addr == NULL )
363 if ( setup.wValue == list->wValue && setup.wIndex == list->wIndex )
366 if ( (setup.wValue >> 8) == 3 )
368 // for string descriptors, use the descriptor's
369 // length field, allowing runtime configured
371 datalen = *(list->addr);
375 datalen = list->length;
378 print("Desc found, ");
379 printHex32( (uint32_t)data );
383 printHex_op( data[0], 2 );
384 printHex_op( data[1], 2 );
385 printHex_op( data[2], 2 );
386 printHex_op( data[3], 2 );
387 printHex_op( data[4], 2 );
388 printHex_op( data[5], 2 );
395 print( "desc: not found" NL );
400 case 0x2221: // CDC_SET_CONTROL_LINE_STATE
401 usb_cdc_line_rtsdtr = setup.wValue;
402 //serial_print("set control line state\n");
406 case 0x21A1: // CDC_GET_LINE_CODING
407 data = (uint8_t*)usb_cdc_line_coding;
408 datalen = sizeof( usb_cdc_line_coding );
411 case 0x2021: // CDC_SET_LINE_CODING
413 //serial_print("set coding, waiting...\n");
415 return; // Cannot stall here (causes issues)
417 case 0x0921: // HID SET_REPORT
419 print("SET_REPORT - ");
420 printHex( setup.wValue );
422 printHex( setup.wValue & 0xFF );
425 USBKeys_LEDs = setup.wValue & 0xFF;
429 case 0x01A1: // HID GET_REPORT
431 print("GET_REPORT - ");
432 printHex( USBKeys_LEDs );
435 data = (uint8_t*)&USBKeys_LEDs;
439 case 0x0A21: // HID SET_IDLE
441 print("SET_IDLE - ");
442 printHex( setup.wValue );
445 USBKeys_Idle_Config = (setup.wValue >> 8);
446 USBKeys_Idle_Count = 0;
450 case 0x0B21: // HID SET_PROTOCOL
452 print("SET_PROTOCOL - ");
453 printHex( setup.wValue );
455 printHex( setup.wValue & 0xFF );
458 USBKeys_Protocol = setup.wValue & 0xFF; // 0 - Boot Mode, 1 - NKRO Mode
464 #ifdef UART_DEBUG_UNKNOWN
473 print("setup send ");
474 printHex32((uint32_t)data);
480 if ( datalen > setup.wLength )
481 datalen = setup.wLength;
484 if ( size > EP0_SIZE )
487 endpoint0_transmit(data, size);
491 // See if transmit has finished
492 if ( datalen == 0 && size < EP0_SIZE )
496 if ( size > EP0_SIZE )
498 endpoint0_transmit(data, size);
502 // See if transmit has finished
503 if ( datalen == 0 && size < EP0_SIZE )
506 // Save rest of transfer for later? XXX
508 ep0_tx_len = datalen;
512 //A bulk endpoint's toggle sequence is initialized to DATA0 when the endpoint
513 //experiences any configuration event (configuration events are explained in
514 //Sections 9.1.1.5 and 9.4.5).
516 //Configuring a device or changing an alternate setting causes all of the status
517 //and configuration values associated with endpoints in the affected interfaces
518 //to be set to their default values. This includes setting the data toggle of
519 //any endpoint using data toggles to the value DATA0.
521 //For endpoints using data toggle, regardless of whether an endpoint has the
522 //Halt feature set, a ClearFeature(ENDPOINT_HALT) request always results in the
523 //data toggle being reinitialized to DATA0.
525 static void usb_control( uint32_t stat )
535 b = stat2bufferdescriptor( stat );
536 pid = BDT_PID( b->desc );
548 case 0x0D: // Setup received from host
549 //serial_print("PID=Setup\n");
550 //if (count != 8) ; // panic?
551 // grab the 8 byte setup info
552 setup.word1 = *(uint32_t *)(buf);
553 setup.word2 = *(uint32_t *)(buf + 4);
555 // give the buffer back
556 b->desc = BDT_DESC( EP0_SIZE, DATA1 );
557 //table[index(0, RX, EVEN)].desc = BDT_DESC(EP0_SIZE, 1);
558 //table[index(0, RX, ODD)].desc = BDT_DESC(EP0_SIZE, 1);
560 // clear any leftover pending IN transactions
562 if ( ep0_tx_data_toggle )
565 //if (table[index(0, TX, EVEN)].desc & 0x80) {
566 //serial_print("leftover tx even\n");
568 //if (table[index(0, TX, ODD)].desc & 0x80) {
569 //serial_print("leftover tx odd\n");
571 table[index(0, TX, EVEN)].desc = 0;
572 table[index(0, TX, ODD)].desc = 0;
573 // first IN after Setup is always DATA1
574 ep0_tx_data_toggle = 1;
576 #ifdef UART_DEBUG_UNKNOWN
577 print("bmRequestType:");
578 printHex(setup.bmRequestType);
579 print(", bRequest:");
580 printHex(setup.bRequest);
582 printHex(setup.wValue);
584 printHex(setup.wIndex);
586 printHex(setup.wLength);
589 // actually "do" the setup request
591 // unfreeze the USB, now that we're ready
592 USB0_CTL = USB_CTL_USBENSOFEN; // clear TXSUSPENDTOKENBUSY bit
594 case 0x01: // OUT transaction received from host
600 if ( setup.wRequestAndType == 0x2021 /*CDC_SET_LINE_CODING*/ )
603 uint8_t *dst = (uint8_t *)usb_cdc_line_coding;
604 //serial_print("set line coding ");
605 for ( i = 0; i < 7; i++ )
610 //serial_phex32(usb_cdc_line_coding[0]);
611 //serial_print("\n");
612 if ( usb_cdc_line_coding[0] == 134 )
613 usb_reboot_timer = 15;
614 endpoint0_transmit( NULL, 0 );
617 // Keyboard Interface
618 if ( setup.word1 == 0x02000921 && setup.word2 == ( (1<<16) | KEYBOARD_INTERFACE ) )
620 USBKeys_LEDs = buf[0];
621 endpoint0_transmit( NULL, 0 );
623 // NKRO Keyboard Interface
624 if ( setup.word1 == 0x02000921 && setup.word2 == ( (1<<16) | NKRO_KEYBOARD_INTERFACE ) )
626 USBKeys_LEDs = buf[0];
627 endpoint0_transmit( NULL, 0 );
630 // give the buffer back
631 b->desc = BDT_DESC( EP0_SIZE, DATA1 );
634 case 0x09: // IN transaction completed to host
641 // send remaining data, if any...
646 if (size > EP0_SIZE) size = EP0_SIZE;
647 endpoint0_transmit(data, size);
650 ep0_tx_ptr = (ep0_tx_len > 0 || size == EP0_SIZE) ? data : NULL;
653 if ( setup.bRequest == 5 && setup.bmRequestType == 0 )
657 print("set address: ");
658 printHex(setup.wValue);
661 USB0_ADDR = setup.wValue;
667 print("PID=unknown:");
673 USB0_CTL = USB_CTL_USBENSOFEN; // clear TXSUSPENDTOKENBUSY bit
676 usb_packet_t *usb_rx( uint32_t endpoint )
681 if ( endpoint >= NUM_ENDPOINTS )
684 ret = rx_first[endpoint];
686 rx_first[ endpoint ] = ret->next;
687 usb_rx_byte_count_data[ endpoint ] -= ret->len;
689 //serial_print("rx, epidx=");
690 //serial_phex(endpoint);
691 //serial_print(", packet=");
692 //serial_phex32(ret);
693 //serial_print("\n");
697 static uint32_t usb_queue_byte_count( const usb_packet_t *p )
702 for ( ; p; p = p->next )
710 uint32_t usb_tx_byte_count( uint32_t endpoint )
713 if ( endpoint >= NUM_ENDPOINTS )
715 return usb_queue_byte_count( tx_first[ endpoint ] );
718 uint32_t usb_tx_packet_count( uint32_t endpoint )
720 const usb_packet_t *p;
724 if ( endpoint >= NUM_ENDPOINTS )
727 for ( p = tx_first[ endpoint ]; p; p = p->next )
734 // Called from usb_free, but only when usb_rx_memory_needed > 0, indicating
735 // receive endpoints are starving for memory. The intention is to give
736 // endpoints needing receive memory priority over the user's code, which is
737 // likely calling usb_malloc to obtain memory for transmitting. When the
738 // user is creating data very quickly, their consumption could starve reception
739 // without this prioritization. The packet buffer (input) is assigned to the
740 // first endpoint needing memory.
742 void usb_rx_memory( usb_packet_t *packet )
744 //print("USB RX MEMORY");
748 cfg = usb_endpoint_config_table;
749 //serial_print("rx_mem:");
751 for ( i = 1; i <= NUM_ENDPOINTS; i++ )
753 if ( *cfg++ & USB_ENDPT_EPRXEN )
755 if ( table[ index( i, RX, EVEN ) ].desc == 0 )
757 table[ index( i, RX, EVEN ) ].addr = packet->buf;
758 table[ index( i, RX, EVEN ) ].desc = BDT_DESC( 64, 0 );
759 usb_rx_memory_needed--;
762 //serial_print(",even\n");
765 if ( table[ index( i, RX, ODD ) ].desc == 0 )
767 table[ index( i, RX, ODD ) ].addr = packet->buf;
768 table[ index( i, RX, ODD ) ].desc = BDT_DESC( 64, 1 );
769 usb_rx_memory_needed--;
772 //serial_print(",odd\n");
778 // we should never reach this point. If we get here, it means
779 // usb_rx_memory_needed was set greater than zero, but no memory
780 // was actually needed.
781 usb_rx_memory_needed = 0;
786 //#define index(endpoint, tx, odd) (((endpoint) << 2) | ((tx) << 1) | (odd))
787 //#define stat2bufferdescriptor(stat) (table + ((stat) >> 2))
789 void usb_tx( uint32_t endpoint, usb_packet_t *packet )
791 bdt_t *b = &table[ index( endpoint, TX, EVEN ) ];
795 if ( endpoint >= NUM_ENDPOINTS )
798 //serial_print("txstate=");
799 //serial_phex(tx_state[ endpoint ]);
800 //serial_print("\n");
801 switch ( tx_state[ endpoint ] )
803 case TX_STATE_BOTH_FREE_EVEN_FIRST:
804 next = TX_STATE_ODD_FREE;
806 case TX_STATE_BOTH_FREE_ODD_FIRST:
808 next = TX_STATE_EVEN_FREE;
810 case TX_STATE_EVEN_FREE:
811 next = TX_STATE_NONE_FREE_ODD_FIRST;
813 case TX_STATE_ODD_FREE:
815 next = TX_STATE_NONE_FREE_EVEN_FIRST;
818 if (tx_first[ endpoint ] == NULL)
820 tx_first[ endpoint ] = packet;
824 tx_last[ endpoint ]->next = packet;
826 tx_last[ endpoint ] = packet;
831 tx_state[ endpoint ] = next;
832 b->addr = packet->buf;
833 b->desc = BDT_DESC( packet->len, ((uint32_t)b & 8) ? DATA1 : DATA0 );
838 void usb_device_reload()
841 #if defined(_mk20dx128vlf5_)
843 // MCHCK Kiibohd Variant
844 // Check to see if PTA3 (has a pull-up) is connected to GND (usually via jumper)
845 // Only allow reload if the jumper is present (security)
846 GPIOA_PDDR &= ~(1<<3); // Input
847 PORTA_PCR3 = PORT_PCR_PFE | PORT_PCR_MUX(1); // Internal pull-up
850 if ( GPIOA_PDIR & (1<<3) )
853 warn_print("Security jumper not present, cancelling firmware reload...");
854 info_msg("Replace jumper on middle 2 pins, or manually press the firmware reload button.");
858 // Copies variable into the VBAT register, must be identical to the variable in the bootloader to jump to the bootloader flash mode
859 for ( int pos = 0; pos < sizeof(sys_reset_to_loader_magic); pos++ )
860 (&VBAT)[ pos ] = sys_reset_to_loader_magic[ pos ];
864 // Teensy 3.0 and 3.1
866 asm volatile("bkpt");
873 uint8_t status, stat, t;
875 //serial_print("isr");
876 //status = USB0_ISTAT;
877 //serial_phex(status);
878 //serial_print("\n");
882 print("USB ISR STATUS: ");
887 if ( (status & USB_INTEN_SOFTOKEN /* 04 */ ) )
889 if ( usb_configuration )
891 t = usb_reboot_timer;
894 usb_reboot_timer = --t;
900 t = usb_cdc_transmit_flush_timer;
903 usb_cdc_transmit_flush_timer = --t;
905 usb_serial_flush_callback();
909 USB0_ISTAT = USB_INTEN_SOFTOKEN;
912 if ( (status & USB_ISTAT_TOKDNE /* 08 */ ) )
916 //serial_print("token: ep=");
917 //serial_phex(stat >> 4);
918 //serial_print(stat & 0x08 ? ",tx" : ",rx");
919 //serial_print(stat & 0x04 ? ",odd\n" : ",even\n");
920 endpoint = stat >> 4;
927 bdt_t *b = stat2bufferdescriptor(stat);
928 usb_packet_t *packet = (usb_packet_t *)((uint8_t *)(b->addr) - 8);
931 serial_phex(endpoint);
932 serial_print(", pid:");
933 serial_phex(BDT_PID(b->desc));
934 serial_print(((uint32_t)b & 8) ? ", odd" : ", even");
935 serial_print(", count:");
936 serial_phex(b->desc >> 16);
939 endpoint--; // endpoint is index to zero-based arrays
944 packet = tx_first[ endpoint ];
947 //serial_print("tx packet\n");
948 tx_first[endpoint] = packet->next;
949 b->addr = packet->buf;
950 switch ( tx_state[ endpoint ] )
952 case TX_STATE_BOTH_FREE_EVEN_FIRST:
953 tx_state[ endpoint ] = TX_STATE_ODD_FREE;
955 case TX_STATE_BOTH_FREE_ODD_FIRST:
956 tx_state[ endpoint ] = TX_STATE_EVEN_FREE;
958 case TX_STATE_EVEN_FREE:
959 tx_state[ endpoint ] = TX_STATE_NONE_FREE_ODD_FIRST;
961 case TX_STATE_ODD_FREE:
962 tx_state[ endpoint ] = TX_STATE_NONE_FREE_EVEN_FIRST;
967 b->desc = BDT_DESC( packet->len, ((uint32_t)b & 8) ? DATA1 : DATA0 );
969 //serial_print("tx no packet\n");
970 switch ( tx_state[ endpoint ] )
972 case TX_STATE_BOTH_FREE_EVEN_FIRST:
973 case TX_STATE_BOTH_FREE_ODD_FIRST:
975 case TX_STATE_EVEN_FREE:
976 tx_state[ endpoint ] = TX_STATE_BOTH_FREE_EVEN_FIRST;
978 case TX_STATE_ODD_FREE:
979 tx_state[ endpoint ] = TX_STATE_BOTH_FREE_ODD_FIRST;
982 tx_state[ endpoint ] = ((uint32_t)b & 8)
984 : TX_STATE_EVEN_FREE;
991 packet->len = b->desc >> 16;
992 if ( packet->len > 0 )
996 if ( rx_first[ endpoint ] == NULL )
998 //serial_print("rx 1st, epidx=");
999 //serial_phex(endpoint);
1000 //serial_print(", packet=");
1001 //serial_phex32((uint32_t)packet);
1002 //serial_print("\n");
1003 rx_first[ endpoint ] = packet;
1007 //serial_print("rx Nth, epidx=");
1008 //serial_phex(endpoint);
1009 //serial_print(", packet=");
1010 //serial_phex32((uint32_t)packet);
1011 //serial_print("\n");
1012 rx_last[ endpoint ]->next = packet;
1014 rx_last[ endpoint ] = packet;
1015 usb_rx_byte_count_data[ endpoint ] += packet->len;
1016 // TODO: implement a per-endpoint maximum # of allocated packets
1017 // so a flood of incoming data on 1 endpoint doesn't starve
1018 // the others if the user isn't reading it regularly
1019 packet = usb_malloc();
1022 b->addr = packet->buf;
1023 b->desc = BDT_DESC( 64, ((uint32_t)b & 8) ? DATA1 : DATA0 );
1027 //serial_print("starving ");
1028 //serial_phex(endpoint + 1);
1029 //serial_print(((uint32_t)b & 8) ? ",odd\n" : ",even\n");
1031 usb_rx_memory_needed++;
1036 b->desc = BDT_DESC( 64, ((uint32_t)b & 8) ? DATA1 : DATA0 );
1044 USB0_ISTAT = USB_ISTAT_TOKDNE;
1049 if ( status & USB_ISTAT_USBRST /* 01 */ )
1051 //serial_print("reset\n");
1053 // initialize BDT toggle bits
1054 USB0_CTL = USB_CTL_ODDRST;
1055 ep0_tx_bdt_bank = 0;
1057 // set up buffers to receive Setup and OUT packets
1058 table[index( 0, RX, EVEN ) ].desc = BDT_DESC( EP0_SIZE, 0 );
1059 table[index( 0, RX, EVEN ) ].addr = ep0_rx0_buf;
1060 table[index( 0, RX, ODD ) ].desc = BDT_DESC( EP0_SIZE, 0 );
1061 table[index( 0, RX, ODD ) ].addr = ep0_rx1_buf;
1062 table[index( 0, TX, EVEN ) ].desc = 0;
1063 table[index( 0, TX, ODD ) ].desc = 0;
1065 // activate endpoint 0
1066 USB0_ENDPT0 = USB_ENDPT_EPRXEN | USB_ENDPT_EPTXEN | USB_ENDPT_EPHSHK;
1068 // clear all ending interrupts
1069 USB0_ERRSTAT = 0xFF;
1072 // set the address to zero during enumeration
1075 // enable other interrupts
1077 USB0_INTEN = USB_INTEN_TOKDNEEN |
1078 USB_INTEN_SOFTOKEN |
1081 USB_INTEN_USBRSTEN |
1084 // is this necessary?
1085 USB0_CTL = USB_CTL_USBENSOFEN;
1090 if ( (status & USB_ISTAT_STALL /* 80 */ ) )
1092 //serial_print("stall:\n");
1093 USB0_ENDPT0 = USB_ENDPT_EPRXEN | USB_ENDPT_EPTXEN | USB_ENDPT_EPHSHK;
1094 USB0_ISTAT = USB_ISTAT_STALL;
1096 if ( (status & USB_ISTAT_ERROR /* 02 */ ) )
1098 uint8_t err = USB0_ERRSTAT;
1100 //serial_print("err:");
1102 //serial_print("\n");
1103 USB0_ISTAT = USB_ISTAT_ERROR;
1106 if ( (status & USB_ISTAT_SLEEP /* 10 */ ) )
1108 //serial_print("sleep\n");
1109 USB0_ISTAT = USB_ISTAT_SLEEP;
1118 print("USB INIT"NL);
1121 // If no USB cable is attached, do not initialize usb
1123 //if ( USB0_OTGISTAT & USB_OTGSTAT_ID )
1126 // Clear out endpoints table
1127 for ( int i = 0; i <= NUM_ENDPOINTS * 4; i++ )
1133 // this basically follows the flowchart in the Kinetis
1134 // Quick Reference User Guide, Rev. 1, 03/2012, page 141
1136 // assume 48 MHz clock already running
1137 // SIM - enable clock
1138 SIM_SCGC4 |= SIM_SCGC4_USBOTG;
1141 USB0_USBTRC0 = USB_USBTRC_USBRESET;
1142 while ( (USB0_USBTRC0 & USB_USBTRC_USBRESET) != 0 ); // wait for reset to end
1144 // set desc table base addr
1145 USB0_BDTPAGE1 = ((uint32_t)table) >> 8;
1146 USB0_BDTPAGE2 = ((uint32_t)table) >> 16;
1147 USB0_BDTPAGE3 = ((uint32_t)table) >> 24;
1149 // clear all ISR flags
1151 USB0_ERRSTAT = 0xFF;
1152 USB0_OTGISTAT = 0xFF;
1154 USB0_USBTRC0 |= 0x40; // undocumented bit
1157 USB0_CTL = USB_CTL_USBENSOFEN;
1160 // enable reset interrupt
1161 USB0_INTEN = USB_INTEN_USBRSTEN;
1163 // enable interrupt in NVIC...
1164 NVIC_SET_PRIORITY( IRQ_USBOTG, 112 );
1165 NVIC_ENABLE_IRQ( IRQ_USBOTG );
1168 USB0_CONTROL = USB_CONTROL_DPPULLUPNONOTG;
1173 // return 0 if the USB is not configured, or the configuration
1174 // number selected by the HOST
1175 uint8_t usb_configured()
1177 return usb_configuration;