3      Copyright (C) Dean Camera, 2011. 
   5   dean [at] fourwalledcubicle [dot] com 
  10   Copyright 2011  Dean Camera (dean [at] fourwalledcubicle [dot] com) 
  12   Permission to use, copy, modify, distribute, and sell this 
  13   software and its documentation for any purpose is hereby granted 
  14   without fee, provided that the above copyright notice appear in 
  15   all copies and that both that the copyright notice and this 
  16   permission notice and warranty disclaimer appear in supporting 
  17   documentation, and that the name of the author not be used in 
  18   advertising or publicity pertaining to distribution of the 
  19   software without specific, written prior permission. 
  21   The author disclaim all warranties with regard to this 
  22   software, including all implied warranties of merchantability 
  23   and fitness.  In no event shall the author be liable for any 
  24   special, indirect or consequential damages or any damages 
  25   whatsoever resulting from loss of use, data or profits, whether 
  26   in an action of contract, negligence or other tortious action, 
  27   arising out of or in connection with the use or performance of 
  33  *  Main source file for the StillImageHost demo. This file contains the main tasks of 
  34  *  the demo and is responsible for the initial application hardware configuration. 
  37 #include "StillImageHost.h" 
  39 /** Main program entry point. This routine configures the hardware required by the application, then 
  40  *  enters a loop to run the application tasks in sequence. 
  46         puts_P(PSTR(ESC_FG_CYAN 
"Still Image Host Demo running.\r\n" ESC_FG_WHITE
)); 
  48         LEDs_SetAllLEDs(LEDMASK_USB_NOTREADY
); 
  58 /** Configures the board hardware and chip peripherals for the demo's functionality. */ 
  59 void SetupHardware(void) 
  61         /* Disable watchdog if enabled by bootloader/fuses */ 
  62         MCUSR 
&= ~(1 << WDRF
); 
  65         /* Disable Clock Division */ 
  66         CLKPR 
