VZTECH / Mbed 2 deprecated main_src

Modularizando o src

Dependencies:   EALib EthernetInterface_vz mbed-rtos mbed

Fork of header_main_colinas_V0-20-09-14 by VZTECH

vz_protocol.cpp@101:162c28286c29, 2015-02-13 (annotated)

Committer:
klauss
Date:
Fri Feb 13 18:44:45 2015 +0000
Revision:
101:162c28286c29
Parent:
100:09a23fcd3bdf
Child:
102:98c7155e8bea
validando o clock

Who changed what in which revision?

UserRevisionLine numberNew contents of line
klauss 0:4d17cd9c8f9d 1 #include "vz_protocol.h"
klauss 72:895ca792c647 2
klauss 78:1353744f01e1 3 uint32_t pkg_ckserr = 0;
klauss 78:1353744f01e1 4 uint32_t pkg_zero = 0;
klauss 78:1353744f01e1 5 uint32_t pkg_cksok = 0;
klauss 81:3656f00ab3db 6 int begin = 0;
klauss 81:3656f00ab3db 7 int end = 0;
klauss 101:162c28286c29 8 time_t current_time = 0;
klauss 101:162c28286c29 9 UDPSocket clock_sock;
klauss 101:162c28286c29 10 Endpoint clock_server;
klauss 101:162c28286c29 11 Timer external_time;
klauss 81:3656f00ab3db 12
klauss 81:3656f00ab3db 13 void init_ranges( void ){
klauss 81:3656f00ab3db 14 FILE * begin_ext = fopen( "/qspi/minext.txt", "r" );
klauss 81:3656f00ab3db 15 if( begin_ext == NULL ){
klauss 81:3656f00ab3db 16 if( debug_out_of_range ) debug_msg("Failed to open /qspi/minext.txt" );
klauss 81:3656f00ab3db 17 begin = MIN_EXT;
klauss 81:3656f00ab3db 18 }else{
klauss 81:3656f00ab3db 19 char inner_tmp[ 20 ];
klauss 81:3656f00ab3db 20 if( fread( (void *)inner_tmp, 1, 20, begin_ext ) > 0 ){
klauss 81:3656f00ab3db 21 begin = atoi( inner_tmp );
klauss 81:3656f00ab3db 22 if( debug_out_of_range ) debug_msg("Ext Min %d", begin );
klauss 81:3656f00ab3db 23 }else{
klauss 81:3656f00ab3db 24 if( debug_out_of_range ) debug_msg("Failed to read /qspi/minext.txt" );
klauss 81:3656f00ab3db 25 begin = MIN_EXT;
klauss 81:3656f00ab3db 26 }
klauss 81:3656f00ab3db 27 }
klauss 81:3656f00ab3db 28 fclose( begin_ext );
klauss 81:3656f00ab3db 29
klauss 81:3656f00ab3db 30 FILE * end_ext = fopen( "/qspi/maxext.txt", "r" );
klauss 81:3656f00ab3db 31 if( end_ext == NULL ){
klauss 81:3656f00ab3db 32 if( debug_out_of_range ) debug_msg("Failed to open /qspi/maxext.txt" );
klauss 81:3656f00ab3db 33 end = MAX_EXT;
klauss 81:3656f00ab3db 34 }else{
klauss 81:3656f00ab3db 35 char inner_tmp[ 20 ];
klauss 81:3656f00ab3db 36 if( fread( (void *)inner_tmp, 1, 20, end_ext ) > 0 ){
klauss 81:3656f00ab3db 37 end = atoi( inner_tmp );
klauss 81:3656f00ab3db 38 if( debug_out_of_range ) debug_msg("Ext Min %d", end );
klauss 81:3656f00ab3db 39 }else{
klauss 81:3656f00ab3db 40 if( debug_out_of_range ) debug_msg("Failed to read /qspi/maxext.txt" );
klauss 81:3656f00ab3db 41 begin = MAX_EXT;
klauss 81:3656f00ab3db 42 }
klauss 81:3656f00ab3db 43 }
klauss 89:0fe315117b00 44 fclose( end_ext );
klauss 81:3656f00ab3db 45 }
Cola 20:2d6ab23956e5 46
klauss 34:f19d9735428e 47 uint8_t * __parse_vz_pkg__( int * ext, int * port, volatile uint8_t * type, uint8_t * cb_buffer ){
klauss 0:4d17cd9c8f9d 48 uint8_t p_lsb, p_msb;
klauss 0:4d17cd9c8f9d 49 uint8_t e_lsb, e_msb;
klauss 0:4d17cd9c8f9d 50
klauss 81:3656f00ab3db 51 if( ( ext && port && type && cb_buffer ) == NULL ) return( NULL );
klauss 58:af7e8788f106 52
klauss 63:0d95da692bb4 53 if( cb_buffer[ 6 ] == __FLOOD__ ){
klauss 63:0d95da692bb4 54 flood_counter++;
Cola 21:0bd688722e81 55 static uint8_t flood_cnt = 0;
Cola 21:0bd688722e81 56 static uint8_t first_run_flag = 0;
Cola 21:0bd688722e81 57 static Timer t;
Cola 21:0bd688722e81 58 if (first_run_flag == 0) {
Cola 21:0bd688722e81 59 flood_cnt = cb_buffer[0];
Cola 21:0bd688722e81 60 first_run_flag++;
Cola 21:0bd688722e81 61 t.start();
Cola 21:0bd688722e81 62 } else {
Cola 21:0bd688722e81 63 if (cb_buffer[0] == 0x00){
klauss 100:09a23fcd3bdf 64 if( debug_uart3 ) pc.printf("%d", t.read_us());
klauss 48:195c97f12e8e 65 if( tcp_session ){
klauss 48:195c97f12e8e 66 char tmp[ 16 ];
klauss 48:195c97f12e8e 67 sprintf( tmp, "%d", t.read_us() );
klauss 48:195c97f12e8e 68 tcp_client.send_all( tmp, strlen( tmp ) );
Cola 21:0bd688722e81 69 }
klauss 48:195c97f12e8e 70 }
Cola 21:0bd688722e81 71 flood_cnt++;
Cola 21:0bd688722e81 72 while (flood_cnt != cb_buffer[0]) {
klauss 100:09a23fcd3bdf 73 if( debug_uart3 ) pc.printf("0");
Cola 21:0bd688722e81 74 flood_cnt++;
klauss 48:195c97f12e8e 75 if( tcp_session ){
klauss 48:195c97f12e8e 76 tcp_client.send_all( "0", strlen( "0" ) );
klauss 48:195c97f12e8e 77 }
Cola 21:0bd688722e81 78 }
Cola 21:0bd688722e81 79 int i;
Cola 21:0bd688722e81 80 int ok = 1;
Cola 21:0bd688722e81 81 uint8_t cmp;
Cola 21:0bd688722e81 82 for (i=0, cmp=cb_buffer[0]; (i<300) && (ok==1); i++, cmp++) {
Cola 21:0bd688722e81 83 if (i != 6) {
Cola 21:0bd688722e81 84 if (cb_buffer[i] != cmp) ok = 0;
Cola 21:0bd688722e81 85 }
Cola 21:0bd688722e81 86 }
klauss 48:195c97f12e8e 87 if( ok ){
klauss 100:09a23fcd3bdf 88 if( debug_uart3 ) pc.printf("+");
klauss 48:195c97f12e8e 89 if( tcp_session ){
klauss 48:195c97f12e8e 90 tcp_client.send_all( "+", strlen( "+" ) );
klauss 48:195c97f12e8e 91 }
klauss 48:195c97f12e8e 92 }else{
klauss 100:09a23fcd3bdf 93 if( debug_uart3 ) pc.printf("%02x",cb_buffer[0] );
klauss 100:09a23fcd3bdf 94 if( debug_uart3 ) pc.printf("#");
klauss 100:09a23fcd3bdf 95 if( debug_uart3 ) pc.printf("\n\r");
klauss 48:195c97f12e8e 96 if( tcp_session ){
klauss 48:195c97f12e8e 97 char tmp[ 16 ];
klauss 48:195c97f12e8e 98 sprintf( tmp, "%02x#\n\r", cb_buffer[ 0 ] );
klauss 48:195c97f12e8e 99 tcp_client.send_all( tmp, strlen( tmp ) );
klauss 48:195c97f12e8e 100 }
klauss 48:195c97f12e8e 101 for( int i = 0; i < 300 ; i++ ){
klauss 100:09a23fcd3bdf 102 if( debug_uart3 ) pc.printf("%x", cb_buffer[ i ]);
klauss 48:195c97f12e8e 103 if( tcp_session ){
klauss 48:195c97f12e8e 104 char tmp[ 16 ];
klauss 48:195c97f12e8e 105 sprintf( tmp, "%x", cb_buffer[ i ] );
klauss 48:195c97f12e8e 106 tcp_client.send_all( tmp, strlen( tmp ) );
klauss 48:195c97f12e8e 107 }
klauss 48:195c97f12e8e 108 }
Cola 21:0bd688722e81 109 }
Cola 21:0bd688722e81 110 }
Cola 21:0bd688722e81 111 return( NULL );
Cola 21:0bd688722e81 112 }
Cola 21:0bd688722e81 113
klauss 0:4d17cd9c8f9d 114 uint16_t cc = ( uint16_t )cb_buffer[ 4 ] << 8 | cb_buffer[ 5 ];
klauss 0:4d17cd9c8f9d 115
klauss 78:1353744f01e1 116 uint16_t cc_calculated = __checksum__( cb_buffer, __CB_BUFFER_SIZE__ );
klauss 78:1353744f01e1 117
klauss 78:1353744f01e1 118 if( cc != cc_calculated ){
klauss 78:1353744f01e1 119 if( debug_cks_err ) send_msg( "Received PKG, but -- CKS ERROR: %d ( %d )", cc_calculated, cc );
klauss 78:1353744f01e1 120
klauss 78:1353744f01e1 121 if( cc_calculated == 30975 && cc == 0 ){
klauss 78:1353744f01e1 122 pkg_zero++;
klauss 78:1353744f01e1 123 }else{
Cola 20:2d6ab23956e5 124 pkg_ckserr++;
klauss 78:1353744f01e1 125 }
klauss 78:1353744f01e1 126 return( NULL );
klauss 0:4d17cd9c8f9d 127 }else{
Cola 20:2d6ab23956e5 128 pkg_cksok++;
klauss 0:4d17cd9c8f9d 129 e_msb = cb_buffer[ 0 ];
klauss 0:4d17cd9c8f9d 130 e_lsb = cb_buffer[ 1 ];
klauss 0:4d17cd9c8f9d 131 *ext = e_msb << 8 | e_lsb;
klauss 79:9bc12aa305a9 132
klauss 81:3656f00ab3db 133 //restriçao de controle para cbx malucos
klauss 81:3656f00ab3db 134 if( *ext < begin || *ext > end ){
klauss 81:3656f00ab3db 135 if( debug_out_of_range ) send_msg("Trying from %d", *ext );
klauss 79:9bc12aa305a9 136 out_of_range++;
klauss 79:9bc12aa305a9 137 return( NULL );
klauss 79:9bc12aa305a9 138 }
klauss 81:3656f00ab3db 139
klauss 98:43b45f26b430 140 //if(
klauss 98:43b45f26b430 141 //( ( cb_buffer[ 0 ] == cb_buffer[ 2 ] ) || ( cb_buffer[ 1 ] == cb_buffer[ 3 ] ) ) )
klauss 98:43b45f26b430 142 //debug_msg("[0](%u),[1](%u),[2](%u),[3](%u)", cb_buffer[ 0 ], cb_buffer[ 1 ], cb_buffer[ 2 ], cb_buffer[ 3 ] );
klauss 98:43b45f26b430 143
klauss 0:4d17cd9c8f9d 144 p_msb = cb_buffer[ 2 ];
klauss 0:4d17cd9c8f9d 145 p_lsb = cb_buffer[ 3 ];
klauss 0:4d17cd9c8f9d 146 *port = p_msb << 8 | p_lsb;
klauss 0:4d17cd9c8f9d 147
klauss 98:43b45f26b430 148 if( debug_port_match ) if( *ext == *port ) debug_msg("%u:%u", *ext, *port );
klauss 98:43b45f26b430 149
klauss 0:4d17cd9c8f9d 150 *type = cb_buffer[ 6 ];
klauss 98:43b45f26b430 151
klauss 98:43b45f26b430 152 if( ( ( *port < 5000 ) || ( *port >= ( 5000 + __MAX_CB_IN_A_BRANCH__ ) ) && ( *type == __TELEMETRY__ ) ) ) return NULL;
klauss 0:4d17cd9c8f9d 153
klauss 0:4d17cd9c8f9d 154 return( cb_buffer + __VZ_HEADER_OFFSET__ );
klauss 0:4d17cd9c8f9d 155 }
klauss 0:4d17cd9c8f9d 156 }
klauss 0:4d17cd9c8f9d 157 uint8_t * __build_cb_package__( int ext, int port, uint8_t type, char * cb_buffer, uint8_t seq_num, int length, uint8_t * pkg ){
klauss 0:4d17cd9c8f9d 158 pkg[ 0 ] = ( uint8_t )( ( ext & 0xFF00 ) >> 8 );
klauss 0:4d17cd9c8f9d 159 pkg[ 1 ] = ( uint8_t )( ext & 0x00FF );
klauss 0:4d17cd9c8f9d 160 pkg[ 2 ] = ( uint8_t )( ( port & 0xFF00 ) >> 8 );
klauss 0:4d17cd9c8f9d 161 pkg[ 3 ] = ( uint8_t )( port & 0x00FF );
klauss 0:4d17cd9c8f9d 162
klauss 0:4d17cd9c8f9d 163 pkg[ 6 ] = type;
klauss 0:4d17cd9c8f9d 164
klauss 0:4d17cd9c8f9d 165 size_t fill = 0x00;
klauss 0:4d17cd9c8f9d 166
klauss 0:4d17cd9c8f9d 167 if( type == __AUDIO__ ){
klauss 0:4d17cd9c8f9d 168 for( register int i = __VZ_HEADER_OFFSET__; i < length + __VZ_HEADER_OFFSET__; i++ )
klauss 0:4d17cd9c8f9d 169 pkg[ i ] = ( uint8_t )cb_buffer[ i - __VZ_HEADER_OFFSET__ ];
klauss 0:4d17cd9c8f9d 170 fill = length + __VZ_HEADER_OFFSET__;
klauss 0:4d17cd9c8f9d 171 }else if( type == __INVITE__ ){
klauss 0:4d17cd9c8f9d 172 pkg[ 7 ] = seq_num;
klauss 101:162c28286c29 173 print_clock( pkg + 8 );
klauss 92:92df17f538a8 174
klauss 0:4d17cd9c8f9d 175 pkg[ __TIMESLICE_PLACE__ ] = cb_buffer[ __TIMESLICE_PLACE__ ];
klauss 0:4d17cd9c8f9d 176 fill = __TIMESLICE_PLACE__ + 1;
klauss 0:4d17cd9c8f9d 177 }else if( type == __REGISTRY__ || type == __BOOT__ ){
klauss 0:4d17cd9c8f9d 178 pkg[ 7 ] = seq_num;
klauss 101:162c28286c29 179 print_clock( pkg + 8 );
klauss 92:92df17f538a8 180
klauss 0:4d17cd9c8f9d 181 fill = __VZ_HEADER_OFFSET__ + __CLOCK_SYNC_SIZE__ + __SEQ_NUM_SIZE__;
klauss 70:714c33487aae 182 }else if( type == __CB_BYE__ ){
klauss 0:4d17cd9c8f9d 183 pkg[ 7 ] = seq_num;
klauss 101:162c28286c29 184 print_clock( pkg + 8 );
klauss 92:92df17f538a8 185
klauss 0:4d17cd9c8f9d 186 pkg[ __TIMESLICE_PLACE__ ] = cb_buffer[ __TIMESLICE_PLACE__ ];
klauss 0:4d17cd9c8f9d 187 fill = __TIMESLICE_PLACE__ + 1;
klauss 67:cdedc64d9921 188 }else if( type == __PROMPT__ ){
klauss 101:162c28286c29 189 print_clock( pkg + 8 );
klauss 92:92df17f538a8 190
Cola 21:0bd688722e81 191 xmemcpy((pkg+7), (uint8_t*)cb_buffer, 293);
klauss 67:cdedc64d9921 192 //FIXME isso forca qualquer cmd ter < 100 chars
Cola 21:0bd688722e81 193 fill = 100;
klauss 67:cdedc64d9921 194 }else if( type == __TELEMETRY__ ){
klauss 4:de46f0d9b14d 195 pkg[ 7 ] = seq_num;
klauss 101:162c28286c29 196 print_clock( pkg + 8 );
klauss 92:92df17f538a8 197
klauss 4:de46f0d9b14d 198 pkg[ __TIMESLICE_PLACE__ ] = cb_buffer[ __TIMESLICE_PLACE__ ];
klauss 4:de46f0d9b14d 199 fill = __TIMESLICE_PLACE__ + 1;
klauss 67:cdedc64d9921 200 }else if( type == __BOOTLOADER_CBX__ ){
klauss 67:cdedc64d9921 201 pkg[ 7 ] = seq_num;
klauss 101:162c28286c29 202 print_clock( pkg + 8 );
klauss 92:92df17f538a8 203
klauss 67:cdedc64d9921 204 fill = __VZ_HEADER_OFFSET__ + __CLOCK_SYNC_SIZE__ + __SEQ_NUM_SIZE__;
klauss 67:cdedc64d9921 205 }else{
klauss 67:cdedc64d9921 206 fill = __VZ_HEADER_OFFSET__;
klauss 0:4d17cd9c8f9d 207 }
klauss 0:4d17cd9c8f9d 208
klauss 67:cdedc64d9921 209 for( register uint16_t i = fill; i < __CB_BUFFER_SIZE__; i++ ) pkg[ i ] = 0x00;
klauss 0:4d17cd9c8f9d 210
klauss 100:09a23fcd3bdf 211 pkg[ __CB_BUFFER_SIZE__ - 4 ] = 0x5a;
klauss 100:09a23fcd3bdf 212 pkg[ __CB_BUFFER_SIZE__ - 3 ] = 0x56;
klauss 100:09a23fcd3bdf 213 pkg[ __CB_BUFFER_SIZE__ - 2 ] = 0x5a;
klauss 100:09a23fcd3bdf 214 pkg[ __CB_BUFFER_SIZE__ - 1 ] = 0xe1;
klauss 100:09a23fcd3bdf 215
klauss 100:09a23fcd3bdf 216 uint16_t cc = __checksum__( pkg, __CB_BUFFER_SIZE__ );
klauss 0:4d17cd9c8f9d 217 pkg[ 4 ] =( uint8_t )( ( cc & 0xFF00 ) >> 8) ;
klauss 0:4d17cd9c8f9d 218 pkg[ 5 ] =( uint8_t )( cc & 0x00FF );
klauss 0:4d17cd9c8f9d 219
klauss 0:4d17cd9c8f9d 220 return pkg;
klauss 0:4d17cd9c8f9d 221 }
klauss 0:4d17cd9c8f9d 222
klauss 0:4d17cd9c8f9d 223 uint16_t __checksum__( uint8_t * buffer, size_t length ){
klauss 70:714c33487aae 224 if( !buffer ) return( 0 );
klauss 0:4d17cd9c8f9d 225 uint16_t cc = 0x00;
klauss 0:4d17cd9c8f9d 226 buffer[ 4 ] = buffer[ 5 ] = 0x5a;
klauss 0:4d17cd9c8f9d 227 for( register int i = 0; i < length; i++ ){
klauss 0:4d17cd9c8f9d 228 cc += buffer[ i ];
klauss 0:4d17cd9c8f9d 229 if( cc & BIT15 ){
klauss 0:4d17cd9c8f9d 230 cc <<= 1;
klauss 0:4d17cd9c8f9d 231 cc |= BIT0;
klauss 0:4d17cd9c8f9d 232 }else{ cc <<= BIT0; }
klauss 0:4d17cd9c8f9d 233 }
klauss 0:4d17cd9c8f9d 234 cc ^= 0xffff;
klauss 0:4d17cd9c8f9d 235 return cc;
klauss 0:4d17cd9c8f9d 236 }
klauss 0:4d17cd9c8f9d 237
klauss 101:162c28286c29 238 void print_clock( uint8_t * buffer )
klauss 101:162c28286c29 239 {
klauss 101:162c28286c29 240 if( buffer != NULL )
klauss 101:162c28286c29 241 {
klauss 101:162c28286c29 242 struct tm tmp_tm, * result_tm;
klauss 0:4d17cd9c8f9d 243
klauss 101:162c28286c29 244 if( sizeof( time_t ) != sizeof( long ) )
klauss 101:162c28286c29 245 debug_msg("sizeof( time_t ) : %lu -- sizeof( long int ) : %lu\n", sizeof( time_t ), sizeof( long ) );
klauss 101:162c28286c29 246
klauss 101:162c28286c29 247 debug_msg("current_time : %lu\t", current_time );
klauss 101:162c28286c29 248
klauss 101:162c28286c29 249 if( current_time != 0 )
klauss 101:162c28286c29 250 {
klauss 101:162c28286c29 251 result_tm = localtime_r( ( const time_t *)&current_time, ( struct tm * )&tmp_tm );
klauss 101:162c28286c29 252 if (result_tm )
klauss 101:162c28286c29 253 {
klauss 101:162c28286c29 254 char formated_time[ 16 ];
klauss 101:162c28286c29 255 size_t formated_nbytes = strftime( formated_time, sizeof( formated_time ), "%Y%m%d%H%M%S", result_tm );
klauss 101:162c28286c29 256 debug_msg("clock() : %s\n", formated_time );
klauss 101:162c28286c29 257 if( formated_nbytes != __CLOCK_SYNC_SIZE__ ) debug_msg("( %lu )\n", formated_nbytes );
klauss 101:162c28286c29 258 for( register int i = 0; i < __CLOCK_SYNC_SIZE__; i++ ) buffer[ i ] = formated_time[ i ];
klauss 101:162c28286c29 259 }
klauss 101:162c28286c29 260 else
klauss 101:162c28286c29 261 {
klauss 101:162c28286c29 262 for( register int i = 0; i < __CLOCK_SYNC_SIZE__; i++ ) buffer[ i ] = 0xfa;
klauss 101:162c28286c29 263 }
klauss 101:162c28286c29 264 }
klauss 101:162c28286c29 265 else
klauss 101:162c28286c29 266 {
klauss 101:162c28286c29 267 for( register int i = 0; i < __CLOCK_SYNC_SIZE__; i++ ) buffer[ i ] = 0xab;
klauss 101:162c28286c29 268 }
klauss 101:162c28286c29 269 }
klauss 101:162c28286c29 270 }
klauss 101:162c28286c29 271
klauss 101:162c28286c29 272 int request_clock_to_server( void )
klauss 101:162c28286c29 273 {
klauss 101:162c28286c29 274 char clock_msg[ 16 ];
klauss 101:162c28286c29 275 strcpy( clock_msg, "request_time" );
klauss 101:162c28286c29 276 int send = clock_sock.sendTo( clock_server, clock_msg, strlen( clock_msg ) );
klauss 101:162c28286c29 277 return send;
klauss 101:162c28286c29 278 }
klauss 101:162c28286c29 279
klauss 101:162c28286c29 280 int check_clock( void )
klauss 101:162c28286c29 281 {
klauss 101:162c28286c29 282 if( external_time.read() > EXTERNAL_TIME_REQUEST_WAIT_SECONDS )
klauss 101:162c28286c29 283 {
klauss 101:162c28286c29 284 external_time.reset();
klauss 101:162c28286c29 285 return request_clock_to_server();
klauss 101:162c28286c29 286 }
klauss 101:162c28286c29 287 else
klauss 101:162c28286c29 288 {
klauss 101:162c28286c29 289 // nro arbitrario maior que strlen( request_time )
klauss 101:162c28286c29 290 return 0x30;
klauss 101:162c28286c29 291 }
klauss 101:162c28286c29 292 }
klauss 101:162c28286c29 293
klauss 101:162c28286c29 294 int update_clock( void )
klauss 101:162c28286c29 295 {
klauss 101:162c28286c29 296 // rcv
klauss 101:162c28286c29 297 return 0;
klauss 0:4d17cd9c8f9d 298 }