Modularizando o src
Dependencies: EALib EthernetInterface_vz mbed-rtos mbed
Fork of header_main_colinas_V0-20-09-14 by
vz_protocol.cpp
- Committer:
- klauss
- Date:
- 2015-01-10
- Revision:
- 92:92df17f538a8
- Parent:
- 89:0fe315117b00
- Child:
- 98:43b45f26b430
File content as of revision 92:92df17f538a8:
#include "vz_protocol.h" uint32_t pkg_ckserr = 0; uint32_t pkg_zero = 0; uint32_t pkg_cksok = 0; int begin = 0; int end = 0; void init_ranges( void ){ FILE * begin_ext = fopen( "/qspi/minext.txt", "r" ); if( begin_ext == NULL ){ if( debug_out_of_range ) debug_msg("Failed to open /qspi/minext.txt" ); begin = MIN_EXT; }else{ char inner_tmp[ 20 ]; if( fread( (void *)inner_tmp, 1, 20, begin_ext ) > 0 ){ begin = atoi( inner_tmp ); if( debug_out_of_range ) debug_msg("Ext Min %d", begin ); }else{ if( debug_out_of_range ) debug_msg("Failed to read /qspi/minext.txt" ); begin = MIN_EXT; } } fclose( begin_ext ); FILE * end_ext = fopen( "/qspi/maxext.txt", "r" ); if( end_ext == NULL ){ if( debug_out_of_range ) debug_msg("Failed to open /qspi/maxext.txt" ); end = MAX_EXT; }else{ char inner_tmp[ 20 ]; if( fread( (void *)inner_tmp, 1, 20, end_ext ) > 0 ){ end = atoi( inner_tmp ); if( debug_out_of_range ) debug_msg("Ext Min %d", end ); }else{ if( debug_out_of_range ) debug_msg("Failed to read /qspi/maxext.txt" ); begin = MAX_EXT; } } fclose( end_ext ); } uint8_t * __parse_vz_pkg__( int * ext, int * port, volatile uint8_t * type, uint8_t * cb_buffer ){ uint8_t p_lsb, p_msb; uint8_t e_lsb, e_msb; if( ( ext && port && type && cb_buffer ) == NULL ) return( NULL ); if( cb_buffer[ 6 ] == __FLOOD__ ){ flood_counter++; static uint8_t flood_cnt = 0; static uint8_t first_run_flag = 0; static Timer t; if (first_run_flag == 0) { flood_cnt = cb_buffer[0]; first_run_flag++; t.start(); } else { if (cb_buffer[0] == 0x00){ pc.printf("%d", t.read_us()); if( tcp_session ){ char tmp[ 16 ]; sprintf( tmp, "%d", t.read_us() ); tcp_client.send_all( tmp, strlen( tmp ) ); } } flood_cnt++; while (flood_cnt != cb_buffer[0]) { pc.printf("0"); flood_cnt++; if( tcp_session ){ tcp_client.send_all( "0", strlen( "0" ) ); } } int i; int ok = 1; uint8_t cmp; for (i=0, cmp=cb_buffer[0]; (i<300) && (ok==1); i++, cmp++) { if (i != 6) { if (cb_buffer[i] != cmp) ok = 0; } } if( ok ){ pc.printf("+"); if( tcp_session ){ tcp_client.send_all( "+", strlen( "+" ) ); } }else{ pc.printf("%02x",cb_buffer[0] ); pc.printf("#"); pc.printf("\n\r"); if( tcp_session ){ char tmp[ 16 ]; sprintf( tmp, "%02x#\n\r", cb_buffer[ 0 ] ); tcp_client.send_all( tmp, strlen( tmp ) ); } for( int i = 0; i < 300 ; i++ ){ pc.printf("%x", cb_buffer[ i ]); if( tcp_session ){ char tmp[ 16 ]; sprintf( tmp, "%x", cb_buffer[ i ] ); tcp_client.send_all( tmp, strlen( tmp ) ); } } } } return( NULL ); } uint16_t cc = ( uint16_t )cb_buffer[ 4 ] << 8 | cb_buffer[ 5 ]; uint16_t cc_calculated = __checksum__( cb_buffer, __CB_BUFFER_SIZE__ ); if( cc != cc_calculated ){ if( debug_cks_err ) send_msg( "Received PKG, but -- CKS ERROR: %d ( %d )", cc_calculated, cc ); if( cc_calculated == 30975 && cc == 0 ){ pkg_zero++; }else{ pkg_ckserr++; } return( NULL ); }else{ pkg_cksok++; e_msb = cb_buffer[ 0 ]; e_lsb = cb_buffer[ 1 ]; *ext = e_msb << 8 | e_lsb; //restriçao de controle para cbx malucos if( *ext < begin || *ext > end ){ if( debug_out_of_range ) send_msg("Trying from %d", *ext ); out_of_range++; return( NULL ); } p_msb = cb_buffer[ 2 ]; p_lsb = cb_buffer[ 3 ]; *port = p_msb << 8 | p_lsb; *type = cb_buffer[ 6 ]; return( cb_buffer + __VZ_HEADER_OFFSET__ ); } } uint8_t * __build_cb_package__( int ext, int port, uint8_t type, char * cb_buffer, uint8_t seq_num, int length, uint8_t * pkg ){ pkg[ 0 ] = ( uint8_t )( ( ext & 0xFF00 ) >> 8 ); pkg[ 1 ] = ( uint8_t )( ext & 0x00FF ); pkg[ 2 ] = ( uint8_t )( ( port & 0xFF00 ) >> 8 ); pkg[ 3 ] = ( uint8_t )( port & 0x00FF ); pkg[ 6 ] = type; size_t fill = 0x00; if( type == __AUDIO__ ){ for( register int i = __VZ_HEADER_OFFSET__; i < length + __VZ_HEADER_OFFSET__; i++ ) pkg[ i ] = ( uint8_t )cb_buffer[ i - __VZ_HEADER_OFFSET__ ]; fill = length + __VZ_HEADER_OFFSET__; }else if( type == __INVITE__ ){ pkg[ 7 ] = seq_num; __print_clock__( pkg + 8 ); pkg[ __TIMESLICE_PLACE__ ] = cb_buffer[ __TIMESLICE_PLACE__ ]; fill = __TIMESLICE_PLACE__ + 1; }else if( type == __REGISTRY__ || type == __BOOT__ ){ pkg[ 7 ] = seq_num; __print_clock__( pkg + 8 ); fill = __VZ_HEADER_OFFSET__ + __CLOCK_SYNC_SIZE__ + __SEQ_NUM_SIZE__; }else if( type == __CB_BYE__ ){ pkg[ 7 ] = seq_num; __print_clock__( pkg + 8 ); pkg[ __TIMESLICE_PLACE__ ] = cb_buffer[ __TIMESLICE_PLACE__ ]; fill = __TIMESLICE_PLACE__ + 1; }else if( type == __PROMPT__ ){ __print_clock__( pkg + 8 ); xmemcpy((pkg+7), (uint8_t*)cb_buffer, 293); //FIXME isso forca qualquer cmd ter < 100 chars fill = 100; }else if( type == __TELEMETRY__ ){ pkg[ 7 ] = seq_num; __print_clock__( pkg + 8 ); pkg[ __TIMESLICE_PLACE__ ] = cb_buffer[ __TIMESLICE_PLACE__ ]; fill = __TIMESLICE_PLACE__ + 1; }else if( type == __BOOTLOADER_CBX__ ){ pkg[ 7 ] = seq_num; __print_clock__( pkg + 8 ); fill = __VZ_HEADER_OFFSET__ + __CLOCK_SYNC_SIZE__ + __SEQ_NUM_SIZE__; }else{ fill = __VZ_HEADER_OFFSET__; } for( register uint16_t i = fill; i < __CB_BUFFER_SIZE__; i++ ) pkg[ i ] = 0x00; uint16_t cc = __checksum__( pkg, 300 ); pkg[ 4 ] =( uint8_t )( ( cc & 0xFF00 ) >> 8) ; pkg[ 5 ] =( uint8_t )( cc & 0x00FF ); return pkg; } uint16_t __checksum__( uint8_t * buffer, size_t length ){ if( !buffer ) return( 0 ); uint16_t cc = 0x00; buffer[ 4 ] = buffer[ 5 ] = 0x5a; for( register int i = 0; i < length; i++ ){ cc += buffer[ i ]; if( cc & BIT15 ){ cc <<= 1; cc |= BIT0; }else{ cc <<= BIT0; } } cc ^= 0xffff; return cc; } void __print_clock__( uint8_t * buffer ){ //if( !buffer ) return; //int ntp_result = ntp.setTime( "200.192.232.8", 123, 3 ); //led2 = !led2; //struct tm ts; //int ntp_result = ntp.setTime( "200.192.232.8" ); //int ntp_result = ntp.setTime( "200.192.232.8", 123, 3 ); //if( ntp_result == 0 ){ // time_t seconds; // seconds = time(NULL); // time( &seconds ); // ts = *localtime( &seconds ); //} //int ano = ts.tm_year + 1900; //int mes = ts.tm_mon + 1; //int dia = ts.tm_mday; //int hora = ts.tm_hour - 3; //int min = ts.tm_min; //int sec = ts.tm_sec; //buffer[ 0 ] = ano / 1000; //ano -= buffer[ 0 ] * 1000; //buffer[ 1 ] = ano / 100; //ano -= buffer[ 1 ]* 100; //buffer[ 2 ] = ano / 10; //ano -= buffer[ 2 ] * 10; //buffer[ 3 ] = ano; //buffer[ 4 ] = mes / 10; //buffer[ 5 ] = mes % 10; //buffer[ 6 ] = dia / 10; //buffer[ 7 ] = dia % 10; //buffer[ 8 ] = hora / 10; //buffer[ 9 ] = hora % 10; //buffer[ 10 ] = min / 10; //buffer[ 11 ] = min % 10; //buffer[ 12 ] = sec / 10; //buffer[ 13 ] = sec % 10; /* convertendo pro ascii do nro */ for( register int i = 0; i < 14; i++ ) buffer[ i ] = 0xab; //led4 = !led4; }