= (1 << CLKPCE
); 
  69         /* Hardware Initialization */ 
  70         Serial_Init(9600, false); 
  74         /* Create a stdio stream for the serial port for stdin and stdout */ 
  75         Serial_CreateStream(NULL
); 
  78 /** Event handler for the USB_DeviceAttached event. This indicates that a device has been attached to the host, and 
  79  *  starts the library USB task to begin the enumeration and USB management process. 
  81 void EVENT_USB_Host_DeviceAttached(void) 
  83         puts_P(PSTR(ESC_FG_GREEN 
"Device Attached.\r\n" ESC_FG_WHITE
)); 
  84         LEDs_SetAllLEDs(LEDMASK_USB_ENUMERATING
); 
  87 /** Event handler for the USB_DeviceUnattached event. This indicates that a device has been removed from the host, and 
  88  *  stops the library USB task management process. 
  90 void EVENT_USB_Host_DeviceUnattached(void) 
  92         puts_P(PSTR(ESC_FG_GREEN 
"\r\nDevice Unattached.\r\n" ESC_FG_WHITE
)); 
  93         LEDs_SetAllLEDs(LEDMASK_USB_NOTREADY
); 
  96 /** Event handler for the USB_DeviceEnumerationComplete event. This indicates that a device has been successfully 
  97  *  enumerated by the host and is now ready to be used by the application. 
  99 void EVENT_USB_Host_DeviceEnumerationComplete(void) 
 101         LEDs_SetAllLEDs(LEDMASK_USB_READY
); 
 104 /** Event handler for the USB_HostError event. This indicates that a hardware error occurred while in host mode. */ 
 105 void EVENT_USB_Host_HostError(const uint8_t ErrorCode
) 
 109         printf_P(PSTR(ESC_FG_RED 
"Host Mode Error\r\n" 
 110                                  " -- Error Code %d\r\n" ESC_FG_WHITE
), ErrorCode
); 
 112         LEDs_SetAllLEDs(LEDMASK_USB_ERROR
); 
 116 /** Event handler for the USB_DeviceEnumerationFailed event. This indicates that a problem occurred while 
 117  *  enumerating an attached USB device. 
 119 void EVENT_USB_Host_DeviceEnumerationFailed(const uint8_t ErrorCode
, 
 120                                             const uint8_t SubErrorCode
) 
 122         printf_P(PSTR(ESC_FG_RED 
"Dev Enum Error\r\n" 
 123                                  " -- Error Code %d\r\n" 
 124                                  " -- Sub Error Code %d\r\n" 
 125                                  " -- In State %d\r\n" ESC_FG_WHITE
), ErrorCode
, SubErrorCode
, USB_HostState
); 
 127         LEDs_SetAllLEDs(LEDMASK_USB_ERROR
); 
 130 /** Task to set the configuration of the attached device after it has been enumerated, and to print device information 
 131  *  through the serial port. 
 133 void StillImage_Task(void) 
 137         switch (USB_HostState
) 
 139                 case HOST_STATE_Addressed
: 
 140                         puts_P(PSTR("Getting Config Data.\r\n")); 
 142                         /* Get and process the configuration descriptor data */ 
 143                         if ((ErrorCode 
= ProcessConfigurationDescriptor()) != SuccessfulConfigRead
) 
 145                                 if (ErrorCode 
== ControlError
) 
 146                                   puts_P(PSTR(ESC_FG_RED 
"Control Error (Get Configuration).\r\n")); 
 148                                   puts_P(PSTR(ESC_FG_RED 
"Invalid Device.\r\n")); 
 150                                 printf_P(PSTR(" -- Error Code: %d\r\n" ESC_FG_WHITE
), ErrorCode
); 
 152                                 /* Indicate error via status LEDs */ 
 153                                 LEDs_SetAllLEDs(LEDMASK_USB_ERROR
); 
 155                                 /* Wait until USB device disconnected */ 
 156                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 160                         /* Set the device configuration to the first configuration (rarely do devices use multiple configurations) */ 
 161                         if ((ErrorCode 
= USB_Host_SetDeviceConfiguration(1)) != HOST_SENDCONTROL_Successful
) 
 163                                 printf_P(PSTR(ESC_FG_RED 
"Control Error (Set Configuration).\r\n" 
 164                                                          " -- Error Code: %d\r\n" ESC_FG_WHITE
), ErrorCode
); 
 166                                 /* Indicate error via status LEDs */ 
 167                                 LEDs_SetAllLEDs(LEDMASK_USB_ERROR
); 
 169                                 /* Wait until USB device disconnected */ 
 170                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 174                         puts_P(PSTR("Still Image Device Enumerated.\r\n")); 
 175                         USB_HostState 
= HOST_STATE_Configured
; 
 177                 case HOST_STATE_Configured
: 
 178                         /* Indicate device busy via the status LEDs */ 
 179                         LEDs_SetAllLEDs(LEDMASK_USB_BUSY
); 
 181                         puts_P(PSTR("Retrieving Device Info...\r\n")); 
 183                         PIMA_SendBlock 
= (PIMA_Container_t
) 
 185                                         .DataLength    
= PIMA_COMMAND_SIZE(0), 
 186                                         .Type          
= PIMA_CONTAINER_CommandBlock
, 
 187                                         .Code          
= PIMA_OPERATION_GETDEVICEINFO
, 
 188                                         .TransactionID 
= 0x00000000, 
 192                         /* Send the GETDEVICEINFO block */ 
 193                         SImage_SendBlockHeader(); 
 195                         /* Receive the response data block */ 
 196                         if ((ErrorCode 
= SImage_ReceiveBlockHeader()) != PIPE_RWSTREAM_NoError
) 
 198                                 ShowCommandError(ErrorCode
, false); 
 200                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 204                         /* Calculate the size of the returned device info data structure */ 
 205                         uint16_t DeviceInfoSize 
= (PIMA_ReceivedBlock
.DataLength 
- PIMA_COMMAND_SIZE(0)); 
 207                         /* Create a buffer large enough to hold the entire device info */ 
 208                         uint8_t DeviceInfo
