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@126:1f90756250fb, 2015-05-20 (annotated)

Committer:
klauss
Date:
Wed May 20 19:50:31 2015 +0000
Revision:
126:1f90756250fb
Parent:
125:8ff4dc96ad58
Child:
132:05cd37f7e007
under validation

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 81:3656f00ab3db 8
klauss 126:1f90756250fb 9 int init_ranges ( void )
klauss 126:1f90756250fb 10 {
klauss 81:3656f00ab3db 11 FILE * begin_ext = fopen( "/qspi/minext.txt", "r" );
klauss 81:3656f00ab3db 12 if( begin_ext == NULL ){
klauss 81:3656f00ab3db 13 if( debug_out_of_range ) debug_msg("Failed to open /qspi/minext.txt" );
klauss 81:3656f00ab3db 14 begin = MIN_EXT;
klauss 81:3656f00ab3db 15 }else{
klauss 81:3656f00ab3db 16 char inner_tmp[ 20 ];
klauss 81:3656f00ab3db 17 if( fread( (void *)inner_tmp, 1, 20, begin_ext ) > 0 ){
klauss 81:3656f00ab3db 18 begin = atoi( inner_tmp );
klauss 81:3656f00ab3db 19 if( debug_out_of_range ) debug_msg("Ext Min %d", begin );
klauss 81:3656f00ab3db 20 }else{
klauss 81:3656f00ab3db 21 if( debug_out_of_range ) debug_msg("Failed to read /qspi/minext.txt" );
klauss 81:3656f00ab3db 22 begin = MIN_EXT;
klauss 81:3656f00ab3db 23 }
klauss 81:3656f00ab3db 24 }
klauss 81:3656f00ab3db 25 fclose( begin_ext );
klauss 81:3656f00ab3db 26
klauss 81:3656f00ab3db 27 FILE * end_ext = fopen( "/qspi/maxext.txt", "r" );
klauss 81:3656f00ab3db 28 if( end_ext == NULL ){
klauss 81:3656f00ab3db 29 if( debug_out_of_range ) debug_msg("Failed to open /qspi/maxext.txt" );
klauss 81:3656f00ab3db 30 end = MAX_EXT;
klauss 81:3656f00ab3db 31 }else{
klauss 81:3656f00ab3db 32 char inner_tmp[ 20 ];
klauss 81:3656f00ab3db 33 if( fread( (void *)inner_tmp, 1, 20, end_ext ) > 0 ){
klauss 81:3656f00ab3db 34 end = atoi( inner_tmp );
klauss 81:3656f00ab3db 35 if( debug_out_of_range ) debug_msg("Ext Min %d", end );
klauss 81:3656f00ab3db 36 }else{
klauss 81:3656f00ab3db 37 if( debug_out_of_range ) debug_msg("Failed to read /qspi/maxext.txt" );
klauss 81:3656f00ab3db 38 begin = MAX_EXT;
klauss 81:3656f00ab3db 39 }
klauss 81:3656f00ab3db 40 }
klauss 89:0fe315117b00 41 fclose( end_ext );
klauss 119:ee6a53069455 42
klauss 119:ee6a53069455 43 return ( 0 );
klauss 81:3656f00ab3db 44 }
Cola 20:2d6ab23956e5 45
klauss 126:1f90756250fb 46 uint8_t * parse_vz_pkg ( int * ext, int * port, volatile uint8_t * type, uint8_t * cb_buffer )
klauss 126:1f90756250fb 47 {
klauss 0:4d17cd9c8f9d 48 uint8_t e_lsb, e_msb;
klauss 126:1f90756250fb 49 uint8_t p_lsb, p_msb;
klauss 0:4d17cd9c8f9d 50
klauss 126:1f90756250fb 51 if ( ( ext and port and type and cb_buffer ) == NULL ) return ( NULL );
klauss 114:472502b31a12 52
klauss 119:ee6a53069455 53 //tratamento dos pacotes do tipo flood logo na chegada
klauss 119:ee6a53069455 54 {
klauss 126:1f90756250fb 55 if ( cb_buffer [ TYPE_PLACE ] == FLOOD )
klauss 126:1f90756250fb 56 {
klauss 119:ee6a53069455 57 flood_counter++;
klauss 119:ee6a53069455 58 static uint8_t flood_cnt = 0;
klauss 119:ee6a53069455 59 static uint8_t first_run_flag = 0;
klauss 119:ee6a53069455 60 static Timer t;
klauss 119:ee6a53069455 61 if (first_run_flag == 0) {
klauss 119:ee6a53069455 62 flood_cnt = cb_buffer[0];
klauss 119:ee6a53069455 63 first_run_flag++;
klauss 119:ee6a53069455 64 t.start();
klauss 119:ee6a53069455 65 } else {
klauss 119:ee6a53069455 66 if (cb_buffer[0] == 0x00){
klauss 119:ee6a53069455 67 if( debug_uart3 ) pc.printf("%d", t.read_us());
klauss 126:1f90756250fb 68 if( tcp_session and !udp_query ){
klauss 48:195c97f12e8e 69 char tmp[ 16 ];
klauss 119:ee6a53069455 70 sprintf( tmp, "%d", t.read_us() );
klauss 48:195c97f12e8e 71 tcp_client.send_all( tmp, strlen( tmp ) );
klauss 48:195c97f12e8e 72 }
klauss 48:195c97f12e8e 73 }
klauss 119:ee6a53069455 74 flood_cnt++;
klauss 119:ee6a53069455 75 while (flood_cnt != cb_buffer[0]) {
klauss 119:ee6a53069455 76 if( debug_uart3 ) pc.printf("0");
klauss 119:ee6a53069455 77 flood_cnt++;
klauss 126:1f90756250fb 78 if( tcp_session and !udp_query ){
klauss 119:ee6a53069455 79 tcp_client.send_all( "0", strlen( "0" ) );
klauss 119:ee6a53069455 80 }
klauss 119:ee6a53069455 81 }
klauss 119:ee6a53069455 82 int i;
klauss 119:ee6a53069455 83 int ok = 1;
klauss 119:ee6a53069455 84 uint8_t cmp;
klauss 126:1f90756250fb 85 for (i=0, cmp=cb_buffer[0]; (i<300) and (ok==1); i++, cmp++) {
klauss 119:ee6a53069455 86 if (i != 6) {
klauss 119:ee6a53069455 87 if (cb_buffer[i] != cmp) ok = 0;
klauss 119:ee6a53069455 88 }
klauss 119:ee6a53069455 89 }
klauss 119:ee6a53069455 90 if( ok ){
klauss 119:ee6a53069455 91 if( debug_uart3 ) pc.printf("+");
klauss 126:1f90756250fb 92 if( tcp_session and !udp_query ){
klauss 119:ee6a53069455 93 tcp_client.send_all( "+", strlen( "+" ) );
klauss 119:ee6a53069455 94 }
klauss 119:ee6a53069455 95 }else{
klauss 119:ee6a53069455 96 if( debug_uart3 ) pc.printf("%02x",cb_buffer[0] );
klauss 119:ee6a53069455 97 if( debug_uart3 ) pc.printf("#");
klauss 119:ee6a53069455 98 if( debug_uart3 ) pc.printf("\n\r");
klauss 126:1f90756250fb 99 if( tcp_session and !udp_query ){
klauss 119:ee6a53069455 100 char tmp[ 16 ];
klauss 119:ee6a53069455 101 sprintf( tmp, "%02x#\n\r", cb_buffer[ 0 ] );
klauss 119:ee6a53069455 102 tcp_client.send_all( tmp, strlen( tmp ) );
klauss 119:ee6a53069455 103 }
klauss 119:ee6a53069455 104 for( int i = 0; i < 300 ; i++ ){
klauss 119:ee6a53069455 105 if( debug_uart3 ) pc.printf("%x", cb_buffer[ i ]);
klauss 126:1f90756250fb 106 if( tcp_session and !udp_query ){
klauss 119:ee6a53069455 107 char tmp[ 16 ];
klauss 119:ee6a53069455 108 sprintf( tmp, "%x", cb_buffer[ i ] );
klauss 119:ee6a53069455 109 tcp_client.send_all( tmp, strlen( tmp ) );
klauss 119:ee6a53069455 110 }
klauss 119:ee6a53069455 111 }
klauss 119:ee6a53069455 112 }
Cola 21:0bd688722e81 113 }
klauss 119:ee6a53069455 114 return( NULL );
Cola 21:0bd688722e81 115 }
klauss 119:ee6a53069455 116 }//fim tratamento do flood
Cola 21:0bd688722e81 117
klauss 126:1f90756250fb 118 uint16_t cc = ( uint16_t )cb_buffer[ 4 ] << 8 bitor cb_buffer[ 5 ];
klauss 0:4d17cd9c8f9d 119
klauss 126:1f90756250fb 120 uint16_t cc_calculated = vz_checksum ( cb_buffer, CB_BUFFER_SIZE );
klauss 78:1353744f01e1 121
klauss 126:1f90756250fb 122 if ( cc != cc_calculated )
klauss 124:c1b6c893e1c3 123 {
klauss 126:1f90756250fb 124 if ( debug_cks_err ) send_msg ( "Received PKG, but -- CKS ERROR: %d ( %d )", cc_calculated, cc );
klauss 78:1353744f01e1 125
klauss 126:1f90756250fb 126 if ( cc_calculated == 30975 and cc == 0 ){
klauss 78:1353744f01e1 127 pkg_zero++;
klauss 78:1353744f01e1 128 }else{
Cola 20:2d6ab23956e5 129 pkg_ckserr++;
klauss 78:1353744f01e1 130 }
klauss 78:1353744f01e1 131 return( NULL );
klauss 124:c1b6c893e1c3 132 }
klauss 124:c1b6c893e1c3 133 else
klauss 124:c1b6c893e1c3 134 {
Cola 20:2d6ab23956e5 135 pkg_cksok++;
klauss 0:4d17cd9c8f9d 136 e_msb = cb_buffer[ 0 ];
klauss 0:4d17cd9c8f9d 137 e_lsb = cb_buffer[ 1 ];
klauss 126:1f90756250fb 138 *ext = ( (uint16_t )e_msb ) << 8 bitor e_lsb;
klauss 79:9bc12aa305a9 139
klauss 81:3656f00ab3db 140 //restriçao de controle para cbx malucos
klauss 126:1f90756250fb 141 if ( *ext < begin or *ext > end )
klauss 126:1f90756250fb 142 {
klauss 126:1f90756250fb 143 if ( debug_out_of_range ) send_msg ("Trying from %d", *ext );
klauss 79:9bc12aa305a9 144 out_of_range++;
klauss 126:1f90756250fb 145 return ( NULL );
klauss 79:9bc12aa305a9 146 }
klauss 81:3656f00ab3db 147
klauss 0:4d17cd9c8f9d 148 p_msb = cb_buffer[ 2 ];
klauss 0:4d17cd9c8f9d 149 p_lsb = cb_buffer[ 3 ];
klauss 126:1f90756250fb 150 *port = ( (uint16_t )p_msb ) << 8 bitor p_lsb;
klauss 98:43b45f26b430 151
klauss 126:1f90756250fb 152 *type = cb_buffer [ TYPE_PLACE ];
klauss 119:ee6a53069455 153
klauss 119:ee6a53069455 154 return( cb_buffer + VZ_HEADER_OFFSET );
klauss 0:4d17cd9c8f9d 155 }
klauss 0:4d17cd9c8f9d 156 }
klauss 126:1f90756250fb 157
klauss 126:1f90756250fb 158 uint8_t * build_cb_package ( const int ext, const int port, const uint8_t type, const char * cb_buffer, const uint8_t seq_num, const int length, uint8_t * pkg )
klauss 121:ee02790d00b7 159 {
klauss 119:ee6a53069455 160 //checa se o fuffer de src e dst dos dados estao alocados
klauss 126:1f90756250fb 161 if( ( cb_buffer == NULL ) or ( pkg == NULL ) ) return NULL;
klauss 119:ee6a53069455 162
klauss 119:ee6a53069455 163 //apaga as posicoes de memoria onde serah montado o pacote
klauss 119:ee6a53069455 164 for( register int i = 0; i < CB_BUFFER_SIZE; i++ ) pkg[ i ] = 0;
klauss 119:ee6a53069455 165
klauss 119:ee6a53069455 166 //coloca ramal ( MSB ), ramal ( LSB ), porta ( MSB ), porta ( LSB ) e tipo nas posicoes destino
klauss 126:1f90756250fb 167 pkg[ 0 ] = ( uint8_t )( ( ext bitand 0xFF00 ) >> 8 );
klauss 126:1f90756250fb 168 pkg[ 1 ] = ( uint8_t )( ext bitand 0x00FF );
klauss 126:1f90756250fb 169 pkg[ 2 ] = ( uint8_t )( ( port bitand 0xFF00 ) >> 8 );
klauss 126:1f90756250fb 170 pkg[ 3 ] = ( uint8_t )( port bitand 0x00FF );
klauss 0:4d17cd9c8f9d 171
klauss 125:8ff4dc96ad58 172 pkg[ TYPE_PLACE ] = type;
klauss 0:4d17cd9c8f9d 173
klauss 119:ee6a53069455 174 //preenche os dados de acordo com o tipo do pacote transmitido
klauss 119:ee6a53069455 175 size_t fill = VZ_HEADER_OFFSET;
klauss 119:ee6a53069455 176 switch( type )
klauss 119:ee6a53069455 177 {
klauss 119:ee6a53069455 178 case AUDIO :{
klauss 119:ee6a53069455 179 for( register int i = VZ_HEADER_OFFSET; i < length + VZ_HEADER_OFFSET; i++ )
klauss 119:ee6a53069455 180 pkg[ i ] = ( uint8_t )cb_buffer[ i - VZ_HEADER_OFFSET ];
klauss 119:ee6a53069455 181
klauss 119:ee6a53069455 182 fill = length + VZ_HEADER_OFFSET;
klauss 119:ee6a53069455 183 break;
klauss 119:ee6a53069455 184 }
klauss 119:ee6a53069455 185 case INVITE :{
klauss 119:ee6a53069455 186 pkg[ 7 ] = seq_num;
klauss 119:ee6a53069455 187 print_clock( pkg + 8 );
klauss 119:ee6a53069455 188 pkg[ TIMESLICE_PLACE ] = cb_buffer[ TIMESLICE_PLACE ];
klauss 119:ee6a53069455 189 fill = TIMESLICE_PLACE + 1;
klauss 119:ee6a53069455 190 break;
klauss 119:ee6a53069455 191 }
klauss 92:92df17f538a8 192
klauss 119:ee6a53069455 193 case REGISTRY :{
klauss 119:ee6a53069455 194 pkg[ 7 ] = seq_num;
klauss 119:ee6a53069455 195 print_clock( pkg + 8 );
klauss 119:ee6a53069455 196 fill = VZ_HEADER_OFFSET + CLOCK_SYNC_SIZE + SEQ_NUM_SIZE;
klauss 119:ee6a53069455 197 break;
klauss 119:ee6a53069455 198 }
klauss 119:ee6a53069455 199 case BOOT :{
klauss 119:ee6a53069455 200 pkg[ 7 ] = seq_num;
klauss 119:ee6a53069455 201 print_clock( pkg + 8 );
klauss 119:ee6a53069455 202 fill = VZ_HEADER_OFFSET + CLOCK_SYNC_SIZE + SEQ_NUM_SIZE;
klauss 119:ee6a53069455 203 break;
klauss 119:ee6a53069455 204 }
klauss 119:ee6a53069455 205 case CB_BYE :{
klauss 119:ee6a53069455 206 pkg[ 7 ] = seq_num;
klauss 119:ee6a53069455 207 print_clock( pkg + 8 );
klauss 119:ee6a53069455 208 pkg[ TIMESLICE_PLACE ] = cb_buffer[ TIMESLICE_PLACE ];
klauss 119:ee6a53069455 209 fill = TIMESLICE_PLACE + 1;
klauss 119:ee6a53069455 210 break;
klauss 119:ee6a53069455 211 }
klauss 119:ee6a53069455 212 case PROMPT :{
klauss 119:ee6a53069455 213 strcpy( ( char * )( pkg + VZ_HEADER_OFFSET ), cb_buffer );
klauss 119:ee6a53069455 214 fill = strlen( cb_buffer ) + VZ_HEADER_OFFSET;
klauss 119:ee6a53069455 215 break;
klauss 119:ee6a53069455 216 }
klauss 119:ee6a53069455 217 case TELEMETRY :{
klauss 119:ee6a53069455 218 pkg[ 7 ] = seq_num;
klauss 119:ee6a53069455 219 print_clock( pkg + 8 );
klauss 119:ee6a53069455 220 //FIXME a header manda pacotes de tele pro cbx ?
klauss 119:ee6a53069455 221 pkg[ TIMESLICE_PLACE ] = cb_buffer[ TIMESLICE_PLACE ];
klauss 119:ee6a53069455 222 fill = TIMESLICE_PLACE + 1;
klauss 119:ee6a53069455 223 break;
klauss 119:ee6a53069455 224 }
klauss 119:ee6a53069455 225 case BOOTLOADER_CBX :{
klauss 119:ee6a53069455 226 xmemcpy((pkg + 7),(uint8_t *)cb_buffer,length);
klauss 119:ee6a53069455 227 fill = VZ_HEADER_OFFSET + length;
klauss 119:ee6a53069455 228 break;
klauss 119:ee6a53069455 229 }
klauss 119:ee6a53069455 230 }//fim switch
klauss 0:4d17cd9c8f9d 231
klauss 119:ee6a53069455 232 //preenche o final do pacote com 0
klauss 119:ee6a53069455 233 for( register uint16_t i = fill; i < CB_BUFFER_SIZE; i++ ) pkg[ i ] = 0x00;
klauss 0:4d17cd9c8f9d 234
klauss 119:ee6a53069455 235 //colocando o terminador de pacotes estabelecido pelo protocolo
klauss 119:ee6a53069455 236 pkg[ CB_BUFFER_SIZE - 4 ] = 0x5a;
klauss 119:ee6a53069455 237 pkg[ CB_BUFFER_SIZE - 3 ] = 0x56;
klauss 119:ee6a53069455 238 pkg[ CB_BUFFER_SIZE - 2 ] = 0x5a;
klauss 119:ee6a53069455 239 pkg[ CB_BUFFER_SIZE - 1 ] = 0xe1;
klauss 100:09a23fcd3bdf 240
klauss 119:ee6a53069455 241 //calcula e preenche o checksum
klauss 119:ee6a53069455 242 uint16_t cc = vz_checksum( pkg, CB_BUFFER_SIZE );
klauss 126:1f90756250fb 243 pkg[ 4 ] =( uint8_t )( ( cc bitand 0xFF00 ) >> 8) ;
klauss 126:1f90756250fb 244 pkg[ 5 ] =( uint8_t )( cc bitand 0x00FF );
klauss 0:4d17cd9c8f9d 245
klauss 119:ee6a53069455 246 //retorna o ultimo paramentro recebido com o pacote montado.
klauss 0:4d17cd9c8f9d 247 return pkg;
klauss 0:4d17cd9c8f9d 248 }
klauss 0:4d17cd9c8f9d 249
klauss 119:ee6a53069455 250 uint16_t vz_checksum ( uint8_t * buffer, size_t length )
klauss 119:ee6a53069455 251 {
klauss 70:714c33487aae 252 if( !buffer ) return( 0 );
klauss 0:4d17cd9c8f9d 253 uint16_t cc = 0x00;
klauss 0:4d17cd9c8f9d 254 buffer[ 4 ] = buffer[ 5 ] = 0x5a;
klauss 0:4d17cd9c8f9d 255 for( register int i = 0; i < length; i++ ){
klauss 0:4d17cd9c8f9d 256 cc += buffer[ i ];
klauss 126:1f90756250fb 257 if( cc bitand BIT15 ){
klauss 0:4d17cd9c8f9d 258 cc <<= 1;
klauss 126:1f90756250fb 259 cc or_eq BIT0;
klauss 0:4d17cd9c8f9d 260 }else{ cc <<= BIT0; }
klauss 0:4d17cd9c8f9d 261 }
klauss 0:4d17cd9c8f9d 262 cc ^= 0xffff;
klauss 0:4d17cd9c8f9d 263 return cc;
klauss 122:480c44b0e205 264 }
klauss 122:480c44b0e205 265
klauss 122:480c44b0e205 266 void print_clock ( uint8_t * buffer )
klauss 122:480c44b0e205 267 {
klauss 122:480c44b0e205 268 if( buffer != NULL )
klauss 122:480c44b0e205 269 {
klauss 122:480c44b0e205 270 struct tm * result_tm;
klauss 122:480c44b0e205 271 if( sizeof( time_t ) != sizeof( long ) )
klauss 122:480c44b0e205 272 {
klauss 122:480c44b0e205 273 if ( debug_clock ) debug_msg("sizeof( time_t ) : %lu -- sizeof( long int ) : %lu\n", sizeof( time_t ), sizeof( long ) );
klauss 122:480c44b0e205 274 }
klauss 122:480c44b0e205 275
klauss 122:480c44b0e205 276 if ( debug_clock ) debug_msg("current_time : %lu\t", current_time );
klauss 122:480c44b0e205 277
klauss 122:480c44b0e205 278 if( current_time != 0 )
klauss 122:480c44b0e205 279 {
klauss 122:480c44b0e205 280 result_tm = localtime( ( const time_t *)&current_time );
klauss 122:480c44b0e205 281 if ( result_tm )
klauss 122:480c44b0e205 282 {
klauss 122:480c44b0e205 283 char formated_time[ 16 ];
klauss 122:480c44b0e205 284
klauss 122:480c44b0e205 285 /* Correcao "manual" do (GMT -3:00) */
klauss 122:480c44b0e205 286 result_tm->tm_hour -= 3;
klauss 122:480c44b0e205 287 if ( result_tm->tm_hour < 0 ) result_tm->tm_hour = 24 + result_tm->tm_hour;
klauss 122:480c44b0e205 288
klauss 122:480c44b0e205 289 size_t formated_nbytes = strftime( formated_time, sizeof( formated_time ), "%Y%m%d%H%M%S", result_tm );
klauss 122:480c44b0e205 290
klauss 122:480c44b0e205 291 if ( debug_clock ) debug_msg("clock() : %s\n", formated_time );
klauss 122:480c44b0e205 292
klauss 122:480c44b0e205 293 if( formated_nbytes != CLOCK_SYNC_SIZE ) debug_msg("( %lu )\n", formated_nbytes );
klauss 122:480c44b0e205 294
klauss 122:480c44b0e205 295 for( register int i = 0; i < CLOCK_SYNC_SIZE; i++ ) buffer[ i ] = formated_time[ i ];
klauss 122:480c44b0e205 296 }
klauss 122:480c44b0e205 297 else
klauss 122:480c44b0e205 298 {
klauss 122:480c44b0e205 299 for( register int i = 0; i < CLOCK_SYNC_SIZE; i++ ) buffer[ i ] = 0xfa;
klauss 122:480c44b0e205 300 }
klauss 122:480c44b0e205 301 }
klauss 122:480c44b0e205 302 else
klauss 122:480c44b0e205 303 {
klauss 122:480c44b0e205 304 for( register int i = 0; i < CLOCK_SYNC_SIZE; i++ ) buffer[ i ] = 0xab;
klauss 122:480c44b0e205 305 }
klauss 122:480c44b0e205 306 }
klauss 0:4d17cd9c8f9d 307 }