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@102:98c7155e8bea, 2015-02-19 (annotated)

Committer:
klauss
Date:
Thu Feb 19 14:31:42 2015 +0000
Revision:
102:98c7155e8bea
Parent:
101:162c28286c29
Child:
105:a930035b6556
implementado correcoes de ;   - tamanho de variaveis usadas no cks e no stats;   - limapando o buffer de envio de cmd para os cbx, usando o delimitador de string \r ( oxod )

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