[DeviceInfoSize
]; 
 210                         /* Read in the data block data (containing device info) */ 
 211                         SImage_ReadData(DeviceInfo
, DeviceInfoSize
); 
 213                         /* Once all the data has been read, the pipe must be cleared before the response can be sent */ 
 216                         /* Create a pointer for walking through the info dataset */ 
 217                         uint8_t* DeviceInfoPos 
= DeviceInfo
; 
 219                         /* Skip over the data before the unicode device information strings */ 
 220                         DeviceInfoPos 
+=  8;                                          // Skip to VendorExtensionDesc String 
 221                         DeviceInfoPos 
+= (1 + UNICODE_STRING_LENGTH(*DeviceInfoPos
)); // Skip over VendorExtensionDesc String 
 222                         DeviceInfoPos 
+=  2;                                          // Skip over FunctionalMode 
 223                         DeviceInfoPos 
+= (4 + (*(uint32_t*)DeviceInfoPos 
<< 1));      // Skip over Supported Operations Array 
 224                         DeviceInfoPos 
+= (4 + (*(uint32_t*)DeviceInfoPos 
<< 1));      // Skip over Supported Events Array 
 225                         DeviceInfoPos 
+= (4 + (*(uint32_t*)DeviceInfoPos 
<< 1));      // Skip over Supported Device Properties Array 
 226                         DeviceInfoPos 
+= (4 + (*(uint32_t*)DeviceInfoPos 
<< 1));      // Skip over Capture Formats Array 
 227                         DeviceInfoPos 
+= (4 + (*(uint32_t*)DeviceInfoPos 
<< 1));      // Skip over Image Formats Array 
 229                         /* Extract and convert the Manufacturer Unicode string to ASCII and print it through the USART */ 
 230                         char Manufacturer
[*DeviceInfoPos
]; 
 231                         UnicodeToASCII(DeviceInfoPos
, Manufacturer
); 
 232                         printf_P(PSTR("   Manufacturer: %s\r\n"), Manufacturer
); 
 234                         DeviceInfoPos 
+= 1 + UNICODE_STRING_LENGTH(*DeviceInfoPos
);   // Skip over Manufacturer String 
 236                         /* Extract and convert the Model Unicode string to ASCII and print it through the USART */ 
 237                         char Model
[*DeviceInfoPos
]; 
 238                         UnicodeToASCII(DeviceInfoPos
, Model
); 
 239                         printf_P(PSTR("   Model: %s\r\n"), Model
); 
 241                         DeviceInfoPos 
+= 1 + UNICODE_STRING_LENGTH(*DeviceInfoPos
);   // Skip over Model String 
 243                         /* Extract and convert the Device Version Unicode string to ASCII and print it through the USART */ 
 244                         char DeviceVersion
[*DeviceInfoPos
]; 
 245                         UnicodeToASCII(DeviceInfoPos
, DeviceVersion
); 
 246                         printf_P(PSTR("   Device Version: %s\r\n"), DeviceVersion
); 
 248                         /* Receive the final response block from the device */ 
 249                         if ((ErrorCode 
= SImage_ReceiveBlockHeader()) != PIPE_RWSTREAM_NoError
) 
 251                                 ShowCommandError(ErrorCode
, false); 
 253                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 257                         /* Verify that the command completed successfully */ 
 258                         if ((PIMA_ReceivedBlock
.Type 
!= PIMA_CONTAINER_ResponseBlock
) || (PIMA_ReceivedBlock
.Code 
!= PIMA_RESPONSE_OK
)) 
 260                                 ShowCommandError(PIMA_ReceivedBlock
.Code
, true); 
 262                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 266                         puts_P(PSTR("Opening Session...\r\n")); 
 268                         PIMA_SendBlock 
= (PIMA_Container_t
) 
 270                                         .DataLength    
= PIMA_COMMAND_SIZE(1), 
 271                                         .Type          
= PIMA_CONTAINER_CommandBlock
, 
 272                                         .Code          
= PIMA_OPERATION_OPENSESSION
, 
 273                                         .TransactionID 
= 0x00000000, 
 274                                         .Params        
