Add to 11U68 11E68

Dependencies:   DirectoryList MODSERIAL mbed

Fork of ika_shouyu_poppoyaki by Tedd OKANO

Committer:
okano
Date:
Fri Sep 20 01:48:26 2013 +0000
Revision:
29:96e28bc1bd99
Parent:
28:689c3880e0e4
Child:
30:e0d7524661ca
parameter added to writing and verifying functions to report transferred size

Who changed what in which revision?

UserRevisionLine numberNew contents of line
okano 24:9830b4f1207b 1 #include "mbed.h"
okano 24:9830b4f1207b 2 #include "verification.h"
okano 24:9830b4f1207b 3 #include "command_interface.h"
okano 24:9830b4f1207b 4 #include "uu_coding.h"
okano 24:9830b4f1207b 5 #include "serial_utilities.h"
okano 24:9830b4f1207b 6 #include "writing.h"
okano 24:9830b4f1207b 7 #include "ika.h"
okano 28:689c3880e0e4 8 #include "error_code.h"
okano 28:689c3880e0e4 9
okano 24:9830b4f1207b 10
okano 29:96e28bc1bd99 11 int verify_binary_data( FILE *fp, int *transferred_size_p );
okano 29:96e28bc1bd99 12 int verify_uucoded_data( FILE *fp, int *transferred_size_p );
okano 24:9830b4f1207b 13 void get_binary_from_uucode_str( char *b, int size );
okano 24:9830b4f1207b 14
okano 24:9830b4f1207b 15
okano 29:96e28bc1bd99 16 int verify_flash( FILE *fp, target_param *tpp, int *transferred_size_p )
okano 24:9830b4f1207b 17 {
okano 24:9830b4f1207b 18 if ( tpp->write_type == BINARY )
okano 29:96e28bc1bd99 19 return ( verify_binary_data( fp, transferred_size_p ) );
okano 24:9830b4f1207b 20 else
okano 29:96e28bc1bd99 21 return ( verify_uucoded_data( fp, transferred_size_p ) );
okano 24:9830b4f1207b 22 }
okano 24:9830b4f1207b 23
okano 24:9830b4f1207b 24
okano 29:96e28bc1bd99 25 int verify_binary_data( FILE *fp, int *read_size_p )
okano 24:9830b4f1207b 26 {
okano 24:9830b4f1207b 27 char command_str[ STR_BUFF_SIZE ];
okano 24:9830b4f1207b 28 int read_size = 0;
okano 24:9830b4f1207b 29 int size;
okano 24:9830b4f1207b 30 int flash_reading_size;
okano 24:9830b4f1207b 31 char *bf;
okano 24:9830b4f1207b 32 char *br;
okano 24:9830b4f1207b 33 int error_flag = 0;
okano 24:9830b4f1207b 34 unsigned long checksum = 0;
okano 24:9830b4f1207b 35 unsigned long checksum_count = 0;
okano 24:9830b4f1207b 36
okano 29:96e28bc1bd99 37
okano 24:9830b4f1207b 38 fseek( fp, 0, SEEK_SET ); // seek back to beginning of file
okano 24:9830b4f1207b 39
okano 24:9830b4f1207b 40 flash_reading_size = 128;
okano 24:9830b4f1207b 41
okano 24:9830b4f1207b 42 if ( NULL == (bf = (char *)malloc( flash_reading_size * sizeof( char ) )) )
okano 28:689c3880e0e4 43 return( ERROR_AT_MALLOC_FOR_VERIFY_FILE_BUFF );
okano 24:9830b4f1207b 44
okano 24:9830b4f1207b 45 if ( NULL == (br = (char *)malloc( flash_reading_size * sizeof( char ) )) )
okano 28:689c3880e0e4 46 return( ERROR_AT_MALLOC_FOR_VERIFY_DATA_BUFF );
okano 24:9830b4f1207b 47
okano 24:9830b4f1207b 48
okano 24:9830b4f1207b 49 while ( size = fread( bf, sizeof( char ), flash_reading_size, fp ) ) {
okano 24:9830b4f1207b 50
okano 24:9830b4f1207b 51 if ( read_size < 0x20 ) {
okano 24:9830b4f1207b 52 for ( int i = 0; i < flash_reading_size; i += 4 ) {
okano 24:9830b4f1207b 53
okano 24:9830b4f1207b 54 if ( checksum_count == 7 ) {
okano 24:9830b4f1207b 55 checksum = 0xFFFFFFFF - checksum + 1;
okano 24:9830b4f1207b 56 *((unsigned int *)(bf + i)) = checksum;
okano 26:a63e73885b21 57 //printf( "\r\n\r\n -- calculated checksum : 0x%08X\r\n", checksum );
okano 24:9830b4f1207b 58 } else {
okano 24:9830b4f1207b 59 checksum += *((unsigned int *)(bf + i));
okano 24:9830b4f1207b 60 }
okano 26:a63e73885b21 61
okano 24:9830b4f1207b 62 checksum_count++;
okano 24:9830b4f1207b 63 }
okano 24:9830b4f1207b 64 }
okano 24:9830b4f1207b 65
okano 24:9830b4f1207b 66
okano 24:9830b4f1207b 67 sprintf( command_str, "R %ld %ld\r\n", read_size, size );
okano 24:9830b4f1207b 68 // try_and_check( command_str, "0", MODE_SILENT );
okano 27:2b5c1eb39bb5 69 if ( try_and_check( command_str, "0", 0 ) )
okano 27:2b5c1eb39bb5 70 return ( ERROR_AT_READ_COMMAND );
okano 24:9830b4f1207b 71
okano 24:9830b4f1207b 72 get_binary( br, 1 );
okano 24:9830b4f1207b 73 get_binary( br, size );
okano 24:9830b4f1207b 74
okano 24:9830b4f1207b 75 for ( int i = 0; i < size; i++ ) {
okano 24:9830b4f1207b 76 // printf( " %s 0x%02X --- 0x%02X\r\n", (*(bf + i) != *(br + i)) ? "***" : " ", *(bf + i), *(br + i) );
okano 24:9830b4f1207b 77 if ( (*(bf + i) != *(br + i)) ) {
okano 24:9830b4f1207b 78 // printf( " %s 0x%02X --- 0x%02X\r\n", (*(bf + i) != *(br + i)) ? "***" : " ", *(bf + i), *(br + i) );
okano 24:9830b4f1207b 79 error_flag++;
okano 24:9830b4f1207b 80 }
okano 24:9830b4f1207b 81 }
okano 24:9830b4f1207b 82
okano 24:9830b4f1207b 83 if ( error_flag )
okano 24:9830b4f1207b 84 break;
okano 26:a63e73885b21 85
okano 24:9830b4f1207b 86 read_size += size;
okano 24:9830b4f1207b 87 }
okano 26:a63e73885b21 88
okano 24:9830b4f1207b 89 error_state |= error_flag;
okano 24:9830b4f1207b 90
okano 24:9830b4f1207b 91 free( bf );
okano 24:9830b4f1207b 92 free( br );
okano 24:9830b4f1207b 93
okano 29:96e28bc1bd99 94 *read_size_p = read_size;
okano 29:96e28bc1bd99 95
okano 27:2b5c1eb39bb5 96 return ( error_flag ? ERROR_DATA_DOES_NOT_MATCH : NO_ERROR );
okano 24:9830b4f1207b 97 }
okano 24:9830b4f1207b 98
okano 24:9830b4f1207b 99
okano 29:96e28bc1bd99 100 int verify_uucoded_data( FILE *fp, int *read_size_p )
okano 24:9830b4f1207b 101 {
okano 24:9830b4f1207b 102 char command_str[ STR_BUFF_SIZE ];
okano 24:9830b4f1207b 103 int read_size = 0;
okano 24:9830b4f1207b 104 int size;
okano 24:9830b4f1207b 105 int flash_reading_size;
okano 24:9830b4f1207b 106 char *bf;
okano 24:9830b4f1207b 107 char *br;
okano 24:9830b4f1207b 108 int error_flag = 0;
okano 24:9830b4f1207b 109
okano 24:9830b4f1207b 110 flash_reading_size = 176;
okano 24:9830b4f1207b 111
okano 24:9830b4f1207b 112 initialize_uud_table();
okano 24:9830b4f1207b 113
okano 24:9830b4f1207b 114 if ( NULL == (bf = (char *)malloc( flash_reading_size * sizeof( char ) )) )
okano 24:9830b4f1207b 115 error( "malloc error happened (in verify process, file data buffer)\r\n" );
okano 24:9830b4f1207b 116
okano 24:9830b4f1207b 117 if ( NULL == (br = (char *)malloc( flash_reading_size * sizeof( char ) )) )
okano 24:9830b4f1207b 118 error( "malloc error happened (in verify process, read data buffer)\r\n" );
okano 24:9830b4f1207b 119
okano 24:9830b4f1207b 120 fseek( fp, 0, SEEK_SET ); // seek back to beginning of file
okano 24:9830b4f1207b 121
okano 24:9830b4f1207b 122 while ( size = fread( bf, sizeof( char ), flash_reading_size, fp ) ) {
okano 24:9830b4f1207b 123
okano 24:9830b4f1207b 124 if ( !read_size ) {
okano 24:9830b4f1207b 125 // overwriting 4 bytes data for address=0x1C
okano 24:9830b4f1207b 126 // there is a slot for checksum that is checked in (target's) boot process
okano 24:9830b4f1207b 127 add_isp_checksum( bf );
okano 24:9830b4f1207b 128 }
okano 24:9830b4f1207b 129
okano 24:9830b4f1207b 130 sprintf( command_str, "R %ld %ld\r\n", read_size, size );
okano 27:2b5c1eb39bb5 131 if ( try_and_check( command_str, "0", 0 ) )
okano 27:2b5c1eb39bb5 132 return ( ERROR_AT_READ_COMMAND );
okano 24:9830b4f1207b 133
okano 24:9830b4f1207b 134 get_binary_from_uucode_str( br, size );
okano 24:9830b4f1207b 135
okano 24:9830b4f1207b 136 for ( int i = 0; i < size; i++ ) {
okano 24:9830b4f1207b 137 // printf( " %s 0x%02X --- 0x%02X\r\n", (*(bf + i) != *(br + i)) ? "***" : " ", *(bf + i), *(br + i) );
okano 24:9830b4f1207b 138 if ( (*(bf + i) != *(br + i)) ) {
okano 24:9830b4f1207b 139 printf( " %s 0x%02X --- 0x%02X\r\n", (*(bf + i) != *(br + i)) ? "***" : " ", *(bf + i), *(br + i) );
okano 24:9830b4f1207b 140 error_flag++;
okano 24:9830b4f1207b 141 }
okano 24:9830b4f1207b 142 }
okano 24:9830b4f1207b 143
okano 24:9830b4f1207b 144 if ( error_flag )
okano 24:9830b4f1207b 145 break;
okano 26:a63e73885b21 146
okano 24:9830b4f1207b 147 read_size += size;
okano 24:9830b4f1207b 148 }
okano 24:9830b4f1207b 149
okano 24:9830b4f1207b 150 error_state |= error_flag;
okano 24:9830b4f1207b 151 free( bf );
okano 24:9830b4f1207b 152 free( br );
okano 24:9830b4f1207b 153
okano 29:96e28bc1bd99 154 *read_size_p = read_size;
okano 29:96e28bc1bd99 155
okano 27:2b5c1eb39bb5 156 return ( error_flag ? ERROR_DATA_DOES_NOT_MATCH : NO_ERROR );
okano 24:9830b4f1207b 157 }
okano 24:9830b4f1207b 158
okano 24:9830b4f1207b 159
okano 24:9830b4f1207b 160 void get_binary_from_uucode_str( char *b, int size )
okano 24:9830b4f1207b 161 {
okano 24:9830b4f1207b 162 #define N 4
okano 24:9830b4f1207b 163
okano 24:9830b4f1207b 164 char s[ N ][ STR_BUFF_SIZE ];
okano 24:9830b4f1207b 165 char ss[ STR_BUFF_SIZE ];
okano 24:9830b4f1207b 166 long checksum = 0;
okano 24:9830b4f1207b 167 int line_count = 0;
okano 24:9830b4f1207b 168 int read_size = 0;
okano 24:9830b4f1207b 169 int retry_count = 3;
okano 24:9830b4f1207b 170
okano 24:9830b4f1207b 171
okano 24:9830b4f1207b 172 while ( retry_count-- ) {
okano 24:9830b4f1207b 173
okano 24:9830b4f1207b 174 for ( int i = 0; i < N; i++ )
okano 24:9830b4f1207b 175 get_string( s[ i ] );
okano 24:9830b4f1207b 176
okano 24:9830b4f1207b 177 get_string( ss );
okano 24:9830b4f1207b 178
okano 24:9830b4f1207b 179
okano 24:9830b4f1207b 180 while ( size ) {
okano 24:9830b4f1207b 181 read_size = uudecode_a_line( b, s[ line_count ] );
okano 24:9830b4f1207b 182
okano 24:9830b4f1207b 183 for ( int i = 0; i < read_size; i++ )
okano 24:9830b4f1207b 184 checksum += *b++;
okano 24:9830b4f1207b 185
okano 24:9830b4f1207b 186 size -= read_size;
okano 24:9830b4f1207b 187 line_count++;
okano 24:9830b4f1207b 188 }
okano 24:9830b4f1207b 189
okano 24:9830b4f1207b 190 // printf( " checksum -- %s (internal = %ld)\r\n", ss, checksum );
okano 24:9830b4f1207b 191
okano 24:9830b4f1207b 192 if ( checksum == atol( ss ) ) {
okano 24:9830b4f1207b 193 put_string( "OK\r\n" );
okano 24:9830b4f1207b 194 return;
okano 24:9830b4f1207b 195 // printf( " checksum OK\r\n" );
okano 24:9830b4f1207b 196 } else {
okano 24:9830b4f1207b 197 printf( " checksum RESEND\r\n" );
okano 24:9830b4f1207b 198 put_string( "RESEND\r\n" );
okano 24:9830b4f1207b 199 }
okano 24:9830b4f1207b 200 }
okano 24:9830b4f1207b 201 }