Add to 11U68 11E68
Dependencies: DirectoryList MODSERIAL mbed
Fork of ika_shouyu_poppoyaki by
main.cpp@2:8d75eb0ecd20, 2013-08-24 (annotated)
- Committer:
- okano
- Date:
- Sat Aug 24 14:41:38 2013 +0000
- Revision:
- 2:8d75eb0ecd20
- Parent:
- 1:54e619428ae6
- Child:
- 3:3c380e643e74
console message redundancy removed
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
okano | 0:6baefda2e511 | 1 | #include "mbed.h" |
okano | 0:6baefda2e511 | 2 | |
okano | 2:8d75eb0ecd20 | 3 | BusOut leds( LED4, LED3, LED2, LED1 ); |
okano | 2:8d75eb0ecd20 | 4 | DigitalOut reset_pin( p26 ); |
okano | 2:8d75eb0ecd20 | 5 | DigitalOut isp_pin( p25 ); |
okano | 2:8d75eb0ecd20 | 6 | Serial target ( p28, p27 ); |
okano | 2:8d75eb0ecd20 | 7 | LocalFileSystem local( "local" ); |
okano | 0:6baefda2e511 | 8 | |
okano | 1:54e619428ae6 | 9 | #define SOURCE_FILE "/local/bin" |
okano | 1:54e619428ae6 | 10 | #define STR_BUFF_SIZE 64 |
okano | 1:54e619428ae6 | 11 | #define RAM_START_ADDRESS 0x10000300L |
okano | 1:54e619428ae6 | 12 | #define SECTOR_SIZE 4096 |
okano | 0:6baefda2e511 | 13 | |
okano | 2:8d75eb0ecd20 | 14 | enum { |
okano | 2:8d75eb0ecd20 | 15 | ENTER_TO_ISP_MODE, |
okano | 2:8d75eb0ecd20 | 16 | NO_ISP_MODE |
okano | 2:8d75eb0ecd20 | 17 | }; |
okano | 2:8d75eb0ecd20 | 18 | |
okano | 0:6baefda2e511 | 19 | void put_string( char *s ); |
okano | 0:6baefda2e511 | 20 | void get_string( char *s ); |
okano | 0:6baefda2e511 | 21 | |
okano | 2:8d75eb0ecd20 | 22 | void print_command( char *command ) |
okano | 2:8d75eb0ecd20 | 23 | { |
okano | 2:8d75eb0ecd20 | 24 | char s[ STR_BUFF_SIZE ]; |
okano | 2:8d75eb0ecd20 | 25 | char *pos; |
okano | 2:8d75eb0ecd20 | 26 | |
okano | 2:8d75eb0ecd20 | 27 | strcpy( s, command ); |
okano | 2:8d75eb0ecd20 | 28 | |
okano | 2:8d75eb0ecd20 | 29 | if ( pos = strchr( s, '\r' ) ) |
okano | 2:8d75eb0ecd20 | 30 | *pos = '\0'; |
okano | 2:8d75eb0ecd20 | 31 | |
okano | 2:8d75eb0ecd20 | 32 | if ( pos = strchr( s, '\n' ) ) |
okano | 2:8d75eb0ecd20 | 33 | *pos = '\0'; |
okano | 2:8d75eb0ecd20 | 34 | |
okano | 2:8d75eb0ecd20 | 35 | printf( " command-\"%s\" : ", s ); |
okano | 2:8d75eb0ecd20 | 36 | } |
okano | 2:8d75eb0ecd20 | 37 | |
okano | 2:8d75eb0ecd20 | 38 | void print_result( int r ) |
okano | 2:8d75eb0ecd20 | 39 | { |
okano | 2:8d75eb0ecd20 | 40 | printf( "%s\r\n", r ? "Fail" : "Pass" ); |
okano | 2:8d75eb0ecd20 | 41 | } |
okano | 0:6baefda2e511 | 42 | |
okano | 0:6baefda2e511 | 43 | int try_and_check( char *command, char *expected_return_str, int mode ) |
okano | 0:6baefda2e511 | 44 | { |
okano | 0:6baefda2e511 | 45 | char rtn_str[ STR_BUFF_SIZE ]; |
okano | 2:8d75eb0ecd20 | 46 | int result; |
okano | 0:6baefda2e511 | 47 | |
okano | 2:8d75eb0ecd20 | 48 | print_command( command ); |
okano | 0:6baefda2e511 | 49 | put_string( command ); |
okano | 2:8d75eb0ecd20 | 50 | |
okano | 0:6baefda2e511 | 51 | get_string( rtn_str ); |
okano | 2:8d75eb0ecd20 | 52 | print_result( result = strcmp( expected_return_str, rtn_str ) ); |
okano | 0:6baefda2e511 | 53 | |
okano | 2:8d75eb0ecd20 | 54 | return ( result ); |
okano | 0:6baefda2e511 | 55 | } |
okano | 0:6baefda2e511 | 56 | |
okano | 0:6baefda2e511 | 57 | int try_and_check2( char *command, char *expected_return_str, int mode ) |
okano | 0:6baefda2e511 | 58 | { |
okano | 0:6baefda2e511 | 59 | char rtn_str[ STR_BUFF_SIZE ]; |
okano | 2:8d75eb0ecd20 | 60 | int result; |
okano | 2:8d75eb0ecd20 | 61 | print_command( command ); |
okano | 0:6baefda2e511 | 62 | |
okano | 0:6baefda2e511 | 63 | put_string( command ); |
okano | 0:6baefda2e511 | 64 | |
okano | 0:6baefda2e511 | 65 | get_string( rtn_str ); // just readout echoback |
okano | 0:6baefda2e511 | 66 | get_string( rtn_str ); |
okano | 2:8d75eb0ecd20 | 67 | print_result( result = strcmp( expected_return_str, rtn_str ) ); |
okano | 0:6baefda2e511 | 68 | |
okano | 2:8d75eb0ecd20 | 69 | return ( result ); |
okano | 0:6baefda2e511 | 70 | } |
okano | 0:6baefda2e511 | 71 | |
okano | 0:6baefda2e511 | 72 | char read_byte( void ) |
okano | 0:6baefda2e511 | 73 | { |
okano | 0:6baefda2e511 | 74 | while ( !target.readable() ) |
okano | 0:6baefda2e511 | 75 | ; |
okano | 0:6baefda2e511 | 76 | |
okano | 0:6baefda2e511 | 77 | return ( target.getc() ); |
okano | 0:6baefda2e511 | 78 | } |
okano | 0:6baefda2e511 | 79 | char uue_table[ 64 ]; |
okano | 0:6baefda2e511 | 80 | |
okano | 0:6baefda2e511 | 81 | void initialize_uue_table( void ) |
okano | 0:6baefda2e511 | 82 | { |
okano | 0:6baefda2e511 | 83 | int i; |
okano | 0:6baefda2e511 | 84 | |
okano | 0:6baefda2e511 | 85 | uue_table[0] = 0x60; // 0x20 is translated to 0x60 ! |
okano | 0:6baefda2e511 | 86 | |
okano | 0:6baefda2e511 | 87 | for (i = 1; i < 64; i++) { |
okano | 0:6baefda2e511 | 88 | uue_table[i] = (char)(0x20 + i); |
okano | 0:6baefda2e511 | 89 | } |
okano | 0:6baefda2e511 | 90 | } |
okano | 0:6baefda2e511 | 91 | |
okano | 0:6baefda2e511 | 92 | long bin2uue( char *bin, char *str ) |
okano | 0:6baefda2e511 | 93 | { |
okano | 0:6baefda2e511 | 94 | unsigned long v; |
okano | 1:54e619428ae6 | 95 | long checksum = 0; |
okano | 0:6baefda2e511 | 96 | int strpos = 0; |
okano | 0:6baefda2e511 | 97 | |
okano | 0:6baefda2e511 | 98 | *(str + strpos++) = ' ' + 45; |
okano | 0:6baefda2e511 | 99 | |
okano | 0:6baefda2e511 | 100 | for ( int i = 0; i < 45; i += 3 ) { |
okano | 1:54e619428ae6 | 101 | checksum += *(bin + i + 0) + *(bin + i + 1) + *(bin + i + 2); |
okano | 0:6baefda2e511 | 102 | v = (*(bin + i + 0) << 16) | (*(bin + i + 1) << 8) | (*(bin + i + 2) << 0); |
okano | 0:6baefda2e511 | 103 | *(str + strpos++) = uue_table[ (v >> 18) & 0x3F ]; |
okano | 0:6baefda2e511 | 104 | *(str + strpos++) = uue_table[ (v >> 12) & 0x3F ]; |
okano | 0:6baefda2e511 | 105 | *(str + strpos++) = uue_table[ (v >> 6) & 0x3F ]; |
okano | 0:6baefda2e511 | 106 | *(str + strpos++) = uue_table[ (v >> 0) & 0x3F ]; |
okano | 0:6baefda2e511 | 107 | } |
okano | 0:6baefda2e511 | 108 | *(str + strpos++) = '\n'; |
okano | 0:6baefda2e511 | 109 | *(str + strpos++) = '\0'; |
okano | 0:6baefda2e511 | 110 | |
okano | 1:54e619428ae6 | 111 | return checksum; |
okano | 0:6baefda2e511 | 112 | } |
okano | 0:6baefda2e511 | 113 | |
okano | 1:54e619428ae6 | 114 | void add_isp_checksum( char *b ) |
okano | 1:54e619428ae6 | 115 | { |
okano | 1:54e619428ae6 | 116 | // see http://www.lpcware.com/content/nxpfile/lpc177x8x-checksum-insertion-program |
okano | 1:54e619428ae6 | 117 | |
okano | 1:54e619428ae6 | 118 | unsigned int *p; |
okano | 1:54e619428ae6 | 119 | unsigned int cksum = 0; |
okano | 1:54e619428ae6 | 120 | |
okano | 1:54e619428ae6 | 121 | p = (unsigned int *)b; |
okano | 1:54e619428ae6 | 122 | |
okano | 1:54e619428ae6 | 123 | for ( int i = 0; i < 7; i++ ) { |
okano | 1:54e619428ae6 | 124 | cksum += *p++; |
okano | 1:54e619428ae6 | 125 | } |
okano | 1:54e619428ae6 | 126 | |
okano | 1:54e619428ae6 | 127 | printf( " -- value at checksum slot : 0x%08X\r\n", *p ); |
okano | 1:54e619428ae6 | 128 | |
okano | 1:54e619428ae6 | 129 | *p = 0xFFFFFFFF - cksum + 1; |
okano | 1:54e619428ae6 | 130 | printf( " -- calculated checksum : 0x%08X\r\n", *p ); |
okano | 1:54e619428ae6 | 131 | |
okano | 1:54e619428ae6 | 132 | printf( " new checksum will be used to program flash\r\n" ); |
okano | 1:54e619428ae6 | 133 | } |
okano | 1:54e619428ae6 | 134 | |
okano | 1:54e619428ae6 | 135 | |
okano | 1:54e619428ae6 | 136 | |
okano | 1:54e619428ae6 | 137 | void erase_sectors( int last_sector ) |
okano | 1:54e619428ae6 | 138 | { |
okano | 1:54e619428ae6 | 139 | char command_str[ STR_BUFF_SIZE ]; |
okano | 1:54e619428ae6 | 140 | |
okano | 1:54e619428ae6 | 141 | sprintf( command_str, "P 0 %d\r\n", last_sector ); |
okano | 2:8d75eb0ecd20 | 142 | try_and_check( command_str, "0", 0 ); |
okano | 1:54e619428ae6 | 143 | |
okano | 1:54e619428ae6 | 144 | *(command_str) = 'E'; |
okano | 2:8d75eb0ecd20 | 145 | try_and_check( command_str, "0", 0 ); |
okano | 1:54e619428ae6 | 146 | } |
okano | 0:6baefda2e511 | 147 | |
okano | 0:6baefda2e511 | 148 | #define FLASH_WRITING_SIZE 1024 |
okano | 0:6baefda2e511 | 149 | #define TRANSFER_SIZE (24 * 45) |
okano | 0:6baefda2e511 | 150 | |
okano | 0:6baefda2e511 | 151 | char b[ TRANSFER_SIZE ]; |
okano | 0:6baefda2e511 | 152 | |
okano | 1:54e619428ae6 | 153 | void write_binary_data( FILE *fp ) |
okano | 0:6baefda2e511 | 154 | { |
okano | 0:6baefda2e511 | 155 | char command_str[ STR_BUFF_SIZE ]; |
okano | 1:54e619428ae6 | 156 | long checksum = 0; |
okano | 0:6baefda2e511 | 157 | int transfer_count = 0; |
okano | 0:6baefda2e511 | 158 | int size; |
okano | 0:6baefda2e511 | 159 | |
okano | 0:6baefda2e511 | 160 | initialize_uue_table(); |
okano | 0:6baefda2e511 | 161 | |
okano | 0:6baefda2e511 | 162 | for ( int i = FLASH_WRITING_SIZE; i < TRANSFER_SIZE; i++ ) |
okano | 0:6baefda2e511 | 163 | b[ i ] = 0; |
okano | 0:6baefda2e511 | 164 | |
okano | 0:6baefda2e511 | 165 | while ( size = fread( b, sizeof( char ), FLASH_WRITING_SIZE, fp ) ) { |
okano | 0:6baefda2e511 | 166 | |
okano | 1:54e619428ae6 | 167 | if ( !transfer_count ) { |
okano | 1:54e619428ae6 | 168 | add_isp_checksum( b ); |
okano | 1:54e619428ae6 | 169 | } |
okano | 1:54e619428ae6 | 170 | |
okano | 1:54e619428ae6 | 171 | sprintf( command_str, "W %ld %ld\r\n", RAM_START_ADDRESS, 1080 ); |
okano | 2:8d75eb0ecd20 | 172 | try_and_check( command_str, "0", 0 ); |
okano | 0:6baefda2e511 | 173 | |
okano | 0:6baefda2e511 | 174 | for ( int i = 0; i < 24; i++ ) { |
okano | 1:54e619428ae6 | 175 | checksum += bin2uue( b + (i * 45), command_str ); |
okano | 2:8d75eb0ecd20 | 176 | printf( "%02d %s\r", i, command_str ); |
okano | 0:6baefda2e511 | 177 | put_string( command_str ); |
okano | 0:6baefda2e511 | 178 | if ( (i == 19) || (i == 23) ) { |
okano | 1:54e619428ae6 | 179 | sprintf( command_str, "%ld\n", checksum ); |
okano | 1:54e619428ae6 | 180 | printf( " %ld %s\r\n", checksum, command_str ); |
okano | 0:6baefda2e511 | 181 | printf( "\"%s\" %s\r\n", command_str, try_and_check( command_str, "OK", 0 ) ? "Fail" : "Pass" ); |
okano | 0:6baefda2e511 | 182 | |
okano | 1:54e619428ae6 | 183 | checksum = 0; |
okano | 0:6baefda2e511 | 184 | } |
okano | 0:6baefda2e511 | 185 | } |
okano | 0:6baefda2e511 | 186 | |
okano | 0:6baefda2e511 | 187 | printf( "\"P 0 0\" %s\r\n", try_and_check( "P 0 0\r\n", "0", 0 ) ? "Fail" : "Pass" ); |
okano | 0:6baefda2e511 | 188 | |
okano | 0:6baefda2e511 | 189 | sprintf( command_str, "C %ld %ld %ld\r\n", FLASH_WRITING_SIZE * transfer_count++, 0x10000300L, FLASH_WRITING_SIZE ); |
okano | 2:8d75eb0ecd20 | 190 | try_and_check( command_str, "0", 0 ); |
okano | 0:6baefda2e511 | 191 | |
okano | 0:6baefda2e511 | 192 | |
okano | 0:6baefda2e511 | 193 | } |
okano | 2:8d75eb0ecd20 | 194 | try_and_check( "G 0 T\r\n", "0", 0 ); |
okano | 0:6baefda2e511 | 195 | } |
okano | 0:6baefda2e511 | 196 | |
okano | 1:54e619428ae6 | 197 | int file_size( FILE *fp ) |
okano | 1:54e619428ae6 | 198 | { |
okano | 1:54e619428ae6 | 199 | int size; |
okano | 1:54e619428ae6 | 200 | |
okano | 1:54e619428ae6 | 201 | fseek( fp, 0, SEEK_END ); // seek to end of file |
okano | 1:54e619428ae6 | 202 | size = ftell( fp ); // get current file pointer |
okano | 1:54e619428ae6 | 203 | fseek( fp, 0, SEEK_SET ); // seek back to beginning of file |
okano | 1:54e619428ae6 | 204 | |
okano | 1:54e619428ae6 | 205 | return size; |
okano | 1:54e619428ae6 | 206 | } |
okano | 1:54e619428ae6 | 207 | |
okano | 1:54e619428ae6 | 208 | void reset_target( int isp_pin_state ) |
okano | 1:54e619428ae6 | 209 | { |
okano | 1:54e619428ae6 | 210 | reset_pin = 1; |
okano | 1:54e619428ae6 | 211 | isp_pin = 0; |
okano | 1:54e619428ae6 | 212 | wait_ms( 100 ); |
okano | 1:54e619428ae6 | 213 | reset_pin = 0; |
okano | 1:54e619428ae6 | 214 | wait_ms( 100 ); |
okano | 1:54e619428ae6 | 215 | reset_pin = 1; |
okano | 1:54e619428ae6 | 216 | wait_ms( 100 ); |
okano | 1:54e619428ae6 | 217 | } |
okano | 1:54e619428ae6 | 218 | |
okano | 0:6baefda2e511 | 219 | int main() |
okano | 0:6baefda2e511 | 220 | { |
okano | 0:6baefda2e511 | 221 | FILE *fp; |
okano | 0:6baefda2e511 | 222 | char str_buf0[ STR_BUFF_SIZE ]; |
okano | 0:6baefda2e511 | 223 | char str_buf1[ STR_BUFF_SIZE ]; |
okano | 1:54e619428ae6 | 224 | int data_size; |
okano | 1:54e619428ae6 | 225 | int last_sector; |
okano | 0:6baefda2e511 | 226 | |
okano | 2:8d75eb0ecd20 | 227 | target.baud( 9600 ); |
okano | 0:6baefda2e511 | 228 | |
okano | 0:6baefda2e511 | 229 | if ( NULL == (fp = fopen( SOURCE_FILE, "rb" )) ) { |
okano | 0:6baefda2e511 | 230 | error( "couldn't open source file" ); |
okano | 0:6baefda2e511 | 231 | return ( 1 ); |
okano | 0:6baefda2e511 | 232 | } |
okano | 0:6baefda2e511 | 233 | |
okano | 1:54e619428ae6 | 234 | data_size = file_size( fp ); |
okano | 1:54e619428ae6 | 235 | last_sector = data_size / SECTOR_SIZE; |
okano | 0:6baefda2e511 | 236 | printf( "\r\n\r\ntarget RESET\r\n" ); |
okano | 1:54e619428ae6 | 237 | printf( "data size = %d bytes, it takes %d secotrs in flash area\r\n", data_size, last_sector + 1 ); |
okano | 0:6baefda2e511 | 238 | |
okano | 2:8d75eb0ecd20 | 239 | reset_target( ENTER_TO_ISP_MODE ); |
okano | 2:8d75eb0ecd20 | 240 | |
okano | 2:8d75eb0ecd20 | 241 | try_and_check( "?", "Synchronized", 0 ); |
okano | 0:6baefda2e511 | 242 | |
okano | 2:8d75eb0ecd20 | 243 | try_and_check2( "Synchronized\r\n", "OK", 0 ); |
okano | 2:8d75eb0ecd20 | 244 | try_and_check2( "12000\r\n", "OK", 0 ); |
okano | 2:8d75eb0ecd20 | 245 | try_and_check2( "U 23130\r\n", "0", 0 ); |
okano | 2:8d75eb0ecd20 | 246 | try_and_check2( "A 0\r\n", "0", 0 ); |
okano | 0:6baefda2e511 | 247 | |
okano | 2:8d75eb0ecd20 | 248 | try_and_check( "K\r\n", "0", 0 ); |
okano | 0:6baefda2e511 | 249 | get_string( str_buf0 ); |
okano | 0:6baefda2e511 | 250 | get_string( str_buf1 ); |
okano | 0:6baefda2e511 | 251 | printf( " result of \"K\" = %s %s\r\n", str_buf0, str_buf1 ); |
okano | 0:6baefda2e511 | 252 | |
okano | 2:8d75eb0ecd20 | 253 | try_and_check( "J\r\n", "0", 0 ); |
okano | 0:6baefda2e511 | 254 | get_string( str_buf0 ); |
okano | 0:6baefda2e511 | 255 | printf( " result of \"J\" = %s\r\n", str_buf0 ); |
okano | 0:6baefda2e511 | 256 | |
okano | 2:8d75eb0ecd20 | 257 | erase_sectors( last_sector ); |
okano | 2:8d75eb0ecd20 | 258 | write_binary_data( fp ); |
okano | 0:6baefda2e511 | 259 | |
okano | 0:6baefda2e511 | 260 | fclose( fp ); |
okano | 0:6baefda2e511 | 261 | |
okano | 2:8d75eb0ecd20 | 262 | int i = 0; |
okano | 2:8d75eb0ecd20 | 263 | |
okano | 2:8d75eb0ecd20 | 264 | while ( 1 ) { |
okano | 2:8d75eb0ecd20 | 265 | leds = 0x1 << (i++ & 0x3); |
okano | 2:8d75eb0ecd20 | 266 | wait( 0.1 ); |
okano | 2:8d75eb0ecd20 | 267 | } |
okano | 0:6baefda2e511 | 268 | } |
okano | 0:6baefda2e511 | 269 | |
okano | 2:8d75eb0ecd20 | 270 | |
okano | 0:6baefda2e511 | 271 | void put_string( char *s ) |
okano | 0:6baefda2e511 | 272 | { |
okano | 2:8d75eb0ecd20 | 273 | char c; |
okano | 2:8d75eb0ecd20 | 274 | static int i = 0; |
okano | 0:6baefda2e511 | 275 | |
okano | 2:8d75eb0ecd20 | 276 | while ( (c = *s++) ) { |
okano | 0:6baefda2e511 | 277 | target.putc( c ); |
okano | 2:8d75eb0ecd20 | 278 | leds = i++ & 0x1; |
okano | 2:8d75eb0ecd20 | 279 | } |
okano | 0:6baefda2e511 | 280 | } |
okano | 0:6baefda2e511 | 281 | |
okano | 0:6baefda2e511 | 282 | void get_string( char *s ) |
okano | 0:6baefda2e511 | 283 | { |
okano | 0:6baefda2e511 | 284 | int i = 0; |
okano | 0:6baefda2e511 | 285 | char c = 0; |
okano | 0:6baefda2e511 | 286 | |
okano | 0:6baefda2e511 | 287 | do { |
okano | 0:6baefda2e511 | 288 | do { |
okano | 0:6baefda2e511 | 289 | if ( target.readable() ) { |
okano | 0:6baefda2e511 | 290 | c = target.getc(); |
okano | 0:6baefda2e511 | 291 | |
okano | 0:6baefda2e511 | 292 | if ( ( c == '\n') || (c == '\r') ) |
okano | 0:6baefda2e511 | 293 | break; |
okano | 0:6baefda2e511 | 294 | |
okano | 0:6baefda2e511 | 295 | *s++ = c; |
okano | 0:6baefda2e511 | 296 | i++; |
okano | 0:6baefda2e511 | 297 | } |
okano | 0:6baefda2e511 | 298 | } while ( 1 ); |
okano | 0:6baefda2e511 | 299 | } while ( !i ); |
okano | 2:8d75eb0ecd20 | 300 | |
okano | 0:6baefda2e511 | 301 | *s = '\0'; |
okano | 0:6baefda2e511 | 302 | } |
okano | 0:6baefda2e511 | 303 |