= {0x00000001}, 
 277                         /* Send the OPENSESSION block, open a session with an ID of 0x0001 */ 
 278                         SImage_SendBlockHeader(); 
 280                         /* Receive the response block from the device */ 
 281                         if ((ErrorCode 
= SImage_ReceiveBlockHeader()) != PIPE_RWSTREAM_NoError
) 
 283                                 ShowCommandError(ErrorCode
, false); 
 285                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 289                         /* Verify that the command completed successfully */ 
 290                         if ((PIMA_ReceivedBlock
.Type 
!= PIMA_CONTAINER_ResponseBlock
) || (PIMA_ReceivedBlock
.Code 
!= PIMA_RESPONSE_OK
)) 
 292                                 ShowCommandError(PIMA_ReceivedBlock
.Code
, true); 
 294                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 298                         puts_P(PSTR("Closing Session...\r\n")); 
 300                         PIMA_SendBlock 
= (PIMA_Container_t
) 
 302                                         .DataLength    
= PIMA_COMMAND_SIZE(1), 
 303                                         .Type          
= PIMA_CONTAINER_CommandBlock
, 
 304                                         .Code          
= PIMA_OPERATION_CLOSESESSION
, 
 305                                         .TransactionID 
= 0x00000001, 
 306                                         .Params        
= {0x00000001}, 
 309                         /* Send the CLOSESESSION block, close the session with an ID of 0x0001 */ 
 310                         SImage_SendBlockHeader(); 
 312                         /* Receive the response block from the device */ 
 313                         if ((ErrorCode 
= SImage_ReceiveBlockHeader()) != PIPE_RWSTREAM_NoError
) 
 315                                 ShowCommandError(ErrorCode
, false); 
 317                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 321                         /* Verify that the command completed successfully */ 
 322                         if ((PIMA_ReceivedBlock
.Type 
!= PIMA_CONTAINER_ResponseBlock
) || (PIMA_ReceivedBlock
.Code 
!= PIMA_RESPONSE_OK
)) 
 324                                 ShowCommandError(PIMA_ReceivedBlock
.Code
, true); 
 326                                 USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 330                         puts_P(PSTR("Done.\r\n")); 
 332                         /* Indicate device no longer busy */ 
 333                         LEDs_SetAllLEDs(LEDMASK_USB_READY
); 
 335                         USB_HostState 
= HOST_STATE_WaitForDeviceRemoval
; 
 340 /** Function to convert a given Unicode encoded string to ASCII. This function will only work correctly on Unicode 
 341  *  strings which contain ASCII printable characters only. 
 343  *  \param[in] UnicodeString  Pointer to a Unicode encoded input string 
 344  *  \param[out] Buffer        Pointer to a buffer where the converted ASCII string should be stored 
 346 void UnicodeToASCII(uint8_t* UnicodeString
, 
 349         /* Get the number of characters in the string, skip to the start of the string data */ 
 350         uint8_t CharactersRemaining 
= *(UnicodeString
++); 
 352         /* Loop through the entire unicode string */ 
 353         while (CharactersRemaining
--) 
 355                 /* Load in the next unicode character (only the lower byte, as only Unicode coded ASCII is supported) */ 
 356                 *(Buffer
++) = *UnicodeString
; 
 358                 /* Jump to the next unicode character */ 
 362         /* Null terminate the string */ 
 366 /** Displays a PIMA command error via the device's serial port. 
 368  *  \param[in] ErrorCode          Error code of the function which failed to complete successfully 
 369  *  \param[in] ResponseCodeError  Indicates if the error is due to a command failed indication from the device, or a communication failure 
 371 void ShowCommandError(uint8_t ErrorCode
, 
 372                       bool ResponseCodeError
) 
 374         char* FailureType 
= ((ResponseCodeError
) ? 
PSTR("Response Code != OK") : PSTR("Transaction Fail")); 
 376         printf_P(PSTR(ESC_FG_RED 
"Command Error (%S).\r\n" 
 377                                  " -- Error Code %d\r\n" ESC_FG_WHITE
), FailureType
, ErrorCode
); 
 379         /* Indicate error via status LEDs */ 
 380         LEDs_SetAllLEDs(LEDMASK_USB_ERROR
);