Modularizando o src

Dependencies:   EALib EthernetInterface_vz mbed-rtos mbed

Fork of header_main_colinas_V0-20-09-14 by VZTECH

Committer:
klauss
Date:
Thu Jul 02 17:43:37 2015 +0000
Revision:
129:d73538fbc017
Parent:
128:3ae1c74773a8
Child:
130:850163037da5
pequenas altera??es em prints; corre??o na numera??o dos tipos "ACK"

Who changed what in which revision?

UserRevisionLine numberNew contents of line
klauss 121:ee02790d00b7 1 #include "main_app_functions.h"
klauss 121:ee02790d00b7 2
klauss 121:ee02790d00b7 3 inline void reset_leds() { led1 = led2 = 1; led3 = led4 = 0; }
klauss 121:ee02790d00b7 4
klauss 121:ee02790d00b7 5 int header_app_init ( void )
klauss 121:ee02790d00b7 6 {
klauss 121:ee02790d00b7 7
klauss 121:ee02790d00b7 8 send_msg ( "" );
klauss 121:ee02790d00b7 9
klauss 122:480c44b0e205 10 if ( debug_app_init ) send_msg ( "init_wdt() :: %s", ( init_wdt () == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 11
klauss 122:480c44b0e205 12 if ( debug_app_init ) send_msg ( "config_lpc() :: %s", ( config_lpc () == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 13
klauss 122:480c44b0e205 14 if ( debug_app_init ) send_msg ( "start_cpld() :: %s", ( start_cpld () == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 15
klauss 121:ee02790d00b7 16 if( sdram_init() == 1 ) {
klauss 121:ee02790d00b7 17 send_msg("******* Failed to initialize SDRAM *******");
klauss 121:ee02790d00b7 18 return 1;
klauss 121:ee02790d00b7 19 } else {
klauss 121:ee02790d00b7 20 send_msg("******* Success to initialize SDRAM *******");
klauss 121:ee02790d00b7 21 }
klauss 121:ee02790d00b7 22
klauss 121:ee02790d00b7 23 int init_fsystem_ret = init_fsystem();
klauss 121:ee02790d00b7 24 if( init_fsystem_ret & BIT0 )
klauss 121:ee02790d00b7 25 {
klauss 121:ee02790d00b7 26 send_msg("******* File system configured!!*******");
klauss 121:ee02790d00b7 27 }
klauss 121:ee02790d00b7 28
klauss 121:ee02790d00b7 29 if( init_fsystem_ret & BIT1 )
klauss 121:ee02790d00b7 30 {
klauss 121:ee02790d00b7 31 send_msg("******* File System Ready *******");
klauss 121:ee02790d00b7 32 }
klauss 121:ee02790d00b7 33
klauss 121:ee02790d00b7 34 {
klauss 121:ee02790d00b7 35 char s[ 32 ];
klauss 121:ee02790d00b7 36 mbed_mac_address( s );
klauss 121:ee02790d00b7 37 send_msg( "::Mac::%02x:%02x:%02x:%02x:%02x:%02x:: ", s[0],s[1],s[2],s[3],s[4],s[5] );
klauss 121:ee02790d00b7 38 }
klauss 121:ee02790d00b7 39
klauss 126:1f90756250fb 40 eth_status = __init_eth__ ();
klauss 126:1f90756250fb 41 if ( eth_status )
klauss 126:1f90756250fb 42 {
klauss 121:ee02790d00b7 43 send_msg("******* Cannot connect to eth *******");
klauss 121:ee02790d00b7 44 } else {
klauss 121:ee02790d00b7 45 send_msg("******* Connection eth - ok *******");
klauss 121:ee02790d00b7 46 int init_prompt_eth_ret = init_prompt_eth();
klauss 121:ee02790d00b7 47
klauss 121:ee02790d00b7 48 if ( init_prompt_eth_ret == BIT0 ) send_msg("******* Prompt eth UDP Ready *******");
klauss 121:ee02790d00b7 49
klauss 121:ee02790d00b7 50 if ( init_prompt_eth_ret == BIT1 ) send_msg("******* Prompt eth TCP Ready *******");
klauss 121:ee02790d00b7 51
klauss 126:1f90756250fb 52 if ( debug_app_init ) send_msg ( "init_prompt_eth() :: %s", ( init_prompt_eth_ret == ( BIT0 bitor BIT1 ) ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 53
klauss 122:480c44b0e205 54 if ( debug_app_init ) send_msg ( "init_external_wdt() :: %s", ( init_external_wdt () == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 55
klauss 121:ee02790d00b7 56 if ( debug_app_init ) send_msg ( "init_bl() :: %s", ( init_bl() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 57
klauss 121:ee02790d00b7 58 if ( debug_app_init ) send_msg ( "init_clock () :: %s", ( init_clock () == 0 ) ? "Ok" : "Failure" );
klauss 128:3ae1c74773a8 59
klauss 128:3ae1c74773a8 60 if ( debug_app_init ) send_msg ( "init_pwr_src () :: %s", ( init_pwr_src () == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 61 }
klauss 121:ee02790d00b7 62
klauss 121:ee02790d00b7 63 sync_timer.start();
klauss 121:ee02790d00b7 64
klauss 121:ee02790d00b7 65 led_sync_timer.start();
klauss 121:ee02790d00b7 66
klauss 121:ee02790d00b7 67 ext = 0;
klauss 121:ee02790d00b7 68
klauss 121:ee02790d00b7 69 port = 0;
klauss 121:ee02790d00b7 70
klauss 121:ee02790d00b7 71 buffer_from_cb_ptr = ( uint8_t * )RXBuffer;
klauss 121:ee02790d00b7 72
klauss 121:ee02790d00b7 73 data = NULL;
klauss 121:ee02790d00b7 74
klauss 121:ee02790d00b7 75 type = DO_NOTHING;
klauss 121:ee02790d00b7 76
klauss 121:ee02790d00b7 77 v_cb = new Vector();
klauss 121:ee02790d00b7 78 if( v_cb == NULL ) {
klauss 121:ee02790d00b7 79 while( v_cb == NULL ) {
klauss 121:ee02790d00b7 80 Vector * v_cb = new Vector();
klauss 121:ee02790d00b7 81 if( sync_timer.read() > 5 ) {
klauss 121:ee02790d00b7 82 if( debug_memory ) send_msg("Call_Box vector allocation fail");
klauss 121:ee02790d00b7 83 sync_timer.reset();
klauss 121:ee02790d00b7 84 }
klauss 121:ee02790d00b7 85 }
klauss 121:ee02790d00b7 86 }
klauss 121:ee02790d00b7 87
klauss 126:1f90756250fb 88 if ( debug_app_init ) send_msg ( "v_cb :: %s", ( v_cb not_eq NULL ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 89
klauss 121:ee02790d00b7 90 v_call = new Vector();
klauss 121:ee02790d00b7 91 if( v_call == NULL ) {
klauss 121:ee02790d00b7 92 while( v_call == NULL ) {
klauss 121:ee02790d00b7 93 Vector * v_call = new Vector();
klauss 121:ee02790d00b7 94 if( sync_timer.read() > 5 ) {
klauss 121:ee02790d00b7 95 if( debug_memory ) send_msg("Call vector allocation fail");
klauss 121:ee02790d00b7 96 sync_timer.reset();
klauss 121:ee02790d00b7 97 }
klauss 121:ee02790d00b7 98 }
klauss 121:ee02790d00b7 99 }
klauss 121:ee02790d00b7 100
klauss 126:1f90756250fb 101 if ( debug_app_init ) send_msg ( "v_call :: %s", ( v_call not_eq NULL ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 102
klauss 121:ee02790d00b7 103 ts = new Timeslice();
klauss 121:ee02790d00b7 104 if( ts == NULL ) {
klauss 121:ee02790d00b7 105 memory_is_over = true;
klauss 121:ee02790d00b7 106 if( debug_memory ) send_msg("TS allocation fail");
klauss 121:ee02790d00b7 107 }
klauss 121:ee02790d00b7 108
klauss 126:1f90756250fb 109 if ( debug_app_init ) send_msg ( "TS :: %s", ( ts not_eq NULL ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 110
klauss 121:ee02790d00b7 111 for( register uint16_t i = 0; i < CB_BUFFER_SIZE; i++ ) {
klauss 121:ee02790d00b7 112 cb_rx_buffer[ i ] = 0;
klauss 121:ee02790d00b7 113 cb_tx_buffer[ i ] = 0;
klauss 121:ee02790d00b7 114 }
klauss 121:ee02790d00b7 115
klauss 121:ee02790d00b7 116 reset_leds();
klauss 121:ee02790d00b7 117
klauss 121:ee02790d00b7 118 udp_timer.start();
klauss 121:ee02790d00b7 119
klauss 121:ee02790d00b7 120 if ( debug_app_init ) send_msg ( "init_fw_handler() :: %s", ( init_fw_handler() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 121
klauss 121:ee02790d00b7 122 if ( debug_app_init ) send_msg ( "init_ranges() :: %s", ( init_ranges() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 123
klauss 121:ee02790d00b7 124 if ( debug_app_init ) send_msg ( "init_refresh() :: %s", ( init_refresh() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 125
klauss 121:ee02790d00b7 126 if ( debug_app_init ) send_msg ( "init_sync_refresh() :: %s", ( init_sync_refresh() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 127
klauss 121:ee02790d00b7 128 count = 0;
klauss 121:ee02790d00b7 129
klauss 121:ee02790d00b7 130 max_registered_cbx = 0;
klauss 121:ee02790d00b7 131
klauss 121:ee02790d00b7 132 wake_all = false;
klauss 121:ee02790d00b7 133
klauss 121:ee02790d00b7 134 pkg_wdt = RX_CB_IDLE;
klauss 121:ee02790d00b7 135
klauss 121:ee02790d00b7 136 eth_wdt = ETH_CONNECT_TIMEOUT;
klauss 121:ee02790d00b7 137
klauss 121:ee02790d00b7 138 invite_retry_timer.start();
klauss 121:ee02790d00b7 139
klauss 121:ee02790d00b7 140 if ( debug_app_init ) send_msg ( "hex_init() :: %s", ( hex_init() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 141
klauss 121:ee02790d00b7 142 reset_leds();
klauss 121:ee02790d00b7 143
klauss 121:ee02790d00b7 144 lpc_low_level_input_counter = 0;
klauss 121:ee02790d00b7 145
klauss 124:c1b6c893e1c3 146 if ( debug_app_init ) send_msg ( "init_hello () :: %s", ( init_hello () == 0 ) ? "Ok" : "Failure" );
klauss 124:c1b6c893e1c3 147
klauss 126:1f90756250fb 148 test_ts_timer.start ();
klauss 126:1f90756250fb 149
klauss 128:3ae1c74773a8 150 pwr_src_timer.start ();
klauss 128:3ae1c74773a8 151
klauss 121:ee02790d00b7 152 send_msg ( "" );
klauss 121:ee02790d00b7 153
klauss 121:ee02790d00b7 154 return ( 0 );
klauss 121:ee02790d00b7 155 }
klauss 121:ee02790d00b7 156
klauss 121:ee02790d00b7 157
klauss 121:ee02790d00b7 158 int try_reconnect_with_eth ( void )
klauss 121:ee02790d00b7 159 {
klauss 121:ee02790d00b7 160 eth_status = __init_eth__();
klauss 121:ee02790d00b7 161
klauss 126:1f90756250fb 162 if ( eth_status )
klauss 126:1f90756250fb 163 {
klauss 121:ee02790d00b7 164 send_msg("******* Cannot connect to eth *******");
klauss 121:ee02790d00b7 165 } else {
klauss 121:ee02790d00b7 166 send_msg("******* Connection eth - ok *******");
klauss 121:ee02790d00b7 167 int init_prompt_eth_ret = init_prompt_eth();
klauss 121:ee02790d00b7 168
klauss 121:ee02790d00b7 169 if ( init_prompt_eth_ret == BIT0 ) send_msg("******* Prompt eth UDP Ready *******");
klauss 121:ee02790d00b7 170
klauss 121:ee02790d00b7 171 if ( init_prompt_eth_ret == BIT1 ) send_msg("******* Prompt eth TCP Ready *******");
klauss 121:ee02790d00b7 172
klauss 126:1f90756250fb 173 if ( debug_app_init ) send_msg ( "init_prompt_eth() :: %s", ( init_prompt_eth_ret == ( BIT0 bitor BIT1 ) ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 174
klauss 121:ee02790d00b7 175 if ( debug_app_init ) send_msg ( "init_external_wdt() :: %s", ( init_external_wdt() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 176
klauss 121:ee02790d00b7 177 if ( debug_app_init ) send_msg ( "init_bl() :: %s", ( init_bl() == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 178
klauss 121:ee02790d00b7 179 if ( debug_app_init ) send_msg ( "init_clock() :: %s", ( init_clock() == 0 ) ? "Ok" : "Failure" );
klauss 128:3ae1c74773a8 180
klauss 128:3ae1c74773a8 181 if ( debug_app_init ) send_msg ( "init_pwr_src () :: %s", ( init_pwr_src () == 0 ) ? "Ok" : "Failure" );
klauss 121:ee02790d00b7 182 }
klauss 121:ee02790d00b7 183
klauss 121:ee02790d00b7 184 return eth_status;
klauss 121:ee02790d00b7 185 }
klauss 121:ee02790d00b7 186
klauss 121:ee02790d00b7 187
klauss 121:ee02790d00b7 188 int show_stats ( void )
klauss 121:ee02790d00b7 189 {
klauss 121:ee02790d00b7 190 char str[ 200 ];
klauss 121:ee02790d00b7 191 int snprintf_ret = snprintf( str, 200, ""
klauss 121:ee02790d00b7 192 "\n\rReceived Pkgs::\n\r "
klauss 121:ee02790d00b7 193 "Boot :: %u\n\r "
klauss 121:ee02790d00b7 194 "Registry :: %u\n\r "
klauss 121:ee02790d00b7 195 "Invite :: %u\n\r "
klauss 121:ee02790d00b7 196 "Audio :: %u\n\r "
klauss 121:ee02790d00b7 197 "Telemetry :: %u\n\r "
klauss 121:ee02790d00b7 198 "CB_stats :: %u\n\r "
klauss 121:ee02790d00b7 199 "CB_bye :: %u\n\r "
klauss 121:ee02790d00b7 200 "Prompt :: %u\n\r "
klauss 121:ee02790d00b7 201 "Flood :: %u\n\r "
klauss 121:ee02790d00b7 202 "Bootloader_cbx :: %u\n\r",
klauss 121:ee02790d00b7 203 boot_counter,
klauss 121:ee02790d00b7 204 registry_counter,
klauss 121:ee02790d00b7 205 invite_counter,
klauss 121:ee02790d00b7 206 audio_counter,
klauss 121:ee02790d00b7 207 telemetry_counter,
klauss 121:ee02790d00b7 208 cb_stats_counter,
klauss 121:ee02790d00b7 209 cb_bye_counter,
klauss 121:ee02790d00b7 210 prompt_counter,
klauss 121:ee02790d00b7 211 flood_counter,
klauss 121:ee02790d00b7 212 bootloader_cbx_counter
klauss 121:ee02790d00b7 213 );
klauss 121:ee02790d00b7 214 send_msg( str );
klauss 121:ee02790d00b7 215
klauss 121:ee02790d00b7 216 if ( debug_string_length ) debug_msg("str.length ( %d )", snprintf_ret );
klauss 121:ee02790d00b7 217 return ( snprintf_ret );
klauss 121:ee02790d00b7 218 }
klauss 121:ee02790d00b7 219
klauss 121:ee02790d00b7 220
klauss 121:ee02790d00b7 221 int reset_stats ( void )
klauss 121:ee02790d00b7 222 {
klauss 121:ee02790d00b7 223 boot_counter = 0;
klauss 121:ee02790d00b7 224 registry_counter = 0;
klauss 121:ee02790d00b7 225 invite_counter = 0;
klauss 121:ee02790d00b7 226 audio_counter = 0;
klauss 121:ee02790d00b7 227 telemetry_counter = 0;
klauss 121:ee02790d00b7 228 cb_bye_counter = 0;
klauss 121:ee02790d00b7 229 prompt_counter = 0;
klauss 121:ee02790d00b7 230 flood_counter = 0;
klauss 121:ee02790d00b7 231 bootloader_cbx_counter = 0;
klauss 121:ee02790d00b7 232 cb_stats_counter = 0;
klauss 121:ee02790d00b7 233 fw_counter = 0;
klauss 121:ee02790d00b7 234
klauss 121:ee02790d00b7 235 return ( 0 );
klauss 121:ee02790d00b7 236 }
klauss 121:ee02790d00b7 237
klauss 121:ee02790d00b7 238 int show_cb_list ( Vector * v_cb )
klauss 121:ee02790d00b7 239 {
klauss 121:ee02790d00b7 240 uint8_t missed_cb = ( ( max_ext - min_ext ) + 1 ) - v_cb->size();
klauss 121:ee02790d00b7 241
klauss 121:ee02790d00b7 242 if( ( max_ext % 2 ) == 0 ) missed_cb++;
klauss 121:ee02790d00b7 243
klauss 121:ee02790d00b7 244 if( min_ext % 2 ) missed_cb++;
klauss 121:ee02790d00b7 245
klauss 121:ee02790d00b7 246 if( min_ext == 0 && max_ext == 0 ) missed_cb = 0;
klauss 121:ee02790d00b7 247
klauss 121:ee02790d00b7 248 send_msg("Registered %d[ %d ] CBx ( %d - %d ) - Missed %d -- Remain_timeslices :: %d :: v_call->size() :: %d", v_cb->size(), max_registered_cbx, min_ext, max_ext, missed_cb, ts->remain_timeslices(), v_call->size() );
klauss 121:ee02790d00b7 249 if( v_cb->size() == 1 ) {
klauss 121:ee02790d00b7 250 send_msg(" %d ", ( ( Call_Box * )v_cb->get_element( 0 ) )->get_ext() );
klauss 121:ee02790d00b7 251 } else if( v_cb->size() > 1 ) {
klauss 121:ee02790d00b7 252 char str[ 1024 ];
klauss 121:ee02790d00b7 253 int ext_list[ MAX_CB_IN_A_BRANCH ];
klauss 121:ee02790d00b7 254 register int i = 0;
klauss 121:ee02790d00b7 255 for( ; i < v_cb->size(); i++ ) {
klauss 121:ee02790d00b7 256 ext_list[ i ] = ( ( Call_Box * )v_cb->get_element( i ) )->get_ext();
klauss 121:ee02790d00b7 257 }
klauss 121:ee02790d00b7 258
klauss 121:ee02790d00b7 259 qsort( ext_list, v_cb->size(), sizeof( int ), ls_comp );
klauss 121:ee02790d00b7 260
klauss 121:ee02790d00b7 261 char aux[ 16 ];
klauss 121:ee02790d00b7 262 strcpy( str, "\r\n> " );
klauss 121:ee02790d00b7 263 for( i = 0; i < v_cb->size() - 1; i++ ) {
klauss 121:ee02790d00b7 264 sprintf( aux, "%i, ", ext_list[ i ] );
klauss 121:ee02790d00b7 265 strcat( str, aux );
klauss 126:1f90756250fb 266 if( ( i not_eq 0 ) and not( ( i + 1 ) % 16 ) ) strcat( str, "\r\n> " );
klauss 121:ee02790d00b7 267 }
klauss 121:ee02790d00b7 268 sprintf( aux, "%i ", ext_list[ i ] );
klauss 121:ee02790d00b7 269 strcat( str, aux );
klauss 121:ee02790d00b7 270 send_msg( "%s", str );
klauss 121:ee02790d00b7 271 }
klauss 121:ee02790d00b7 272
klauss 121:ee02790d00b7 273 return ( 0 );
klauss 121:ee02790d00b7 274 }
klauss 121:ee02790d00b7 275
klauss 123:1d395b5a4cad 276 int show_cb_long_list ( Vector * v_cb, bool show_time )
klauss 121:ee02790d00b7 277 {
klauss 121:ee02790d00b7 278 uint8_t missed_cb = ( ( max_ext - min_ext ) + 1 ) - v_cb->size();
klauss 121:ee02790d00b7 279
klauss 121:ee02790d00b7 280 if( ( max_ext % 2 ) == 0 ) missed_cb++;
klauss 121:ee02790d00b7 281
klauss 121:ee02790d00b7 282 if( min_ext % 2 ) missed_cb++;
klauss 121:ee02790d00b7 283
klauss 121:ee02790d00b7 284 if( min_ext == 0 && max_ext == 0 ) missed_cb = 0;
klauss 121:ee02790d00b7 285
klauss 121:ee02790d00b7 286 {
klauss 121:ee02790d00b7 287 int ext_list[ MAX_CB_IN_A_BRANCH ];
klauss 121:ee02790d00b7 288
klauss 121:ee02790d00b7 289 if( v_cb->size() >= 1 ) {
klauss 121:ee02790d00b7 290 for( register int i = 0; i < v_cb->size(); i++ )
klauss 121:ee02790d00b7 291 {
klauss 121:ee02790d00b7 292 ext_list[ i ] = ( ( Call_Box * )v_cb->get_element( i ) )->get_ext();
klauss 121:ee02790d00b7 293 }
klauss 121:ee02790d00b7 294 qsort( ext_list, v_cb->size(), sizeof( int ), ls_comp );
klauss 121:ee02790d00b7 295 }
klauss 121:ee02790d00b7 296
klauss 121:ee02790d00b7 297 send_msg("Registered %d[ %d ] CBx ( %d - %d ) - Missed %d -- Remain_timeslices :: %d :: v_call->size() :: %d", v_cb->size(), max_registered_cbx, min_ext, max_ext, missed_cb, ts->remain_timeslices(), v_call->size() );
klauss 121:ee02790d00b7 298
klauss 121:ee02790d00b7 299 for( register uint8_t i = 0; i < v_cb->size(); i++ ) {
klauss 121:ee02790d00b7 300
klauss 121:ee02790d00b7 301 Call_Box * cb = find_CB( v_cb, ext_list[ i ] );
klauss 121:ee02790d00b7 302
klauss 126:1f90756250fb 303 if( cb not_eq NULL )
klauss 121:ee02790d00b7 304 {
klauss 121:ee02790d00b7 305 char cb_status[ 32 ];
klauss 121:ee02790d00b7 306 char cb_sip_status[ 32 ];
klauss 121:ee02790d00b7 307 switch ( cb -> get_status () )
klauss 121:ee02790d00b7 308 {
klauss 121:ee02790d00b7 309 case cb_idle : {
klauss 121:ee02790d00b7 310 strcpy( cb_status, "cb_idle" );
klauss 121:ee02790d00b7 311 break;
klauss 121:ee02790d00b7 312 }
klauss 121:ee02790d00b7 313 case cb_ringing : {
klauss 121:ee02790d00b7 314 strcpy( cb_status, "cb_ringing" );
klauss 121:ee02790d00b7 315 break;
klauss 121:ee02790d00b7 316 }
klauss 121:ee02790d00b7 317 case cb_trying : {
klauss 121:ee02790d00b7 318 strcpy( cb_status,"cb_trying" );
klauss 121:ee02790d00b7 319 break;
klauss 121:ee02790d00b7 320 }
klauss 121:ee02790d00b7 321 case cb_on_call : {
klauss 121:ee02790d00b7 322 strcpy( cb_status, "cb_on_call" );
klauss 121:ee02790d00b7 323 break;
klauss 121:ee02790d00b7 324 }
klauss 121:ee02790d00b7 325 case cb_busy : {
klauss 121:ee02790d00b7 326 strcpy( cb_status, "cb_busy" );
klauss 121:ee02790d00b7 327 break;
klauss 121:ee02790d00b7 328 }
klauss 121:ee02790d00b7 329 case cb_denied : {
klauss 121:ee02790d00b7 330 strcpy( cb_status, "cb_denied" );
klauss 121:ee02790d00b7 331 break;
klauss 121:ee02790d00b7 332 }
klauss 121:ee02790d00b7 333 case cb_bootloader : {
klauss 121:ee02790d00b7 334 strcpy( cb_status, "cb_bootloader" );
klauss 121:ee02790d00b7 335 break;
klauss 121:ee02790d00b7 336 }
klauss 121:ee02790d00b7 337 }
klauss 121:ee02790d00b7 338
klauss 121:ee02790d00b7 339 switch( cb -> get_sip_status () )
klauss 121:ee02790d00b7 340 {
klauss 121:ee02790d00b7 341 case sip_idle : {
klauss 121:ee02790d00b7 342 strcpy( cb_sip_status, "sip_idle" );
klauss 121:ee02790d00b7 343 break;
klauss 121:ee02790d00b7 344 }
klauss 121:ee02790d00b7 345 case sip_waiting_trying : {
klauss 121:ee02790d00b7 346 strcpy( cb_sip_status, "sip_waiting_trying" );
klauss 121:ee02790d00b7 347 break;
klauss 121:ee02790d00b7 348 }
klauss 121:ee02790d00b7 349 case sip_trying : {
klauss 121:ee02790d00b7 350 strcpy( cb_sip_status, "sip_trying" );
klauss 121:ee02790d00b7 351 break;
klauss 121:ee02790d00b7 352 }
klauss 121:ee02790d00b7 353 case sip_ringing : {
klauss 121:ee02790d00b7 354 strcpy( cb_sip_status, "sip_ringing" );
klauss 121:ee02790d00b7 355 break;
klauss 121:ee02790d00b7 356 }
klauss 121:ee02790d00b7 357 case sip_busy : {
klauss 121:ee02790d00b7 358 strcpy( cb_sip_status, "sip_busy" );
klauss 121:ee02790d00b7 359 break;
klauss 121:ee02790d00b7 360 }
klauss 121:ee02790d00b7 361 case sip_ok : {
klauss 121:ee02790d00b7 362 strcpy( cb_sip_status, "sip_ok" );
klauss 121:ee02790d00b7 363 break;
klauss 121:ee02790d00b7 364 }
klauss 121:ee02790d00b7 365 case sip_on_call : {
klauss 121:ee02790d00b7 366 strcpy( cb_sip_status, "sip_on_call" );
klauss 121:ee02790d00b7 367 break;
klauss 121:ee02790d00b7 368 }
klauss 121:ee02790d00b7 369 case sip_denied : {
klauss 121:ee02790d00b7 370 strcpy( cb_sip_status, "sip_denied" );
klauss 121:ee02790d00b7 371 break;
klauss 121:ee02790d00b7 372 }
klauss 121:ee02790d00b7 373 }
klauss 121:ee02790d00b7 374
klauss 121:ee02790d00b7 375 char cbx_to_string[ 254 ];
klauss 121:ee02790d00b7 376 snprintf ( cbx_to_string, sizeof ( cbx_to_string ),
klauss 123:1d395b5a4cad 377 "Ext :: %5i :: Port :: %5i :: Status -- %s - %s",
klauss 121:ee02790d00b7 378 cb->get_ext(), cb->get_port(), cb_status, cb_sip_status
klauss 121:ee02790d00b7 379 );
klauss 121:ee02790d00b7 380
klauss 126:1f90756250fb 381 if( cb->get_timeslice() not_eq 0 )
klauss 121:ee02790d00b7 382 {
klauss 121:ee02790d00b7 383 char aux[ 32 ];
klauss 121:ee02790d00b7 384 snprintf ( aux, sizeof ( aux ), " -- on TimeSlice :: %i", cb->get_timeslice() );
klauss 121:ee02790d00b7 385 strcat( cbx_to_string, aux );
klauss 121:ee02790d00b7 386 }
klauss 123:1d395b5a4cad 387
klauss 123:1d395b5a4cad 388 if ( show_time )
klauss 123:1d395b5a4cad 389 {
klauss 123:1d395b5a4cad 390 char get_timer_msg [ 128 ];
klauss 123:1d395b5a4cad 391
klauss 123:1d395b5a4cad 392 snprintf ( get_timer_msg, sizeof ( get_timer_msg ) -1, " -- timer %4i [ %s ",
klauss 123:1d395b5a4cad 393 cb -> get_timer (),
klauss 123:1d395b5a4cad 394 ( cb -> get_overflow_flag () ) ? "Overflow" : "Ok"
klauss 123:1d395b5a4cad 395 );
klauss 123:1d395b5a4cad 396
klauss 123:1d395b5a4cad 397 int get_overflow_times_tmp = cb -> get_overflow_times ();
klauss 123:1d395b5a4cad 398
klauss 123:1d395b5a4cad 399 if ( get_overflow_times_tmp == 0 ) strcat ( get_timer_msg, "]" );
klauss 123:1d395b5a4cad 400
klauss 123:1d395b5a4cad 401 else {
klauss 123:1d395b5a4cad 402 char strcat_tmp [ 16 ];
klauss 123:1d395b5a4cad 403 if ( get_overflow_times_tmp == 1 ) snprintf( strcat_tmp, sizeof ( strcat_tmp ) - 1, "1 time ]" );
klauss 123:1d395b5a4cad 404
klauss 123:1d395b5a4cad 405 else snprintf( strcat_tmp, sizeof ( strcat_tmp ) - 1, "%u times ]", get_overflow_times_tmp );
klauss 123:1d395b5a4cad 406
klauss 123:1d395b5a4cad 407 strcat ( get_timer_msg, strcat_tmp );
klauss 123:1d395b5a4cad 408 }
klauss 123:1d395b5a4cad 409
klauss 123:1d395b5a4cad 410 strcat ( cbx_to_string, get_timer_msg );
klauss 123:1d395b5a4cad 411 }
klauss 123:1d395b5a4cad 412
klauss 121:ee02790d00b7 413 send_msg( cbx_to_string );
klauss 121:ee02790d00b7 414 }
klauss 121:ee02790d00b7 415 }
klauss 121:ee02790d00b7 416 }
klauss 121:ee02790d00b7 417
klauss 121:ee02790d00b7 418 return ( 0 );
klauss 121:ee02790d00b7 419 }
klauss 121:ee02790d00b7 420
klauss 121:ee02790d00b7 421 int show_cb ( Vector * v_cb )
klauss 121:ee02790d00b7 422 {
klauss 121:ee02790d00b7 423 send_msg("Registered %d ( of %d ) CBx ( %d - %d ) -- Remain_timeslices :: %d :: v_call->size() :: %d", v_cb->size(), max_registered_cbx, min_ext, max_ext, ts->remain_timeslices(), v_call->size() );
klauss 121:ee02790d00b7 424 for( register uint8_t i = 0; i < v_cb->size(); i++ ) {
klauss 121:ee02790d00b7 425 Call_Box * cb = ( Call_Box * )v_cb->get_element( i );
klauss 121:ee02790d00b7 426 char cb_status[ 32 ];
klauss 121:ee02790d00b7 427 char cb_sip_status[ 32 ];
klauss 121:ee02790d00b7 428 switch ( cb -> get_status () )
klauss 121:ee02790d00b7 429 {
klauss 121:ee02790d00b7 430 case cb_idle : {
klauss 121:ee02790d00b7 431 strcpy( cb_status, "cb_idle" );
klauss 121:ee02790d00b7 432 break;
klauss 121:ee02790d00b7 433 }
klauss 121:ee02790d00b7 434 case cb_ringing : {
klauss 121:ee02790d00b7 435 strcpy( cb_status, "cb_ringing" );
klauss 121:ee02790d00b7 436 break;
klauss 121:ee02790d00b7 437 }
klauss 121:ee02790d00b7 438 case cb_trying : {
klauss 121:ee02790d00b7 439 strcpy( cb_status,"cb_trying" );
klauss 121:ee02790d00b7 440 break;
klauss 121:ee02790d00b7 441 }
klauss 121:ee02790d00b7 442 case cb_on_call : {
klauss 121:ee02790d00b7 443 strcpy( cb_status, "cb_on_call" );
klauss 121:ee02790d00b7 444 break;
klauss 121:ee02790d00b7 445 }
klauss 121:ee02790d00b7 446 case cb_busy : {
klauss 121:ee02790d00b7 447 strcpy( cb_status, "cb_busy" );
klauss 121:ee02790d00b7 448 break;
klauss 121:ee02790d00b7 449 }
klauss 121:ee02790d00b7 450 case cb_denied : {
klauss 121:ee02790d00b7 451 strcpy( cb_status, "cb_denied" );
klauss 121:ee02790d00b7 452 break;
klauss 121:ee02790d00b7 453 }
klauss 121:ee02790d00b7 454 case cb_bootloader : {
klauss 121:ee02790d00b7 455 strcpy( cb_status, "cb_bootloader" );
klauss 121:ee02790d00b7 456 break;
klauss 121:ee02790d00b7 457 }
klauss 121:ee02790d00b7 458 }
klauss 121:ee02790d00b7 459 switch( cb -> get_sip_status () ) {
klauss 121:ee02790d00b7 460 case sip_idle : {
klauss 121:ee02790d00b7 461 strcpy( cb_sip_status, "sip_idle" );
klauss 121:ee02790d00b7 462 break;
klauss 121:ee02790d00b7 463 }
klauss 121:ee02790d00b7 464 case sip_waiting_trying : {
klauss 121:ee02790d00b7 465 strcpy( cb_sip_status, "sip_waiting_trying" );
klauss 121:ee02790d00b7 466 break;
klauss 121:ee02790d00b7 467 }
klauss 121:ee02790d00b7 468 case sip_trying : {
klauss 121:ee02790d00b7 469 strcpy( cb_sip_status, "sip_trying" );
klauss 121:ee02790d00b7 470 break;
klauss 121:ee02790d00b7 471 }
klauss 121:ee02790d00b7 472 case sip_ringing : {
klauss 121:ee02790d00b7 473 strcpy( cb_sip_status, "sip_ringing" );
klauss 121:ee02790d00b7 474 break;
klauss 121:ee02790d00b7 475 }
klauss 121:ee02790d00b7 476 case sip_busy : {
klauss 121:ee02790d00b7 477 strcpy( cb_sip_status, "sip_busy" );
klauss 121:ee02790d00b7 478 break;
klauss 121:ee02790d00b7 479 }
klauss 121:ee02790d00b7 480 case sip_ok : {
klauss 121:ee02790d00b7 481 strcpy( cb_sip_status, "sip_ok" );
klauss 121:ee02790d00b7 482 break;
klauss 121:ee02790d00b7 483 }
klauss 121:ee02790d00b7 484 case sip_on_call : {
klauss 121:ee02790d00b7 485 strcpy( cb_sip_status, "sip_on_call" );
klauss 121:ee02790d00b7 486 break;
klauss 121:ee02790d00b7 487 }
klauss 121:ee02790d00b7 488 case sip_denied : {
klauss 121:ee02790d00b7 489 strcpy( cb_sip_status, "sip_denied" );
klauss 121:ee02790d00b7 490 break;
klauss 121:ee02790d00b7 491 }
klauss 121:ee02790d00b7 492 }
klauss 121:ee02790d00b7 493
klauss 121:ee02790d00b7 494 char cbx_to_string[ 254 ];
klauss 121:ee02790d00b7 495 snprintf ( cbx_to_string, sizeof ( cbx_to_string ),
klauss 123:1d395b5a4cad 496 "Ext :: %5i :: Port :: %5i :: Status -- %s - %s",
klauss 121:ee02790d00b7 497 cb->get_ext(), cb->get_port(), cb_status, cb_sip_status
klauss 121:ee02790d00b7 498 );
klauss 121:ee02790d00b7 499
klauss 126:1f90756250fb 500 if( cb->get_timeslice() not_eq 0 )
klauss 121:ee02790d00b7 501 {
klauss 121:ee02790d00b7 502 char aux[ 32 ];
klauss 121:ee02790d00b7 503 snprintf ( aux, sizeof ( aux ), " -- on TimeSlice :: %i", cb->get_timeslice() );
klauss 121:ee02790d00b7 504 strcat( cbx_to_string, aux );
klauss 121:ee02790d00b7 505 }
klauss 121:ee02790d00b7 506
klauss 121:ee02790d00b7 507
klauss 121:ee02790d00b7 508 send_msg( cbx_to_string );
klauss 121:ee02790d00b7 509 }
klauss 121:ee02790d00b7 510
klauss 121:ee02790d00b7 511 return ( 0 );
klauss 121:ee02790d00b7 512 }
klauss 121:ee02790d00b7 513
klauss 121:ee02790d00b7 514 int show_cb_sip ( Vector * v_cb )
klauss 121:ee02790d00b7 515 {
klauss 122:480c44b0e205 516 send_msg(":: Sip :: %u", v_cb -> size () );
klauss 122:480c44b0e205 517 for ( register uint8_t i = 0; i < v_cb -> size (); i++ )
klauss 122:480c44b0e205 518 {
klauss 122:480c44b0e205 519 Call_Box * cb = ( Call_Box * ) v_cb -> get_element ( i );
klauss 121:ee02790d00b7 520
klauss 123:1d395b5a4cad 521 char tmp_send_msg [ 256 ];
klauss 123:1d395b5a4cad 522
klauss 123:1d395b5a4cad 523 snprintf ( tmp_send_msg, sizeof ( tmp_send_msg ) - 1,
klauss 123:1d395b5a4cad 524 "ext :: %5i -- port :: %5i -- timer %4i [ %s ",
klauss 122:480c44b0e205 525 cb -> get_sip_ext (),
klauss 121:ee02790d00b7 526 cb -> get_sip_port (),
klauss 121:ee02790d00b7 527 cb -> get_timer (),
klauss 121:ee02790d00b7 528 ( cb -> get_overflow_flag () ) ? "Overflow" : "Ok"
klauss 121:ee02790d00b7 529 );
klauss 123:1d395b5a4cad 530
klauss 123:1d395b5a4cad 531 int get_overflow_times_tmp = cb -> get_overflow_times ();
klauss 123:1d395b5a4cad 532
klauss 123:1d395b5a4cad 533 if ( get_overflow_times_tmp == 0 ) strcat ( tmp_send_msg, "]" );
klauss 123:1d395b5a4cad 534
klauss 123:1d395b5a4cad 535 else {
klauss 123:1d395b5a4cad 536 char strcat_tmp [ 16 ];
klauss 123:1d395b5a4cad 537 if ( get_overflow_times_tmp == 1 ) snprintf( strcat_tmp, sizeof ( strcat_tmp ) - 1, "1 time ]" );
klauss 123:1d395b5a4cad 538
klauss 123:1d395b5a4cad 539 else snprintf( strcat_tmp, sizeof ( strcat_tmp ) - 1, "%d times ]", get_overflow_times_tmp );
klauss 123:1d395b5a4cad 540
klauss 123:1d395b5a4cad 541 strcat ( tmp_send_msg, strcat_tmp );
klauss 123:1d395b5a4cad 542 }
klauss 123:1d395b5a4cad 543
klauss 123:1d395b5a4cad 544 send_msg ( tmp_send_msg );
klauss 121:ee02790d00b7 545 }
klauss 121:ee02790d00b7 546
klauss 121:ee02790d00b7 547 return ( 0 );
klauss 121:ee02790d00b7 548 }
klauss 121:ee02790d00b7 549
klauss 121:ee02790d00b7 550 int show_sizes ( void )
klauss 121:ee02790d00b7 551 {
klauss 121:ee02790d00b7 552 sizes = false;
klauss 121:ee02790d00b7 553 send_msg("CB_New (%u) -- CB_Delete (%u)", cb_new_counter, cb_delete_counter );
klauss 121:ee02790d00b7 554 send_msg("SIP_New (%u) -- SIP_Delete (%u)", sip_new_counter, sip_delete_counter );
klauss 121:ee02790d00b7 555 send_msg("RTP_header_New (%u) -- RTP_header_Delete (%u)", rtp_header_new_counter, rtp_header_delete_counter );
klauss 121:ee02790d00b7 556 send_msg("RTP_body_New (%u) -- RTP_body_Delete (%u)", rtp_body_new_counter, rtp_body_delete_counter );
klauss 121:ee02790d00b7 557 send_msg("Call_New (%u) -- Call_Delete (%u)", call_new_counter, call_delete_counter );
klauss 121:ee02790d00b7 558 send_msg("lpc_low_level_input_counter :: %d", lpc_low_level_input_counter );
klauss 121:ee02790d00b7 559 send_msg("Memory is %s", ( memory_is_over ) ? "Over" : "Ok" );
klauss 121:ee02790d00b7 560 send_msg("Missed_Pkg :: %d ::", missed_pkg );
klauss 121:ee02790d00b7 561 send_msg("Sizeof Sip :: %u", sizeof( Sip ) );
klauss 121:ee02790d00b7 562 send_msg("Sizeof Call_Box :: %u", sizeof ( Call_Box ) );
klauss 121:ee02790d00b7 563 send_msg("Sizeof VZ_call :: %u", sizeof( VZ_call ) );
klauss 121:ee02790d00b7 564 send_msg("Sizeof RTP :: %u", sizeof( RTP ) );
klauss 121:ee02790d00b7 565 send_msg("Sizeof RTP_Header :: %u", sizeof( RTP_Header ) );
klauss 121:ee02790d00b7 566 send_msg("Sizeof RTP_Body :: %u", sizeof( RTP_Body ) );
klauss 121:ee02790d00b7 567 send_msg("Sizeof Vector :: %u", sizeof( Vector ) );
klauss 121:ee02790d00b7 568 send_msg("Sizeof Timeslice :: %u", sizeof( Timeslice ) );
klauss 121:ee02790d00b7 569 send_msg("Sizeof Watchdog :: %u", sizeof( Watchdog ) );
klauss 121:ee02790d00b7 570
klauss 121:ee02790d00b7 571 return ( 0 );
klauss 121:ee02790d00b7 572 }
klauss 121:ee02790d00b7 573
klauss 121:ee02790d00b7 574 int check_udp_packages_pending ( Vector * v_cb )
klauss 121:ee02790d00b7 575 {
klauss 121:ee02790d00b7 576 fd_set fdSet;
klauss 121:ee02790d00b7 577 FD_ZERO(&fdSet);
klauss 121:ee02790d00b7 578
klauss 121:ee02790d00b7 579 for( register uint8_t i = 0; i < v_cb->size(); i++ ) {
klauss 121:ee02790d00b7 580 Call_Box * cb = (Call_Box *)v_cb->get_element( i );
klauss 121:ee02790d00b7 581 FD_SET( cb->get_sip_socket_fd(), &fdSet);
klauss 121:ee02790d00b7 582 }
klauss 121:ee02790d00b7 583
klauss 121:ee02790d00b7 584 /* Recepcao de pacotes UDP para atualizacao de callboxes */
klauss 124:c1b6c893e1c3 585 FD_SET( udp_bl_client.get_fd (), &fdSet);
klauss 121:ee02790d00b7 586
klauss 121:ee02790d00b7 587 /* Recepcao de pacotes UDP para "tickagem" do watchdog */
klauss 124:c1b6c893e1c3 588 FD_SET( udp_wdt_client.get_fd (), &fdSet);
klauss 121:ee02790d00b7 589
klauss 121:ee02790d00b7 590 // adiciona o socket de comandos prompt-UDP-ETH
klauss 124:c1b6c893e1c3 591 FD_SET( udp_client.get_fd (), &fdSet );
klauss 121:ee02790d00b7 592
klauss 121:ee02790d00b7 593 // adiciona o socket de pedido de clock para o servidor
klauss 124:c1b6c893e1c3 594 FD_SET( clock_sock.get_fd (), &fdSet );
klauss 121:ee02790d00b7 595
klauss 121:ee02790d00b7 596 struct timeval t;
klauss 121:ee02790d00b7 597 t.tv_sec = 0;
klauss 121:ee02790d00b7 598 t.tv_usec = 0;
klauss 124:c1b6c893e1c3 599 int ret = lwip_select ( FD_SETSIZE, &fdSet, NULL, NULL, &t );
klauss 121:ee02790d00b7 600
klauss 124:c1b6c893e1c3 601 if ( ( udp_bl_timer.read() > 30) and (bl_start_flag) )
klauss 124:c1b6c893e1c3 602 {
klauss 121:ee02790d00b7 603 udp_bl_timer.stop();
klauss 121:ee02790d00b7 604 udp_bl_timer.reset();
klauss 121:ee02790d00b7 605 bl_start_flag = 0;
klauss 126:1f90756250fb 606 if (bl_ts not_eq 0) {
klauss 121:ee02790d00b7 607 ts->return_timeslice( bl_ts );
klauss 121:ee02790d00b7 608 bl_ts = 0;
klauss 121:ee02790d00b7 609 }
klauss 126:1f90756250fb 610 if (bl_cb not_eq NULL) {
klauss 121:ee02790d00b7 611 bl_cb -> set_timeslice( 0 );
klauss 121:ee02790d00b7 612 bl_cb -> cb_set_status ( cb_idle );
klauss 121:ee02790d00b7 613 bl_cb = NULL;
klauss 121:ee02790d00b7 614 }
klauss 121:ee02790d00b7 615 }
klauss 121:ee02790d00b7 616
klauss 121:ee02790d00b7 617 if ( ret > 0 )
klauss 121:ee02790d00b7 618 {
klauss 121:ee02790d00b7 619 for( register uint8_t i = 0; i < v_cb->size(); i++ ) {
klauss 121:ee02790d00b7 620 Call_Box * cb = (Call_Box *)v_cb->get_element( i );
klauss 121:ee02790d00b7 621 int fd = cb->get_sip_socket_fd();
klauss 121:ee02790d00b7 622 if( FD_ISSET( fd, &fdSet ) ) {
klauss 121:ee02790d00b7 623 int rcv = cb->sip_udp_incomming_pkg();
klauss 121:ee02790d00b7 624 }
klauss 121:ee02790d00b7 625 }
klauss 121:ee02790d00b7 626
klauss 121:ee02790d00b7 627 /* Tratamento dos pacotes de bootloader vindo do servidor */
klauss 121:ee02790d00b7 628 if( FD_ISSET( udp_bl_client.get_fd(), &fdSet ) ) {
klauss 121:ee02790d00b7 629 if( udp_bl_client.receiveFrom( udp_bl_server, bl_recv_buffer, sizeof( bl_recv_buffer ) ) > 0 ) {
klauss 121:ee02790d00b7 630 uint16_t cnt = 0;
klauss 121:ee02790d00b7 631 if (debug_bootloader) {
klauss 121:ee02790d00b7 632 pc.printf("\r\nPACOTE SRV->HDR {");
klauss 121:ee02790d00b7 633 for (cnt = 0;cnt < UDP_BL_SIZE;cnt++) {
klauss 121:ee02790d00b7 634 if ((cnt % 30) == 0) {
klauss 121:ee02790d00b7 635 pc.printf("\r\n ");
klauss 121:ee02790d00b7 636 pc.printf(hex16(cnt));
klauss 121:ee02790d00b7 637 pc.printf(" : ");
klauss 121:ee02790d00b7 638 }
klauss 121:ee02790d00b7 639 pc.printf(hex8(bl_recv_buffer[cnt]));
klauss 121:ee02790d00b7 640 pc.printf(", ");
klauss 121:ee02790d00b7 641 }
klauss 121:ee02790d00b7 642 pc.printf("\r\n}");
klauss 121:ee02790d00b7 643 }
klauss 121:ee02790d00b7 644 bl_peer = ((uint8_t)bl_recv_buffer[0])*256 + (uint8_t)bl_recv_buffer[1];
klauss 121:ee02790d00b7 645 bl_send_buffer[0] = bl_recv_buffer[0];
klauss 121:ee02790d00b7 646 bl_send_buffer[1] = bl_recv_buffer[1];
klauss 121:ee02790d00b7 647 for (cnt = 2;cnt < UDP_BL_SIZE;cnt++) {
klauss 121:ee02790d00b7 648 bl_send_buffer[cnt] = 0;
klauss 121:ee02790d00b7 649 }
klauss 121:ee02790d00b7 650
klauss 121:ee02790d00b7 651 if ((bl_ts == 0) and !(bl_start_flag)) {
klauss 121:ee02790d00b7 652 bl_ts = ts->get_timeslice();
klauss 121:ee02790d00b7 653 }
klauss 121:ee02790d00b7 654
klauss 121:ee02790d00b7 655 /* caso nao haja timeslice disponivel informar servidor */
klauss 121:ee02790d00b7 656 if ((bl_ts == 0) and !(bl_start_flag)) {
klauss 121:ee02790d00b7 657 strncpy(bl_send_buffer + 2,"cbxdead\x00",8);
klauss 121:ee02790d00b7 658 int udp_bl_client_ret = udp_bl_client.sendTo( udp_bl_server, bl_send_buffer, strlen( bl_send_buffer ) );
klauss 121:ee02790d00b7 659
klauss 126:1f90756250fb 660 if ( udp_bl_client_ret not_eq strlen( bl_send_buffer ) )
klauss 121:ee02790d00b7 661 {
klauss 121:ee02790d00b7 662 // TODO implementar os reconnects do bl
klauss 121:ee02790d00b7 663 }
klauss 121:ee02790d00b7 664 } else {
klauss 121:ee02790d00b7 665
klauss 121:ee02790d00b7 666 /* pacote para verificar se o callbox esta disponivel */
klauss 121:ee02790d00b7 667 if (!(strncmp(bl_recv_buffer + 2,"avaiable?",9))) {
klauss 121:ee02790d00b7 668 bl_start_flag = 1;
klauss 121:ee02790d00b7 669 udp_bl_timer.start();
klauss 121:ee02790d00b7 670 udp_bl_timer.reset();
klauss 121:ee02790d00b7 671 strncpy(bl_send_buffer + 2,"cbxalive\x00",9);
klauss 121:ee02790d00b7 672 if (debug_bootloader) {
klauss 121:ee02790d00b7 673 pc.printf("\r\nPACOTE HDR->SRV {");
klauss 121:ee02790d00b7 674 for (cnt = 0;cnt < UDP_BL_SIZE;cnt++) {
klauss 121:ee02790d00b7 675 if ((cnt % 30) == 0) {
klauss 121:ee02790d00b7 676 pc.printf("\r\n ");
klauss 121:ee02790d00b7 677 pc.printf(hex16(cnt));
klauss 121:ee02790d00b7 678 pc.printf(" : ");
klauss 121:ee02790d00b7 679 }
klauss 121:ee02790d00b7 680 pc.printf(hex8(bl_send_buffer[cnt]));
klauss 121:ee02790d00b7 681 pc.printf(", ");
klauss 121:ee02790d00b7 682 }
klauss 121:ee02790d00b7 683 pc.printf("\r\n}");
klauss 121:ee02790d00b7 684 }
klauss 121:ee02790d00b7 685 udp_bl_client.sendTo( udp_bl_server, bl_send_buffer, strlen( bl_send_buffer ) );
klauss 121:ee02790d00b7 686 }
klauss 121:ee02790d00b7 687
klauss 121:ee02790d00b7 688 /* pacote para indicar o termino do processo de atualizacao */
klauss 121:ee02790d00b7 689 else if (!(strncmp(bl_recv_buffer + 2,"finished",8))) {
klauss 121:ee02790d00b7 690 bl_start_flag = 0;
klauss 126:1f90756250fb 691 if (bl_ts not_eq 0) {
klauss 121:ee02790d00b7 692 ts->return_timeslice( bl_ts );
klauss 121:ee02790d00b7 693 bl_ts = 0;
klauss 121:ee02790d00b7 694 }
klauss 126:1f90756250fb 695 if (bl_cb not_eq NULL) {
klauss 121:ee02790d00b7 696 bl_cb->set_timeslice( 0 );
klauss 121:ee02790d00b7 697 bl_cb -> cb_set_status( cb_idle );
klauss 121:ee02790d00b7 698 bl_cb = NULL;
klauss 121:ee02790d00b7 699 }
klauss 121:ee02790d00b7 700 }
klauss 121:ee02790d00b7 701
klauss 121:ee02790d00b7 702 /* pacotes a serem repassados para o callbox */
klauss 121:ee02790d00b7 703 else if (bl_start_flag) {
klauss 121:ee02790d00b7 704 uint16_t bl_cnt = 0;
klauss 121:ee02790d00b7 705 udp_bl_timer.reset();
klauss 121:ee02790d00b7 706 /* pacote de ERASE enviado para o cbx */
klauss 121:ee02790d00b7 707 /* neste momento a cabeceira sabe que o servidor se comunicou com o callbox */
klauss 121:ee02790d00b7 708 if (!(strncmp(bl_recv_buffer + 2,"\x45",1))) {
klauss 121:ee02790d00b7 709 bl_cb = find_CB( v_cb, bl_peer );
klauss 126:1f90756250fb 710 if (bl_cb not_eq NULL) {
klauss 121:ee02790d00b7 711 bl_cb->set_timeslice( bl_ts );
klauss 121:ee02790d00b7 712 bl_cb -> cb_set_status ( cb_bootloader );
klauss 121:ee02790d00b7 713 }
klauss 121:ee02790d00b7 714 }
klauss 121:ee02790d00b7 715 /* pacote de OK enviado para o cbx */
klauss 121:ee02790d00b7 716 /* neste momento a cabeceira desaloca o timeslice do callbox */
klauss 121:ee02790d00b7 717 if (!(strncmp(bl_recv_buffer + 2,"\x4f\x00\x00\x00",4))) {
klauss 121:ee02790d00b7 718 ts->return_timeslice( bl_ts );
klauss 121:ee02790d00b7 719 bl_ts = 0;
klauss 126:1f90756250fb 720 if (bl_cb not_eq NULL) {
klauss 121:ee02790d00b7 721 bl_cb->set_timeslice( 0 );
klauss 121:ee02790d00b7 722 }
klauss 121:ee02790d00b7 723 }
klauss 121:ee02790d00b7 724 bl_cbx_buffer[0] = bl_ts;
klauss 121:ee02790d00b7 725 for (bl_cnt = 0; bl_cnt < BL_SIZE; bl_cnt++) {
klauss 121:ee02790d00b7 726 bl_cbx_buffer[bl_cnt + 1] = bl_recv_buffer[bl_cnt + 2];
klauss 121:ee02790d00b7 727 }
klauss 121:ee02790d00b7 728 if (debug_bootloader) {
klauss 121:ee02790d00b7 729 pc.printf("\r\nPACOTE HDR->CBX {");
klauss 121:ee02790d00b7 730 for (cnt = 0;cnt < BL_SIZE + 1;cnt++) {
klauss 121:ee02790d00b7 731 if ((cnt % 30) == 0) {
klauss 121:ee02790d00b7 732 pc.printf("\r\n ");
klauss 121:ee02790d00b7 733 pc.printf(hex16(cnt));
klauss 121:ee02790d00b7 734 pc.printf(" : ");
klauss 121:ee02790d00b7 735 }
klauss 121:ee02790d00b7 736 pc.printf(hex8(bl_cbx_buffer[cnt]));
klauss 121:ee02790d00b7 737 pc.printf(", ");
klauss 121:ee02790d00b7 738 }
klauss 121:ee02790d00b7 739 pc.printf("\r\n}");
klauss 121:ee02790d00b7 740 }
klauss 126:1f90756250fb 741 if (bl_cb not_eq NULL) {
klauss 121:ee02790d00b7 742 bl_port = bl_cb->get_port();
klauss 121:ee02790d00b7 743 } else {
klauss 121:ee02790d00b7 744 bl_port = bl_peer;
klauss 121:ee02790d00b7 745 }
klauss 121:ee02790d00b7 746 send2callboxes( build_cb_package( bl_peer, bl_port, BOOTLOADER_CBX,bl_cbx_buffer, 0, BL_SIZE + 1, write_buffer) );
klauss 121:ee02790d00b7 747 }
klauss 121:ee02790d00b7 748 }
klauss 121:ee02790d00b7 749 }
klauss 121:ee02790d00b7 750 }
klauss 121:ee02790d00b7 751
klauss 121:ee02790d00b7 752 // verifica o socket do prompt-UDP-ETH
klauss 121:ee02790d00b7 753 if( FD_ISSET( udp_client.get_fd(), &fdSet ) ) {
klauss 121:ee02790d00b7 754 char to_prompt_process[ PROMPT_UDP_COMMAND_SIZE ];
klauss 121:ee02790d00b7 755 for( register int i = 0; i < PROMPT_UDP_COMMAND_SIZE; i++ ) to_prompt_process[ i ] = 0;
klauss 121:ee02790d00b7 756
klauss 121:ee02790d00b7 757 int prompt_process_msg_rcv = udp_client.receiveFrom( udp_server, to_prompt_process, ( sizeof( to_prompt_process ) - 1 ) );
klauss 121:ee02790d00b7 758
klauss 121:ee02790d00b7 759 to_prompt_process[ prompt_process_msg_rcv ] = 0;
klauss 121:ee02790d00b7 760 if( prompt_process_msg_rcv == -1 )
klauss 121:ee02790d00b7 761 {
klauss 121:ee02790d00b7 762 if( debug_reconnect ) send_msg("Reconnect Prompt Process");
klauss 121:ee02790d00b7 763 reconnect_udp_prompt_process();
klauss 121:ee02790d00b7 764 miss_prompt_udp_rcv_pkg++;
klauss 121:ee02790d00b7 765 }
klauss 121:ee02790d00b7 766 else if( prompt_process_msg_rcv > 0 )
klauss 121:ee02790d00b7 767 {
klauss 121:ee02790d00b7 768 udp_query = true;
klauss 121:ee02790d00b7 769 prompt_process( to_prompt_process, prompt_process_msg_rcv );
klauss 121:ee02790d00b7 770 }
klauss 121:ee02790d00b7 771 }
klauss 121:ee02790d00b7 772
klauss 121:ee02790d00b7 773 // verifica o socket do watchdog
klauss 124:c1b6c893e1c3 774 if ( FD_ISSET ( udp_wdt_client.get_fd(), &fdSet ) )
klauss 124:c1b6c893e1c3 775 {
klauss 122:480c44b0e205 776 const uint16_t WAKE_MSG_SIZE = 768;
klauss 122:480c44b0e205 777 static char wake_msg [ WAKE_MSG_SIZE ];
klauss 122:480c44b0e205 778
klauss 122:480c44b0e205 779 for ( register uint16_t i = 0; i < WAKE_MSG_SIZE; i ++ ) wake_msg [ i ] = 0;
klauss 122:480c44b0e205 780
klauss 121:ee02790d00b7 781 Endpoint udp_wdt_server;
klauss 121:ee02790d00b7 782
klauss 121:ee02790d00b7 783 int wake_msg_rcv = udp_wdt_client.receiveFrom( udp_wdt_server, wake_msg, sizeof( wake_msg ) );
klauss 121:ee02790d00b7 784
klauss 122:480c44b0e205 785 if ( dmissed_wdt ) debug_msg("wake_msg_rcv :: %d -- wake_msg :: %s", wake_msg_rcv, wake_msg );
klauss 122:480c44b0e205 786
klauss 121:ee02790d00b7 787 if( wake_msg_rcv == -1 )
klauss 121:ee02790d00b7 788 {
klauss 121:ee02790d00b7 789 if( debug_reconnect ) send_msg("Reconnect Extern wdt");
klauss 121:ee02790d00b7 790 reconnect_extern_wdt_socket();
klauss 121:ee02790d00b7 791 miss_wdt_send_pkg++;
klauss 121:ee02790d00b7 792 }
klauss 121:ee02790d00b7 793 else if( wake_msg_rcv > 0 )
klauss 121:ee02790d00b7 794 {
klauss 121:ee02790d00b7 795 if( !( strncmp( wake_msg, "alive", 5 ) ) ) {
klauss 121:ee02790d00b7 796 // Just ckeck but not set 'alive?'
klauss 121:ee02790d00b7 797 // 'alive*' - force wdt tick right now
klauss 121:ee02790d00b7 798 // Ckecking and set 'alive'
klauss 121:ee02790d00b7 799 bool question_alive = ( wake_msg[ 5 ] == '?' );
klauss 121:ee02790d00b7 800 if( wake_msg[ 5 ] == '*' ) wdt.kick();
klauss 121:ee02790d00b7 801
klauss 122:480c44b0e205 802 if ( dmissed_wdt ) if ( wake_msg [ 5 ] == '?' ) debug_msg("Recebi o alive ???");
klauss 122:480c44b0e205 803
klauss 122:480c44b0e205 804 snprintf( wake_msg, WAKE_MSG_SIZE - 1,"wdt:%u,%u,%u,%c,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u,%u:",
klauss 121:ee02790d00b7 805 uptime,
klauss 121:ee02790d00b7 806 invite_counter,
klauss 121:ee02790d00b7 807 external_wdt,
klauss 121:ee02790d00b7 808 ( wdt.WatchdogCausedReset() ) ? '1' : '0',
klauss 121:ee02790d00b7 809 cb_new_counter,
klauss 121:ee02790d00b7 810 v_cb->size(),
klauss 121:ee02790d00b7 811 ts->remain_timeslices(),
klauss 121:ee02790d00b7 812 sip_socket_send_failure,
klauss 121:ee02790d00b7 813 v_call->size(),
klauss 121:ee02790d00b7 814 pkg_cksok,
klauss 121:ee02790d00b7 815 pkg_ckserr,
klauss 121:ee02790d00b7 816 pkg_zero,
klauss 121:ee02790d00b7 817 out_of_range,
klauss 121:ee02790d00b7 818 missed_pkg,
klauss 121:ee02790d00b7 819 delayed_pkg_to_cb,
klauss 121:ee02790d00b7 820 cpld_pkg_tx_counter,
klauss 121:ee02790d00b7 821 cpld_pkg_rx_counter,
klauss 121:ee02790d00b7 822 eth_wdt,
klauss 121:ee02790d00b7 823 pkg_wdt,
klauss 121:ee02790d00b7 824 miss_fw_send_pkg,
klauss 121:ee02790d00b7 825 miss_prompt_udp_send_pkg,
klauss 121:ee02790d00b7 826 miss_sip_registry_send_pkg,
klauss 121:ee02790d00b7 827 miss_sip_invite_send_pkg,
klauss 121:ee02790d00b7 828 miss_sip_bye_send_pkg,
klauss 121:ee02790d00b7 829 miss_sip_unregistry_send_pkg,
klauss 121:ee02790d00b7 830 miss_sip_ok_send_pkg,
klauss 121:ee02790d00b7 831 miss_sip_rcv_bye_send_pkg,
klauss 121:ee02790d00b7 832 miss_wdt_send_pkg,
klauss 121:ee02790d00b7 833 miss_prompt_udp_send_pkg,
klauss 121:ee02790d00b7 834 miss_ftp_udp_send_pkg,
klauss 121:ee02790d00b7 835 miss_prompt_udp_rcv_pkg,
klauss 121:ee02790d00b7 836 miss_closk_send_pkg
klauss 121:ee02790d00b7 837 );
klauss 122:480c44b0e205 838 wake_msg[ WAKE_MSG_SIZE - 1 ] = 0;
klauss 122:480c44b0e205 839
klauss 122:480c44b0e205 840 int send = udp_wdt_client.sendTo ( udp_wdt_server, wake_msg, strlen( wake_msg ) );
klauss 126:1f90756250fb 841 if( send not_eq strlen( wake_msg ) )
klauss 121:ee02790d00b7 842 {
klauss 121:ee02790d00b7 843 if( debug_reconnect ) debug_msg("Reconnect Extern wdt (%d, %d)", send, strlen( wake_msg ) );
klauss 122:480c44b0e205 844 reconnect_extern_wdt_socket ();
klauss 121:ee02790d00b7 845 miss_wdt_send_pkg++;
klauss 121:ee02790d00b7 846 }
klauss 121:ee02790d00b7 847
klauss 121:ee02790d00b7 848 if( ( (!question_alive) && ( cb_new_counter <= MAX_CB_IN_A_BRANCH ) && ( cb_new_counter >= 2 ) ) ) {
klauss 121:ee02790d00b7 849 external_wdt = EXTERN_WDT_IDLE;
klauss 122:480c44b0e205 850 if ( dmissed_wdt ) debug_msg("kickando");
klauss 121:ee02790d00b7 851 }
klauss 122:480c44b0e205 852
klauss 122:480c44b0e205 853 if ( dmissed_wdt ) debug_msg("Mandei send = %d[::%s::] to [%s:%i]", send, wake_msg, udp_wdt_server.get_address (), udp_wdt_server.get_port () );
klauss 122:480c44b0e205 854
klauss 121:ee02790d00b7 855 } else if( !( strncmp( wake_msg, "reset", 5 ) ) ) {
klauss 121:ee02790d00b7 856 external_wdt = 0;
klauss 121:ee02790d00b7 857
klauss 121:ee02790d00b7 858 sprintf( wake_msg, "rst:%u:", uptime );
klauss 121:ee02790d00b7 859 int send = udp_wdt_client.sendTo( udp_wdt_server, wake_msg, strlen( wake_msg ) );
klauss 126:1f90756250fb 860 if( send not_eq strlen( wake_msg ) )
klauss 121:ee02790d00b7 861 {
klauss 121:ee02790d00b7 862 if( debug_reconnect ) send_msg("Reconnect Extern wdt");
klauss 121:ee02790d00b7 863 reconnect_extern_wdt_socket();
klauss 121:ee02790d00b7 864 miss_wdt_send_pkg++;
klauss 121:ee02790d00b7 865 }
klauss 121:ee02790d00b7 866 }
klauss 121:ee02790d00b7 867 }
klauss 121:ee02790d00b7 868 }
klauss 121:ee02790d00b7 869
klauss 121:ee02790d00b7 870 if( FD_ISSET( clock_sock.get_fd(), &fdSet ) )
klauss 121:ee02790d00b7 871 {
klauss 121:ee02790d00b7 872 update_clock ();
klauss 121:ee02790d00b7 873 }
klauss 121:ee02790d00b7 874 }
klauss 121:ee02790d00b7 875
klauss 121:ee02790d00b7 876 return ( ret );
klauss 121:ee02790d00b7 877 }
klauss 121:ee02790d00b7 878
klauss 121:ee02790d00b7 879 int show_cb_content ( void )
klauss 121:ee02790d00b7 880 {
klauss 121:ee02790d00b7 881 Call_Box * cb = find_CB ( v_cb, print_this_cb );
klauss 126:1f90756250fb 882 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 883 {
klauss 121:ee02790d00b7 884 cb -> print_yourself ();
klauss 121:ee02790d00b7 885 }
klauss 121:ee02790d00b7 886 else
klauss 121:ee02790d00b7 887 {
klauss 121:ee02790d00b7 888 if( print_values )
klauss 121:ee02790d00b7 889 {
klauss 121:ee02790d00b7 890 debug_msg ("Objeto CBx ( %d ) nao encontrado", print_this_cb );
klauss 121:ee02790d00b7 891 }
klauss 121:ee02790d00b7 892 else
klauss 121:ee02790d00b7 893 {
klauss 121:ee02790d00b7 894 send_msg ("Objeto CBx ( %d ) nao encontrado", print_this_cb );
klauss 121:ee02790d00b7 895 }
klauss 121:ee02790d00b7 896 }
klauss 121:ee02790d00b7 897
klauss 121:ee02790d00b7 898 return ( 0 );
klauss 121:ee02790d00b7 899 }
klauss 121:ee02790d00b7 900
klauss 121:ee02790d00b7 901 int show_cb_content_all ( void )
klauss 121:ee02790d00b7 902 {
klauss 121:ee02790d00b7 903 if ( v_cb -> size () == 0 )
klauss 121:ee02790d00b7 904 {
klauss 121:ee02790d00b7 905 send_msg("known CBx :: 0");
klauss 121:ee02790d00b7 906 }
klauss 121:ee02790d00b7 907
klauss 121:ee02790d00b7 908 for ( register uint8_t i = 0; i < v_cb->size(); i++ )
klauss 121:ee02790d00b7 909 {
klauss 121:ee02790d00b7 910 Call_Box * cb = (Call_Box *)v_cb->get_element( i );
klauss 121:ee02790d00b7 911
klauss 126:1f90756250fb 912 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 913 {
klauss 121:ee02790d00b7 914 cb -> print_yourself ();
klauss 121:ee02790d00b7 915 }
klauss 121:ee02790d00b7 916 else
klauss 121:ee02790d00b7 917 {
klauss 121:ee02790d00b7 918 if ( print_values ) debug_msg ("Objeto CBx ( %d ) nao encontrado", i );
klauss 121:ee02790d00b7 919 }
klauss 121:ee02790d00b7 920 }
klauss 121:ee02790d00b7 921
klauss 121:ee02790d00b7 922 return ( 0 );
klauss 121:ee02790d00b7 923 }
klauss 121:ee02790d00b7 924
klauss 121:ee02790d00b7 925 int show_rtp ( void )
klauss 121:ee02790d00b7 926 {
klauss 121:ee02790d00b7 927 send_msg(":: RTP :: %u", v_cb->size() );
klauss 121:ee02790d00b7 928
klauss 121:ee02790d00b7 929 int ext_list[ MAX_CB_IN_A_BRANCH ];
klauss 121:ee02790d00b7 930
klauss 121:ee02790d00b7 931 if( v_cb->size() >= 1 ) {
klauss 121:ee02790d00b7 932 for( register int i = 0; i < v_cb->size(); i++ )
klauss 121:ee02790d00b7 933 {
klauss 121:ee02790d00b7 934 ext_list[ i ] = ( ( Call_Box * )v_cb->get_element( i ) )->get_ext();
klauss 121:ee02790d00b7 935 }
klauss 121:ee02790d00b7 936 qsort( ext_list, v_cb->size(), sizeof( int ), ls_comp );
klauss 121:ee02790d00b7 937 }
klauss 121:ee02790d00b7 938
klauss 121:ee02790d00b7 939 for ( register uint8_t i = 0; i < v_cb->size(); i++ )
klauss 121:ee02790d00b7 940 {
klauss 121:ee02790d00b7 941 Call_Box * cb = find_CB( v_cb, ext_list[ i ] );
klauss 126:1f90756250fb 942 if( cb not_eq NULL )
klauss 121:ee02790d00b7 943 {
klauss 121:ee02790d00b7 944 send_msg("CBX ( %d, %d ) - SIP ( %d, %d ) - RTP ( %d )",
klauss 121:ee02790d00b7 945 cb -> get_ext (),
klauss 121:ee02790d00b7 946 cb -> get_port (),
klauss 121:ee02790d00b7 947 cb -> get_sip_ext (),
klauss 121:ee02790d00b7 948 cb -> get_sip_port (),
klauss 121:ee02790d00b7 949 cb -> get_rtp_port ()
klauss 121:ee02790d00b7 950 );
klauss 121:ee02790d00b7 951 }
klauss 121:ee02790d00b7 952 }
klauss 121:ee02790d00b7 953
klauss 121:ee02790d00b7 954 return ( 0 );
klauss 121:ee02790d00b7 955 }
klauss 121:ee02790d00b7 956
klauss 121:ee02790d00b7 957 int fuck_rtp ( Vector * v_cb )
klauss 121:ee02790d00b7 958 {
klauss 121:ee02790d00b7 959 Call_Box * cb = find_CB( v_cb, frtp_target );
klauss 126:1f90756250fb 960 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 961 {
klauss 121:ee02790d00b7 962 cb -> set_rtp_port ( -1008789032 );
klauss 121:ee02790d00b7 963 }
klauss 121:ee02790d00b7 964 else
klauss 121:ee02790d00b7 965 {
klauss 121:ee02790d00b7 966 debug_msg("frtp fail");
klauss 121:ee02790d00b7 967 }
klauss 121:ee02790d00b7 968
klauss 121:ee02790d00b7 969 return ( 0 );
klauss 121:ee02790d00b7 970 }
klauss 121:ee02790d00b7 971
klauss 121:ee02790d00b7 972 int show_hex_cb_content ( void )
klauss 121:ee02790d00b7 973 {
klauss 121:ee02790d00b7 974 uint8_t * ptr = ( uint8_t * ) find_CB ( v_cb, print_hex_this_cb );
klauss 121:ee02790d00b7 975
klauss 126:1f90756250fb 976 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 977 {
klauss 121:ee02790d00b7 978 send_msg ("Values :: %p\r\n", ( void *) ptr );
klauss 121:ee02790d00b7 979 for ( register int i = 0; i < sizeof( Call_Box ); i++ )
klauss 121:ee02790d00b7 980 {
klauss 121:ee02790d00b7 981 if( debug_uart3 ) pc.printf("%x", *ptr++ );
klauss 121:ee02790d00b7 982
klauss 121:ee02790d00b7 983 if ( ( i % 32 ) == 0 )
klauss 121:ee02790d00b7 984 {
klauss 126:1f90756250fb 985 if( i not_eq 0 )
klauss 121:ee02790d00b7 986 {
klauss 121:ee02790d00b7 987 if( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 988 }
klauss 121:ee02790d00b7 989 else
klauss 121:ee02790d00b7 990 {
klauss 121:ee02790d00b7 991 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 992 }
klauss 121:ee02790d00b7 993 }
klauss 121:ee02790d00b7 994 else
klauss 121:ee02790d00b7 995 {
klauss 121:ee02790d00b7 996 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 997 }
klauss 121:ee02790d00b7 998 }
klauss 121:ee02790d00b7 999 if ( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1000
klauss 121:ee02790d00b7 1001 if ( tcp_session ) {
klauss 121:ee02790d00b7 1002 char aux[ ( sizeof( Call_Box ) * 3 ) + 3 ];
klauss 121:ee02790d00b7 1003
klauss 121:ee02790d00b7 1004 for ( register int i = 0; i < ( sizeof( Call_Box ) * 3 ) + 3 ; i++ ) aux [ i ] = 0;
klauss 121:ee02790d00b7 1005
klauss 121:ee02790d00b7 1006 uint8_t * ptr = ( uint8_t * ) find_CB ( v_cb, print_hex_this_cb );
klauss 121:ee02790d00b7 1007
klauss 121:ee02790d00b7 1008 for ( register int i = 0; i < sizeof( Call_Box ); i++ )
klauss 121:ee02790d00b7 1009 {
klauss 121:ee02790d00b7 1010 char tmp[ 16 ];
klauss 121:ee02790d00b7 1011 sprintf( tmp, "%x ", *ptr++ );
klauss 121:ee02790d00b7 1012 strcat( aux, tmp );
klauss 121:ee02790d00b7 1013 }
klauss 121:ee02790d00b7 1014
klauss 121:ee02790d00b7 1015 strcat( aux, "\n\r\0" );
klauss 121:ee02790d00b7 1016 tcp_client.send_all( ( char *)aux, strlen( (char * )aux ) );
klauss 121:ee02790d00b7 1017 tcp_client.send_all( "\r\n> ", strlen( "\r\n> " ) );
klauss 121:ee02790d00b7 1018 }
klauss 121:ee02790d00b7 1019 }
klauss 121:ee02790d00b7 1020 else
klauss 121:ee02790d00b7 1021 {
klauss 121:ee02790d00b7 1022 if ( print_values ) debug_msg ("Objeto CBx ( %d ) nao encontrado", print_this_cb );
klauss 121:ee02790d00b7 1023 }
klauss 121:ee02790d00b7 1024
klauss 121:ee02790d00b7 1025 return ( 0 );
klauss 121:ee02790d00b7 1026 }
klauss 121:ee02790d00b7 1027
klauss 121:ee02790d00b7 1028 int show_hex_cb_content_all ()
klauss 121:ee02790d00b7 1029 {
klauss 121:ee02790d00b7 1030 if ( v_cb -> size () == 0 )
klauss 121:ee02790d00b7 1031 {
klauss 121:ee02790d00b7 1032 send_msg("known CBx :: 0");
klauss 121:ee02790d00b7 1033 }
klauss 121:ee02790d00b7 1034
klauss 121:ee02790d00b7 1035 for ( register uint8_t j = 0; j < v_cb->size(); j++ )
klauss 121:ee02790d00b7 1036 {
klauss 121:ee02790d00b7 1037 uint8_t * ptr = ( uint8_t * ) v_cb->get_element( j );
klauss 121:ee02790d00b7 1038
klauss 126:1f90756250fb 1039 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1040 {
klauss 121:ee02790d00b7 1041 send_msg ("Values :: %p\r\n", ( void *) ptr );
klauss 121:ee02790d00b7 1042 for ( register int i = 0; i < sizeof( Call_Box ); i++ )
klauss 121:ee02790d00b7 1043 {
klauss 121:ee02790d00b7 1044 if( debug_uart3 ) pc.printf("%x", *ptr++ );
klauss 121:ee02790d00b7 1045
klauss 121:ee02790d00b7 1046 if ( ( i % 32 ) == 0 )
klauss 121:ee02790d00b7 1047 {
klauss 126:1f90756250fb 1048 if( i not_eq 0 )
klauss 121:ee02790d00b7 1049 {
klauss 121:ee02790d00b7 1050 if( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1051 }
klauss 121:ee02790d00b7 1052 else
klauss 121:ee02790d00b7 1053 {
klauss 121:ee02790d00b7 1054 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1055 }
klauss 121:ee02790d00b7 1056 }
klauss 121:ee02790d00b7 1057 else
klauss 121:ee02790d00b7 1058 {
klauss 121:ee02790d00b7 1059 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1060 }
klauss 121:ee02790d00b7 1061 }
klauss 121:ee02790d00b7 1062 if ( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1063
klauss 121:ee02790d00b7 1064 if ( tcp_session ) {
klauss 121:ee02790d00b7 1065 char aux[ ( sizeof( Call_Box ) * 3 ) + 3 ];
klauss 121:ee02790d00b7 1066
klauss 121:ee02790d00b7 1067 for ( register int i = 0; i < ( sizeof( Call_Box ) * 3 ) + 3 ; i++ ) aux [ i ] = 0;
klauss 121:ee02790d00b7 1068
klauss 121:ee02790d00b7 1069 uint8_t * ptr = ( uint8_t * ) v_cb->get_element( j );
klauss 121:ee02790d00b7 1070
klauss 121:ee02790d00b7 1071 for ( register int i = 0; i < sizeof( Call_Box ); i++ )
klauss 121:ee02790d00b7 1072 {
klauss 121:ee02790d00b7 1073 char tmp[ 16 ];
klauss 121:ee02790d00b7 1074 sprintf( tmp, "%x ", *ptr++ );
klauss 121:ee02790d00b7 1075 strcat( aux, tmp );
klauss 121:ee02790d00b7 1076 }
klauss 121:ee02790d00b7 1077
klauss 121:ee02790d00b7 1078 strcat( aux, "\n\r\0" );
klauss 121:ee02790d00b7 1079 tcp_client.send_all( ( char *)aux, strlen( (char * )aux ) );
klauss 121:ee02790d00b7 1080 tcp_client.send_all( "\r\n> ", strlen( "\r\n> " ) );
klauss 121:ee02790d00b7 1081 }
klauss 121:ee02790d00b7 1082 }
klauss 121:ee02790d00b7 1083 else
klauss 121:ee02790d00b7 1084 {
klauss 121:ee02790d00b7 1085 if ( print_values )
klauss 121:ee02790d00b7 1086 {
klauss 121:ee02790d00b7 1087 debug_msg ("Objeto CBx ( %d ) nao encontrado", j );
klauss 121:ee02790d00b7 1088 }
klauss 121:ee02790d00b7 1089 else
klauss 121:ee02790d00b7 1090 {
klauss 121:ee02790d00b7 1091 send_msg ("Objeto CBx ( %d ) nao encontrado", j );
klauss 121:ee02790d00b7 1092 }
klauss 121:ee02790d00b7 1093 }
klauss 121:ee02790d00b7 1094 }
klauss 121:ee02790d00b7 1095
klauss 121:ee02790d00b7 1096 return ( 0 );
klauss 121:ee02790d00b7 1097 }
klauss 121:ee02790d00b7 1098
klauss 121:ee02790d00b7 1099
klauss 121:ee02790d00b7 1100 int show_cB_sip ( void )
klauss 121:ee02790d00b7 1101 {
klauss 121:ee02790d00b7 1102 Call_Box * cb = find_CB ( v_cb, print_this_sip );
klauss 121:ee02790d00b7 1103
klauss 126:1f90756250fb 1104 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 1105 {
klauss 121:ee02790d00b7 1106 if( cb -> sip_print_yourself () == -1 )
klauss 121:ee02790d00b7 1107 {
klauss 121:ee02790d00b7 1108 if( print_values )
klauss 121:ee02790d00b7 1109 {
klauss 121:ee02790d00b7 1110 debug_msg("Sip param of %d equals NULL", print_this_sip );
klauss 121:ee02790d00b7 1111 }
klauss 121:ee02790d00b7 1112 else
klauss 121:ee02790d00b7 1113 {
klauss 121:ee02790d00b7 1114 send_msg("Sip param of %d equals NULL", print_this_sip );
klauss 121:ee02790d00b7 1115 }
klauss 121:ee02790d00b7 1116 }
klauss 121:ee02790d00b7 1117 }
klauss 121:ee02790d00b7 1118 else
klauss 121:ee02790d00b7 1119 {
klauss 121:ee02790d00b7 1120 if ( print_values )
klauss 121:ee02790d00b7 1121 {
klauss 121:ee02790d00b7 1122 debug_msg ("Objeto CBx ( %d ) nao encontrado", print_this_cb );
klauss 121:ee02790d00b7 1123 }
klauss 121:ee02790d00b7 1124 else
klauss 121:ee02790d00b7 1125 {
klauss 121:ee02790d00b7 1126 send_msg ("Objeto CBx ( %d ) nao encontrado", print_this_cb );
klauss 121:ee02790d00b7 1127 }
klauss 121:ee02790d00b7 1128 }
klauss 121:ee02790d00b7 1129
klauss 121:ee02790d00b7 1130 return ( 0 );
klauss 121:ee02790d00b7 1131 }
klauss 121:ee02790d00b7 1132 int show_cB_sip_all ( void )
klauss 121:ee02790d00b7 1133 {
klauss 121:ee02790d00b7 1134 if ( v_cb -> size () == 0 )
klauss 121:ee02790d00b7 1135 {
klauss 121:ee02790d00b7 1136 send_msg("known CBx :: 0");
klauss 121:ee02790d00b7 1137 }
klauss 121:ee02790d00b7 1138
klauss 121:ee02790d00b7 1139 for ( register uint8_t i = 0; i < v_cb->size(); i++ )
klauss 121:ee02790d00b7 1140 {
klauss 121:ee02790d00b7 1141 Call_Box * cb = (Call_Box *)v_cb->get_element( i );
klauss 121:ee02790d00b7 1142
klauss 126:1f90756250fb 1143 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 1144 {
klauss 121:ee02790d00b7 1145 if ( cb -> sip_print_yourself () == -1 )
klauss 121:ee02790d00b7 1146 {
klauss 121:ee02790d00b7 1147 if ( print_values )
klauss 121:ee02790d00b7 1148 {
klauss 121:ee02790d00b7 1149 debug_msg ("Sip param of %d equals NULL", print_this_sip );
klauss 121:ee02790d00b7 1150 }
klauss 121:ee02790d00b7 1151 else
klauss 121:ee02790d00b7 1152 {
klauss 121:ee02790d00b7 1153 send_msg ("Sip param of %d equals NULL", print_this_sip );
klauss 121:ee02790d00b7 1154 }
klauss 121:ee02790d00b7 1155 }
klauss 121:ee02790d00b7 1156 }
klauss 121:ee02790d00b7 1157 else
klauss 121:ee02790d00b7 1158 {
klauss 121:ee02790d00b7 1159 if( print_values )
klauss 121:ee02790d00b7 1160 {
klauss 121:ee02790d00b7 1161 debug_msg ("CBx %d not found", print_this_sip );
klauss 121:ee02790d00b7 1162 }
klauss 121:ee02790d00b7 1163 else
klauss 121:ee02790d00b7 1164 {
klauss 121:ee02790d00b7 1165 send_msg ("CBx %d not found", print_this_sip );
klauss 121:ee02790d00b7 1166 }
klauss 121:ee02790d00b7 1167 }
klauss 121:ee02790d00b7 1168 }
klauss 121:ee02790d00b7 1169 return ( 0 );
klauss 121:ee02790d00b7 1170 }
klauss 121:ee02790d00b7 1171
klauss 121:ee02790d00b7 1172 int show_cB_hex_sip ( void )
klauss 121:ee02790d00b7 1173 {
klauss 121:ee02790d00b7 1174 uint8_t * ptr = NULL;
klauss 121:ee02790d00b7 1175
klauss 121:ee02790d00b7 1176 Call_Box * cb = find_CB ( v_cb, print_hex_this_sip );
klauss 126:1f90756250fb 1177 if( cb not_eq NULL )
klauss 121:ee02790d00b7 1178 {
klauss 121:ee02790d00b7 1179 ptr = ( uint8_t * ) cb -> get_sip ();
klauss 121:ee02790d00b7 1180 }
klauss 121:ee02790d00b7 1181
klauss 126:1f90756250fb 1182 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1183 {
klauss 121:ee02790d00b7 1184 send_msg ("Values :: %p\r\n", ( void *) ptr );
klauss 121:ee02790d00b7 1185 for ( register int i = 0; i < sizeof( Sip ); i++ )
klauss 121:ee02790d00b7 1186 {
klauss 121:ee02790d00b7 1187 if( debug_uart3 ) pc.printf("%x", *ptr++ );
klauss 121:ee02790d00b7 1188
klauss 121:ee02790d00b7 1189 if ( ( i % 32 ) == 0 )
klauss 121:ee02790d00b7 1190 {
klauss 126:1f90756250fb 1191 if( i not_eq 0 )
klauss 121:ee02790d00b7 1192 {
klauss 121:ee02790d00b7 1193 if( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1194 }
klauss 121:ee02790d00b7 1195 else
klauss 121:ee02790d00b7 1196 {
klauss 121:ee02790d00b7 1197 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1198 }
klauss 121:ee02790d00b7 1199 }
klauss 121:ee02790d00b7 1200 else
klauss 121:ee02790d00b7 1201 {
klauss 121:ee02790d00b7 1202 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1203 }
klauss 121:ee02790d00b7 1204 }
klauss 121:ee02790d00b7 1205 if ( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1206
klauss 121:ee02790d00b7 1207 if ( tcp_session ) {
klauss 121:ee02790d00b7 1208 char aux[ ( 32 * 3 ) + 5 ];
klauss 121:ee02790d00b7 1209
klauss 121:ee02790d00b7 1210 for ( register int i = 0; i < ( 32 * 3 ) + 5 ; i++ ) aux [ i ] = 0;
klauss 121:ee02790d00b7 1211
klauss 121:ee02790d00b7 1212 ptr = NULL;
klauss 121:ee02790d00b7 1213
klauss 121:ee02790d00b7 1214 print_hex_sip_var = false;
klauss 121:ee02790d00b7 1215 Call_Box * cb = find_CB ( v_cb, print_hex_this_sip );
klauss 126:1f90756250fb 1216 if( cb not_eq NULL )
klauss 121:ee02790d00b7 1217 {
klauss 121:ee02790d00b7 1218 ptr = ( uint8_t * ) cb -> get_sip ();
klauss 121:ee02790d00b7 1219 }
klauss 121:ee02790d00b7 1220
klauss 126:1f90756250fb 1221 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1222 {
klauss 121:ee02790d00b7 1223 bool finished = false;
klauss 121:ee02790d00b7 1224 volatile int i = 0;
klauss 121:ee02790d00b7 1225 int count = 0;
klauss 121:ee02790d00b7 1226 Timer dont_overwrite_tcp_buffer;
klauss 121:ee02790d00b7 1227 dont_overwrite_tcp_buffer.reset ();
klauss 121:ee02790d00b7 1228 dont_overwrite_tcp_buffer.start ();
klauss 121:ee02790d00b7 1229
klauss 121:ee02790d00b7 1230 while ( !finished )
klauss 121:ee02790d00b7 1231 {
klauss 121:ee02790d00b7 1232 if( dont_overwrite_tcp_buffer.read_ms () >= 500 )
klauss 121:ee02790d00b7 1233 {
klauss 121:ee02790d00b7 1234 dont_overwrite_tcp_buffer.reset();
klauss 121:ee02790d00b7 1235 for ( ; i < sizeof( Sip ); i++ )
klauss 121:ee02790d00b7 1236 {
klauss 121:ee02790d00b7 1237 char tmp[ 16 ];
klauss 121:ee02790d00b7 1238 sprintf( tmp, "%x ", *ptr++ );
klauss 121:ee02790d00b7 1239 strcat( aux, tmp );
klauss 121:ee02790d00b7 1240 count++;
klauss 121:ee02790d00b7 1241
klauss 121:ee02790d00b7 1242 if ( count >= 32 )
klauss 121:ee02790d00b7 1243 {
klauss 121:ee02790d00b7 1244 count = 0;
klauss 121:ee02790d00b7 1245 i++;
klauss 121:ee02790d00b7 1246 break;
klauss 121:ee02790d00b7 1247 }
klauss 121:ee02790d00b7 1248 }
klauss 121:ee02790d00b7 1249 strcat ( aux, "\n\r\0" );
klauss 121:ee02790d00b7 1250 tcp_client.send_all ( ( char *)aux, strlen( (char * )aux ) );
klauss 121:ee02790d00b7 1251 if ( i >= sizeof ( Sip ) ) finished = true;
klauss 121:ee02790d00b7 1252 strcpy ( aux, "\0" );
klauss 121:ee02790d00b7 1253 }
klauss 121:ee02790d00b7 1254 }
klauss 121:ee02790d00b7 1255 dont_overwrite_tcp_buffer.reset();
klauss 121:ee02790d00b7 1256 dont_overwrite_tcp_buffer.stop();
klauss 121:ee02790d00b7 1257 tcp_client.send_all ( "\r\n> ", strlen( "\r\n> " ) );
klauss 121:ee02790d00b7 1258 }
klauss 121:ee02790d00b7 1259 }
klauss 121:ee02790d00b7 1260 }
klauss 121:ee02790d00b7 1261 else
klauss 121:ee02790d00b7 1262 {
klauss 121:ee02790d00b7 1263 if ( print_values ) debug_msg ("Objeto CBx ( %d ) nao encontrado", print_this_cb );
klauss 121:ee02790d00b7 1264 }
klauss 121:ee02790d00b7 1265
klauss 121:ee02790d00b7 1266
klauss 121:ee02790d00b7 1267 return ( 0 );
klauss 121:ee02790d00b7 1268 }
klauss 121:ee02790d00b7 1269
klauss 121:ee02790d00b7 1270 int show_rtp_on_call ( void )
klauss 121:ee02790d00b7 1271 {
klauss 121:ee02790d00b7 1272 send_msg(":: CAll RTP :: %u", v_call->size() );
klauss 121:ee02790d00b7 1273
klauss 121:ee02790d00b7 1274 for( register uint8_t i = 0; i < v_call->size(); i++ ) {
klauss 121:ee02790d00b7 1275 VZ_call * call = ( VZ_call * )v_call->get_element( i );
klauss 126:1f90756250fb 1276 if( call not_eq NULL )
klauss 121:ee02790d00b7 1277 {
klauss 121:ee02790d00b7 1278 send_msg("CBX ( %d, %d ) - Server ( %d, %d )",
klauss 121:ee02790d00b7 1279 call->get_cb_ext(),
klauss 121:ee02790d00b7 1280 call->get_cb_port(),
klauss 121:ee02790d00b7 1281 call->get_rtp_server_ext(),
klauss 121:ee02790d00b7 1282 call->get_rtp_server_port()
klauss 121:ee02790d00b7 1283 );
klauss 121:ee02790d00b7 1284 }
klauss 121:ee02790d00b7 1285 }
klauss 121:ee02790d00b7 1286
klauss 121:ee02790d00b7 1287 return ( 0 );
klauss 121:ee02790d00b7 1288 }
klauss 121:ee02790d00b7 1289
klauss 121:ee02790d00b7 1290 int show_call ( void )
klauss 121:ee02790d00b7 1291 {
klauss 126:1f90756250fb 1292 VZ_call * call = find_Call ( v_call, print_this_call );
klauss 121:ee02790d00b7 1293
klauss 126:1f90756250fb 1294 if ( call not_eq NULL )
klauss 121:ee02790d00b7 1295 {
klauss 121:ee02790d00b7 1296 send_msg ("Values :: %p\r\n", ( void *) call );
klauss 121:ee02790d00b7 1297 call -> print_yourself ();
klauss 121:ee02790d00b7 1298 }
klauss 121:ee02790d00b7 1299 else
klauss 121:ee02790d00b7 1300 {
klauss 121:ee02790d00b7 1301 if( print_values )
klauss 121:ee02790d00b7 1302 {
klauss 121:ee02790d00b7 1303 debug_msg("Call %d not found", print_this_call );
klauss 121:ee02790d00b7 1304 }
klauss 121:ee02790d00b7 1305 else
klauss 121:ee02790d00b7 1306 {
klauss 121:ee02790d00b7 1307 send_msg("Call %d not found", print_this_call );
klauss 121:ee02790d00b7 1308 }
klauss 121:ee02790d00b7 1309 }
klauss 121:ee02790d00b7 1310
klauss 121:ee02790d00b7 1311 return ( 0 );
klauss 121:ee02790d00b7 1312 }
klauss 121:ee02790d00b7 1313
klauss 121:ee02790d00b7 1314 int show_hex_call ( void )
klauss 121:ee02790d00b7 1315 {
klauss 126:1f90756250fb 1316 VZ_call * call = find_Call ( v_call, print_hex_this_call );
klauss 121:ee02790d00b7 1317
klauss 121:ee02790d00b7 1318 uint8_t * ptr = NULL;
klauss 126:1f90756250fb 1319 if( call not_eq NULL )
klauss 121:ee02790d00b7 1320 {
klauss 121:ee02790d00b7 1321 ptr = ( uint8_t * ) call;
klauss 121:ee02790d00b7 1322 }
klauss 121:ee02790d00b7 1323
klauss 126:1f90756250fb 1324 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1325 {
klauss 121:ee02790d00b7 1326 send_msg ("Values :: %p\r\n", ( void *) ptr );
klauss 121:ee02790d00b7 1327 for ( register int i = 0; i < sizeof( VZ_call ); i++ )
klauss 121:ee02790d00b7 1328 {
klauss 121:ee02790d00b7 1329 if( debug_uart3 ) pc.printf("%x", *ptr++ );
klauss 121:ee02790d00b7 1330
klauss 121:ee02790d00b7 1331 if ( ( i % 32 ) == 0 )
klauss 121:ee02790d00b7 1332 {
klauss 126:1f90756250fb 1333 if( i not_eq 0 )
klauss 121:ee02790d00b7 1334 {
klauss 121:ee02790d00b7 1335 if( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1336 }
klauss 121:ee02790d00b7 1337 else
klauss 121:ee02790d00b7 1338 {
klauss 121:ee02790d00b7 1339 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1340 }
klauss 121:ee02790d00b7 1341 }
klauss 121:ee02790d00b7 1342 else
klauss 121:ee02790d00b7 1343 {
klauss 121:ee02790d00b7 1344 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1345 }
klauss 121:ee02790d00b7 1346 }
klauss 121:ee02790d00b7 1347 if ( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1348
klauss 121:ee02790d00b7 1349 if ( tcp_session ) {
klauss 121:ee02790d00b7 1350 char aux[ ( 32 * 3 ) + 5 ];
klauss 121:ee02790d00b7 1351
klauss 121:ee02790d00b7 1352 for ( register int i = 0; i < ( 32 * 3 ) + 5 ; i++ ) aux [ i ] = 0;
klauss 121:ee02790d00b7 1353
klauss 121:ee02790d00b7 1354 ptr = NULL;
klauss 121:ee02790d00b7 1355
klauss 126:1f90756250fb 1356 VZ_call * call = find_Call ( v_call, print_hex_this_call );
klauss 121:ee02790d00b7 1357
klauss 121:ee02790d00b7 1358 uint8_t * ptr = NULL;
klauss 126:1f90756250fb 1359 if( call not_eq NULL )
klauss 121:ee02790d00b7 1360 {
klauss 121:ee02790d00b7 1361 ptr = ( uint8_t * ) call;
klauss 121:ee02790d00b7 1362 }
klauss 121:ee02790d00b7 1363
klauss 126:1f90756250fb 1364 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1365 {
klauss 121:ee02790d00b7 1366 bool finished = false;
klauss 121:ee02790d00b7 1367 volatile int i = 0;
klauss 121:ee02790d00b7 1368 int count = 0;
klauss 121:ee02790d00b7 1369 Timer dont_overwrite_tcp_buffer;
klauss 121:ee02790d00b7 1370 dont_overwrite_tcp_buffer.reset ();
klauss 121:ee02790d00b7 1371 dont_overwrite_tcp_buffer.start ();
klauss 121:ee02790d00b7 1372
klauss 121:ee02790d00b7 1373 while ( !finished )
klauss 121:ee02790d00b7 1374 {
klauss 121:ee02790d00b7 1375 if( dont_overwrite_tcp_buffer.read_ms () >= 20 )
klauss 121:ee02790d00b7 1376 {
klauss 121:ee02790d00b7 1377 dont_overwrite_tcp_buffer.reset();
klauss 121:ee02790d00b7 1378 for ( ; i < sizeof( VZ_call ); i++ )
klauss 121:ee02790d00b7 1379 {
klauss 121:ee02790d00b7 1380 char tmp[ 16 ];
klauss 121:ee02790d00b7 1381 sprintf( tmp, "%x ", *ptr++ );
klauss 121:ee02790d00b7 1382 strcat( aux, tmp );
klauss 121:ee02790d00b7 1383 count++;
klauss 121:ee02790d00b7 1384
klauss 121:ee02790d00b7 1385 if ( count >= 32 )
klauss 121:ee02790d00b7 1386 {
klauss 121:ee02790d00b7 1387 count = 0;
klauss 121:ee02790d00b7 1388 i++;
klauss 121:ee02790d00b7 1389 break;
klauss 121:ee02790d00b7 1390 }
klauss 121:ee02790d00b7 1391 }
klauss 121:ee02790d00b7 1392 strcat ( aux, "\n\r\0" );
klauss 121:ee02790d00b7 1393 tcp_client.send_all ( ( char *)aux, strlen( (char * )aux ) );
klauss 121:ee02790d00b7 1394 if ( i >= sizeof ( VZ_call ) ) finished = true;
klauss 121:ee02790d00b7 1395 strcpy ( aux, "\0" );
klauss 121:ee02790d00b7 1396 }
klauss 121:ee02790d00b7 1397 }
klauss 121:ee02790d00b7 1398 dont_overwrite_tcp_buffer.reset();
klauss 121:ee02790d00b7 1399 dont_overwrite_tcp_buffer.stop();
klauss 121:ee02790d00b7 1400 tcp_client.send_all ( "\r\n> ", strlen( "\r\n> " ) );
klauss 121:ee02790d00b7 1401 }
klauss 121:ee02790d00b7 1402 }
klauss 121:ee02790d00b7 1403 }
klauss 121:ee02790d00b7 1404 else
klauss 121:ee02790d00b7 1405 {
klauss 121:ee02790d00b7 1406 if( print_values )
klauss 121:ee02790d00b7 1407 {
klauss 121:ee02790d00b7 1408 debug_msg("Call %d not found", print_this_call );
klauss 121:ee02790d00b7 1409 }
klauss 121:ee02790d00b7 1410 else
klauss 121:ee02790d00b7 1411 {
klauss 121:ee02790d00b7 1412 send_msg("Call %d not found", print_this_call );
klauss 121:ee02790d00b7 1413 }
klauss 121:ee02790d00b7 1414 }
klauss 121:ee02790d00b7 1415
klauss 121:ee02790d00b7 1416 return ( 0 );
klauss 121:ee02790d00b7 1417 }
klauss 121:ee02790d00b7 1418
klauss 121:ee02790d00b7 1419
klauss 121:ee02790d00b7 1420 int show_cb_rtp ( void )
klauss 121:ee02790d00b7 1421 {
klauss 126:1f90756250fb 1422 VZ_call * call = find_Call ( v_call, print_hex_this_rtp );
klauss 121:ee02790d00b7 1423
klauss 121:ee02790d00b7 1424 uint8_t * ptr = NULL;
klauss 126:1f90756250fb 1425 if( call not_eq NULL )
klauss 121:ee02790d00b7 1426 {
klauss 121:ee02790d00b7 1427 ptr = ( uint8_t * ) call -> check_rtp ();
klauss 121:ee02790d00b7 1428 }
klauss 121:ee02790d00b7 1429
klauss 126:1f90756250fb 1430 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1431 {
klauss 121:ee02790d00b7 1432 send_msg ("Values :: %p\r\n", ( void *) ptr );
klauss 121:ee02790d00b7 1433 for ( register int i = 0; i < sizeof( RTP ); i++ )
klauss 121:ee02790d00b7 1434 {
klauss 121:ee02790d00b7 1435 if( debug_uart3 ) pc.printf("%x", *ptr++ );
klauss 121:ee02790d00b7 1436
klauss 121:ee02790d00b7 1437 if ( ( i % 32 ) == 0 )
klauss 121:ee02790d00b7 1438 {
klauss 126:1f90756250fb 1439 if( i not_eq 0 )
klauss 121:ee02790d00b7 1440 {
klauss 121:ee02790d00b7 1441 if( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1442 }
klauss 121:ee02790d00b7 1443 else
klauss 121:ee02790d00b7 1444 {
klauss 121:ee02790d00b7 1445 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1446 }
klauss 121:ee02790d00b7 1447 }
klauss 121:ee02790d00b7 1448 else
klauss 121:ee02790d00b7 1449 {
klauss 121:ee02790d00b7 1450 if( debug_uart3 ) pc.printf(" ");
klauss 121:ee02790d00b7 1451 }
klauss 121:ee02790d00b7 1452 }
klauss 121:ee02790d00b7 1453 if ( debug_uart3 ) pc.printf("\n\r> ");
klauss 121:ee02790d00b7 1454
klauss 121:ee02790d00b7 1455 if ( tcp_session ) {
klauss 121:ee02790d00b7 1456 char aux[ ( 32 * 3 ) + 5 ];
klauss 121:ee02790d00b7 1457
klauss 121:ee02790d00b7 1458 for ( register int i = 0; i < ( 32 * 3 ) + 5 ; i++ ) aux [ i ] = 0;
klauss 121:ee02790d00b7 1459
klauss 121:ee02790d00b7 1460 ptr = NULL;
klauss 121:ee02790d00b7 1461
klauss 126:1f90756250fb 1462 VZ_call * call = find_Call ( v_call, print_hex_this_rtp );
klauss 121:ee02790d00b7 1463
klauss 121:ee02790d00b7 1464 uint8_t * ptr = NULL;
klauss 126:1f90756250fb 1465 if( call not_eq NULL )
klauss 121:ee02790d00b7 1466 {
klauss 121:ee02790d00b7 1467 ptr = ( uint8_t * ) call -> check_rtp ();
klauss 121:ee02790d00b7 1468 }
klauss 121:ee02790d00b7 1469
klauss 126:1f90756250fb 1470 if ( ptr not_eq NULL )
klauss 121:ee02790d00b7 1471 {
klauss 121:ee02790d00b7 1472 bool finished = false;
klauss 121:ee02790d00b7 1473 volatile int i = 0;
klauss 121:ee02790d00b7 1474 int count = 0;
klauss 121:ee02790d00b7 1475 Timer dont_overwrite_tcp_buffer;
klauss 121:ee02790d00b7 1476 dont_overwrite_tcp_buffer.reset ();
klauss 121:ee02790d00b7 1477 dont_overwrite_tcp_buffer.start ();
klauss 121:ee02790d00b7 1478
klauss 121:ee02790d00b7 1479 while ( !finished )
klauss 121:ee02790d00b7 1480 {
klauss 121:ee02790d00b7 1481 if( dont_overwrite_tcp_buffer.read_ms () >= 20 )
klauss 121:ee02790d00b7 1482 {
klauss 121:ee02790d00b7 1483 dont_overwrite_tcp_buffer.reset();
klauss 121:ee02790d00b7 1484 for ( ; i < sizeof( RTP ); i++ )
klauss 121:ee02790d00b7 1485 {
klauss 121:ee02790d00b7 1486 char tmp[ 16 ];
klauss 121:ee02790d00b7 1487 sprintf( tmp, "%x ", *ptr++ );
klauss 121:ee02790d00b7 1488 strcat( aux, tmp );
klauss 121:ee02790d00b7 1489 count++;
klauss 121:ee02790d00b7 1490
klauss 121:ee02790d00b7 1491 if ( count >= 32 )
klauss 121:ee02790d00b7 1492 {
klauss 121:ee02790d00b7 1493 count = 0;
klauss 121:ee02790d00b7 1494 i++;
klauss 121:ee02790d00b7 1495 break;
klauss 121:ee02790d00b7 1496 }
klauss 121:ee02790d00b7 1497 }
klauss 121:ee02790d00b7 1498 strcat ( aux, "\n\r\0" );
klauss 121:ee02790d00b7 1499 tcp_client.send_all ( ( char *)aux, strlen( (char * )aux ) );
klauss 121:ee02790d00b7 1500 if ( i >= sizeof ( RTP ) ) finished = true;
klauss 121:ee02790d00b7 1501 strcpy ( aux, "\0" );
klauss 121:ee02790d00b7 1502 }
klauss 121:ee02790d00b7 1503 }
klauss 121:ee02790d00b7 1504 dont_overwrite_tcp_buffer.reset();
klauss 121:ee02790d00b7 1505 dont_overwrite_tcp_buffer.stop();
klauss 121:ee02790d00b7 1506 tcp_client.send_all ( "\r\n> ", strlen( "\r\n> " ) );
klauss 121:ee02790d00b7 1507 }
klauss 121:ee02790d00b7 1508 }
klauss 121:ee02790d00b7 1509 }
klauss 121:ee02790d00b7 1510 else
klauss 121:ee02790d00b7 1511 {
klauss 121:ee02790d00b7 1512 if( print_values )
klauss 121:ee02790d00b7 1513 {
klauss 121:ee02790d00b7 1514 debug_msg("Call %d not found", print_this_rtp );
klauss 121:ee02790d00b7 1515 }
klauss 121:ee02790d00b7 1516 else
klauss 121:ee02790d00b7 1517 {
klauss 121:ee02790d00b7 1518 send_msg("Call %d not found", print_this_rtp );
klauss 121:ee02790d00b7 1519 }
klauss 121:ee02790d00b7 1520 }
klauss 121:ee02790d00b7 1521
klauss 121:ee02790d00b7 1522 return ( 0 );
klauss 121:ee02790d00b7 1523 }
klauss 121:ee02790d00b7 1524
klauss 121:ee02790d00b7 1525 int show_cb_hex_rtp ( void )
klauss 121:ee02790d00b7 1526 {
klauss 126:1f90756250fb 1527 VZ_call * call = find_Call ( v_call, print_this_rtp );
klauss 121:ee02790d00b7 1528
klauss 126:1f90756250fb 1529 if ( call not_eq NULL )
klauss 121:ee02790d00b7 1530 {
klauss 126:1f90756250fb 1531 if ( call -> check_rtp () not_eq NULL )
klauss 121:ee02790d00b7 1532 {
klauss 121:ee02790d00b7 1533 send_msg ("Values :: %p\r\n", ( void *) call -> check_rtp () );
klauss 121:ee02790d00b7 1534 call -> rtp_print_yourself ();
klauss 121:ee02790d00b7 1535 }
klauss 121:ee02790d00b7 1536 else
klauss 121:ee02790d00b7 1537 {
klauss 121:ee02790d00b7 1538 if( print_values )
klauss 121:ee02790d00b7 1539 {
klauss 121:ee02790d00b7 1540 debug_msg("Call->RTP %d not found", print_this_rtp );
klauss 121:ee02790d00b7 1541 }
klauss 121:ee02790d00b7 1542 else
klauss 121:ee02790d00b7 1543 {
klauss 121:ee02790d00b7 1544 send_msg("Call->RTP %d not found", print_this_rtp );
klauss 121:ee02790d00b7 1545 }
klauss 121:ee02790d00b7 1546 }
klauss 121:ee02790d00b7 1547 }
klauss 121:ee02790d00b7 1548 else
klauss 121:ee02790d00b7 1549 {
klauss 121:ee02790d00b7 1550 if( print_values )
klauss 121:ee02790d00b7 1551 {
klauss 121:ee02790d00b7 1552 debug_msg("Call->RTP %d not found", print_this_rtp );
klauss 121:ee02790d00b7 1553 }
klauss 121:ee02790d00b7 1554 else
klauss 121:ee02790d00b7 1555 {
klauss 121:ee02790d00b7 1556 send_msg("Call->RTP %d not found", print_this_rtp );
klauss 121:ee02790d00b7 1557 }
klauss 121:ee02790d00b7 1558 }
klauss 121:ee02790d00b7 1559
klauss 121:ee02790d00b7 1560 return ( 0 );
klauss 121:ee02790d00b7 1561 }
klauss 121:ee02790d00b7 1562
klauss 121:ee02790d00b7 1563
klauss 121:ee02790d00b7 1564 int reset_stats_cks ( void )
klauss 121:ee02790d00b7 1565 {
klauss 121:ee02790d00b7 1566 pkg_cksok = 0;
klauss 121:ee02790d00b7 1567 pkg_ckserr = 0;
klauss 121:ee02790d00b7 1568 pkg_zero = 0;
klauss 121:ee02790d00b7 1569 out_of_range = 0;
klauss 121:ee02790d00b7 1570 missed_pkg = 0;
klauss 121:ee02790d00b7 1571 delayed_pkg_to_cb = 0;
klauss 121:ee02790d00b7 1572 cpld_pkg_tx_counter = 0;
klauss 121:ee02790d00b7 1573 cpld_pkg_rx_counter = 0;
klauss 121:ee02790d00b7 1574
klauss 121:ee02790d00b7 1575 return ( 0 );
klauss 121:ee02790d00b7 1576 }
klauss 121:ee02790d00b7 1577
klauss 121:ee02790d00b7 1578 int show_cb_stats ( void )
klauss 121:ee02790d00b7 1579 {
klauss 121:ee02790d00b7 1580 send_msg(
klauss 121:ee02790d00b7 1581 "\r\n"
klauss 121:ee02790d00b7 1582 " PKG_CKS OK: %d ( %003.2f )\r\n"
klauss 121:ee02790d00b7 1583 " PKG_CKS ERR: %d ( %003.2f )\r\n"
klauss 121:ee02790d00b7 1584 " PKG_0: %d ( %003.2f )\r\n"
klauss 121:ee02790d00b7 1585 " Out_of_range: %d ( %003.2f )\r\n"
klauss 121:ee02790d00b7 1586 " Miss_Pkg: %d\r\n"
klauss 121:ee02790d00b7 1587 " TX_delayed: %d\n\r"
klauss 121:ee02790d00b7 1588 " TX_Counter: %d\n\r"
klauss 121:ee02790d00b7 1589 " RX_Counter: %d\r\n",
klauss 121:ee02790d00b7 1590 pkg_cksok, ( cpld_pkg_rx_counter == 0 ) ? 0.00 : ( ( double ) pkg_cksok / cpld_pkg_rx_counter ) * 100,
klauss 121:ee02790d00b7 1591 pkg_ckserr, ( cpld_pkg_rx_counter == 0 ) ? 0.00 : ( ( double ) pkg_ckserr / cpld_pkg_rx_counter ) * 100,
klauss 121:ee02790d00b7 1592 pkg_zero, ( cpld_pkg_rx_counter == 0 ) ? 0.00 : ( ( double ) pkg_zero / cpld_pkg_rx_counter ) * 100,
klauss 121:ee02790d00b7 1593 out_of_range, ( cpld_pkg_rx_counter == 0 ) ? 0.00 : ( ( double ) out_of_range / cpld_pkg_rx_counter ) * 100,
klauss 121:ee02790d00b7 1594 missed_pkg,
klauss 121:ee02790d00b7 1595 delayed_pkg_to_cb,
klauss 121:ee02790d00b7 1596 cpld_pkg_tx_counter,
klauss 121:ee02790d00b7 1597 cpld_pkg_rx_counter
klauss 121:ee02790d00b7 1598 );
klauss 121:ee02790d00b7 1599
klauss 121:ee02790d00b7 1600 return ( 0 );
klauss 121:ee02790d00b7 1601 }
klauss 121:ee02790d00b7 1602
klauss 121:ee02790d00b7 1603
klauss 121:ee02790d00b7 1604 int reset_missed_send_udp ( void )
klauss 121:ee02790d00b7 1605 {
klauss 121:ee02790d00b7 1606 miss_fw_send_pkg = 0;
klauss 121:ee02790d00b7 1607 miss_prompt_udp_send_pkg = 0;
klauss 121:ee02790d00b7 1608 miss_sip_registry_send_pkg = 0;
klauss 121:ee02790d00b7 1609 miss_sip_invite_send_pkg = 0;
klauss 121:ee02790d00b7 1610 miss_sip_bye_send_pkg = 0;
klauss 121:ee02790d00b7 1611 miss_sip_unregistry_send_pkg = 0;
klauss 121:ee02790d00b7 1612 miss_sip_ok_send_pkg = 0;
klauss 121:ee02790d00b7 1613 miss_sip_rcv_bye_send_pkg = 0;
klauss 121:ee02790d00b7 1614 miss_wdt_send_pkg = 0;
klauss 121:ee02790d00b7 1615 miss_prompt_udp_send_pkg = 0;
klauss 121:ee02790d00b7 1616 miss_ftp_udp_send_pkg = 0;
klauss 121:ee02790d00b7 1617 miss_prompt_udp_rcv_pkg = 0;
klauss 121:ee02790d00b7 1618
klauss 121:ee02790d00b7 1619 return ( 0 );
klauss 121:ee02790d00b7 1620 }
klauss 121:ee02790d00b7 1621
klauss 121:ee02790d00b7 1622 int show_missed_send_udp_pkg ( void )
klauss 121:ee02790d00b7 1623 {
klauss 121:ee02790d00b7 1624 send_msg( "\r\nMissed pkgs ::\r\n "
klauss 121:ee02790d00b7 1625 "FW: %d\r\n "
klauss 121:ee02790d00b7 1626 "Prompt UDP %d\r\n "
klauss 121:ee02790d00b7 1627 "Registry %d\r\n "
klauss 121:ee02790d00b7 1628 "Invite %d\r\n "
klauss 121:ee02790d00b7 1629 "Bye %d\r\n "
klauss 121:ee02790d00b7 1630 "Unregistry %d\r\n "
klauss 121:ee02790d00b7 1631 "UDP incoming ( invite ans ) %d\r\n "
klauss 121:ee02790d00b7 1632 "UDP incoming ( bye from * ) %d\r\n "
klauss 121:ee02790d00b7 1633 "Wdt [ alive | rst ] %d\r\n "
klauss 121:ee02790d00b7 1634 "Rcv prompt %d\r\n "
klauss 121:ee02790d00b7 1635 "[ debug | send ]_msg %d\r\n "
klauss 121:ee02790d00b7 1636 "RTP %d\r\n",
klauss 121:ee02790d00b7 1637 miss_fw_send_pkg,
klauss 121:ee02790d00b7 1638 miss_prompt_udp_send_pkg,
klauss 121:ee02790d00b7 1639 miss_sip_registry_send_pkg,
klauss 121:ee02790d00b7 1640 miss_sip_invite_send_pkg,
klauss 121:ee02790d00b7 1641 miss_sip_bye_send_pkg,
klauss 121:ee02790d00b7 1642 miss_sip_unregistry_send_pkg,
klauss 121:ee02790d00b7 1643 miss_sip_ok_send_pkg,
klauss 121:ee02790d00b7 1644 miss_sip_rcv_bye_send_pkg,
klauss 121:ee02790d00b7 1645 miss_wdt_send_pkg,
klauss 121:ee02790d00b7 1646 miss_prompt_udp_send_pkg,
klauss 121:ee02790d00b7 1647 miss_prompt_udp_rcv_pkg,
klauss 121:ee02790d00b7 1648 miss_ftp_udp_send_pkg
klauss 121:ee02790d00b7 1649 );
klauss 121:ee02790d00b7 1650
klauss 121:ee02790d00b7 1651 return ( 0 );
klauss 121:ee02790d00b7 1652 }
klauss 121:ee02790d00b7 1653
klauss 121:ee02790d00b7 1654 int invite_ack_to_cb_handler ( Vector * v_cb, Vector * v_call )
klauss 121:ee02790d00b7 1655 {
klauss 121:ee02790d00b7 1656 static int retry_invite_pkg = 0;
klauss 121:ee02790d00b7 1657 bool need_retry = false;
klauss 121:ee02790d00b7 1658 Call_Box * cb = NULL;
klauss 121:ee02790d00b7 1659
klauss 126:1f90756250fb 1660 for ( register int i = 0; i < v_cb -> size (); i++ )
klauss 121:ee02790d00b7 1661 {
klauss 121:ee02790d00b7 1662 retry_invite_pkg++;
klauss 126:1f90756250fb 1663 if ( retry_invite_pkg >= v_cb->size () ) retry_invite_pkg = 0;
klauss 121:ee02790d00b7 1664
klauss 126:1f90756250fb 1665 cb = (Call_Box * )v_cb -> get_element ( i );
klauss 126:1f90756250fb 1666 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 1667 {
klauss 126:1f90756250fb 1668 if ( ( cb -> get_status () == cb_ringing ) or ( cb -> get_status () == cb_trying ) or ( cb -> get_status () == cb_on_call ) )
klauss 121:ee02790d00b7 1669 {
klauss 121:ee02790d00b7 1670 need_retry = true;
klauss 121:ee02790d00b7 1671 break;
klauss 121:ee02790d00b7 1672 }
klauss 121:ee02790d00b7 1673 }
klauss 121:ee02790d00b7 1674 }
klauss 121:ee02790d00b7 1675
klauss 121:ee02790d00b7 1676 if ( need_retry )
klauss 121:ee02790d00b7 1677 {
klauss 126:1f90756250fb 1678 if ( cb -> get_invite_response () == false )
klauss 121:ee02790d00b7 1679 {
klauss 126:1f90756250fb 1680 buffer [ TIMESLICE_PLACE ] = cb -> get_timeslice ();
klauss 126:1f90756250fb 1681
klauss 126:1f90756250fb 1682 do_not_show_this_invite_pkg = true;
klauss 126:1f90756250fb 1683
klauss 126:1f90756250fb 1684 send2callboxes ( build_cb_package ( cb -> get_ext (), cb -> get_port (), INVITE, ( char * )buffer,
klauss 126:1f90756250fb 1685 cb -> msg_id_update (), CB_BUFFER_SIZE - VZ_HEADER_OFFSET, write_buffer ) );
klauss 121:ee02790d00b7 1686
klauss 126:1f90756250fb 1687 //if ( debug_invite ) debug_msg ("[%d] resend invite OK to Cbx : ( %d, %d )", cb -> get_ext (), cb -> get_ext (), cb -> get_port () );
klauss 121:ee02790d00b7 1688 }
klauss 121:ee02790d00b7 1689
klauss 126:1f90756250fb 1690 if ( find_Call ( v_call, cb->get_ext () ) == NULL )
klauss 121:ee02790d00b7 1691 {
klauss 121:ee02790d00b7 1692
klauss 126:1f90756250fb 1693 if ( ( ( cb -> get_status () == cb_ringing ) or ( cb -> get_status () == cb_trying ) ) )
klauss 121:ee02790d00b7 1694 {
klauss 121:ee02790d00b7 1695 char rtp_src_tmp_write_buffer [ CB_BUFFER_SIZE ];
klauss 121:ee02790d00b7 1696 uint8_t rtp_dst_tmp_write_buffer [ CB_BUFFER_SIZE ];
klauss 121:ee02790d00b7 1697
klauss 126:1f90756250fb 1698 for ( register int i = 0; i < RTP_MSG_SIZE; i++ ) rtp_src_tmp_write_buffer [ i ] = 0x00;
klauss 121:ee02790d00b7 1699
klauss 126:1f90756250fb 1700 send2callboxes ( build_cb_package ( cb -> get_ext (), cb -> get_port (), AUDIO,
klauss 121:ee02790d00b7 1701 rtp_src_tmp_write_buffer, AUDIO, RTP_MSG_SIZE, rtp_dst_tmp_write_buffer ) );
klauss 121:ee02790d00b7 1702 } else {
klauss 121:ee02790d00b7 1703 if ( cb->get_invite_retry_count() == 0 )
klauss 121:ee02790d00b7 1704 {
klauss 121:ee02790d00b7 1705 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
klauss 121:ee02790d00b7 1706
klauss 121:ee02790d00b7 1707 for ( register uint8_t i = 0; i < v_call->size(); i++ )
klauss 121:ee02790d00b7 1708 {
klauss 121:ee02790d00b7 1709 VZ_call * call = ( VZ_call * )v_call->get_element( i );
klauss 121:ee02790d00b7 1710 if( call->get_cb_ext() == cb->get_ext() )
klauss 121:ee02790d00b7 1711 {
klauss 121:ee02790d00b7 1712 v_call->remove_element( i );
klauss 126:1f90756250fb 1713 if( call not_eq NULL ) delete( call );
klauss 121:ee02790d00b7 1714 break;
klauss 121:ee02790d00b7 1715 }
klauss 121:ee02790d00b7 1716 }
klauss 121:ee02790d00b7 1717
klauss 121:ee02790d00b7 1718 ts->return_timeslice( cb->call_end () );
klauss 121:ee02790d00b7 1719
klauss 121:ee02790d00b7 1720 if( debug_invite ) debug_msg( "[%d]-- No audio pkgs --", cb->get_ext () );
klauss 121:ee02790d00b7 1721 }
klauss 121:ee02790d00b7 1722 }
klauss 121:ee02790d00b7 1723 }
klauss 121:ee02790d00b7 1724 }
klauss 121:ee02790d00b7 1725
klauss 121:ee02790d00b7 1726 return ( 0 );
klauss 121:ee02790d00b7 1727 }
klauss 121:ee02790d00b7 1728
klauss 121:ee02790d00b7 1729 int check_audio_from_ast ( Vector * v_cb, Vector * v_call )
klauss 121:ee02790d00b7 1730 {
klauss 126:1f90756250fb 1731 for( register uint8_t i = 0; i < v_call->size(); i++ )
klauss 126:1f90756250fb 1732 {
klauss 126:1f90756250fb 1733 VZ_call * call = ( VZ_call * ) v_call -> get_element ( i );
klauss 126:1f90756250fb 1734 if ( call not_eq NULL )
klauss 121:ee02790d00b7 1735 {
klauss 121:ee02790d00b7 1736 int length = 0;
klauss 126:1f90756250fb 1737 char * tmp = call -> get_eth_message ( &length );
klauss 126:1f90756250fb 1738 if( tmp not_eq NULL )
klauss 126:1f90756250fb 1739 {
klauss 121:ee02790d00b7 1740 int cb_port = 0xffff;
klauss 126:1f90756250fb 1741 Call_Box * cb = find_CB ( v_cb, call -> get_cb_ext () );
klauss 121:ee02790d00b7 1742
klauss 126:1f90756250fb 1743 if( cb not_eq NULL )
klauss 126:1f90756250fb 1744 {
klauss 126:1f90756250fb 1745 cb_port = cb -> get_port ();
klauss 121:ee02790d00b7 1746
klauss 121:ee02790d00b7 1747 if ( drop_rtp_from_ast_pkg )
klauss 121:ee02790d00b7 1748 {
klauss 121:ee02790d00b7 1749 led1 = !led1;
klauss 121:ee02790d00b7 1750 }
klauss 121:ee02790d00b7 1751 else
klauss 121:ee02790d00b7 1752 {
klauss 126:1f90756250fb 1753 uint8_t * pkg2cb = build_cb_package ( call -> get_cb_ext (), cb_port, AUDIO,
klauss 121:ee02790d00b7 1754 tmp, AUDIO, length, write_buffer );
klauss 121:ee02790d00b7 1755
klauss 121:ee02790d00b7 1756 send2callboxes( pkg2cb );
klauss 121:ee02790d00b7 1757 }
klauss 121:ee02790d00b7 1758
klauss 126:1f90756250fb 1759 } else if ( debug_main ) debug_msg ("[%d] received missed package -- Type :: %i", ext, type );
klauss 121:ee02790d00b7 1760 }
klauss 121:ee02790d00b7 1761 }
klauss 121:ee02790d00b7 1762 }
klauss 121:ee02790d00b7 1763
klauss 121:ee02790d00b7 1764 return ( 0 );
klauss 121:ee02790d00b7 1765 }
klauss 121:ee02790d00b7 1766
klauss 121:ee02790d00b7 1767 int wake_up_or_refresh_handler ( Vector * v_cb )
klauss 121:ee02790d00b7 1768 {
klauss 126:1f90756250fb 1769 int return_value = 0;
klauss 126:1f90756250fb 1770
klauss 126:1f90756250fb 1771 if( timer_sync_refresh.read_ms() > 250 * 2 )
klauss 126:1f90756250fb 1772 {
klauss 121:ee02790d00b7 1773 timer_sync_refresh.reset();
klauss 121:ee02790d00b7 1774
klauss 121:ee02790d00b7 1775 static uint8_t time_to_mode = TIME_TO_REFRESH;
klauss 121:ee02790d00b7 1776
klauss 121:ee02790d00b7 1777 if ( time_to_mode == TIME_TO_REFRESH ){
klauss 121:ee02790d00b7 1778 time_to_mode = TIME_TO_WAKE_UP;
klauss 126:1f90756250fb 1779 if ( !do_not_refresh ) return_value = refresh ( v_cb );
klauss 121:ee02790d00b7 1780 } else {
klauss 121:ee02790d00b7 1781 time_to_mode = TIME_TO_REFRESH;
klauss 121:ee02790d00b7 1782 if ( wake_all ) if ( v_call->size() == 0 ) wake_all_up ( v_cb );
klauss 121:ee02790d00b7 1783 }
klauss 121:ee02790d00b7 1784 }
klauss 121:ee02790d00b7 1785
klauss 126:1f90756250fb 1786 return ( return_value );
klauss 121:ee02790d00b7 1787 }
klauss 121:ee02790d00b7 1788
klauss 121:ee02790d00b7 1789 int check_sip_messages_from_ast ( Vector * v_cb, Vector * v_call )
klauss 121:ee02790d00b7 1790 {
klauss 121:ee02790d00b7 1791 // check sip messages only for cbx in call ?
klauss 121:ee02790d00b7 1792 int ext_to__be_removed = sip_manager( v_cb );
klauss 121:ee02790d00b7 1793 if( ext_to__be_removed > 0 ) {
klauss 121:ee02790d00b7 1794 Call_Box * cb = find_CB( v_cb, ext_to__be_removed );
klauss 126:1f90756250fb 1795 if( cb not_eq NULL ) {
klauss 126:1f90756250fb 1796 //if( cb->status == cb_on_call ) // poderia ser if( cb->status not_eq cb_idle ) ???
klauss 121:ee02790d00b7 1797 if ( cb -> get_status () == cb_on_call )
klauss 121:ee02790d00b7 1798 {
klauss 121:ee02790d00b7 1799 buffer[ TIMESLICE_PLACE ] = 0;
klauss 121:ee02790d00b7 1800
klauss 121:ee02790d00b7 1801 for( register uint8_t i = 0; i < v_call->size(); i++ ) {
klauss 121:ee02790d00b7 1802 VZ_call * call = ( VZ_call * )v_call->get_element( i );
klauss 121:ee02790d00b7 1803 if( call->get_cb_ext() == ext_to__be_removed ) {
klauss 121:ee02790d00b7 1804 v_call->remove_element( i );
klauss 121:ee02790d00b7 1805 delete( call );
klauss 121:ee02790d00b7 1806 }
klauss 121:ee02790d00b7 1807 }
klauss 121:ee02790d00b7 1808
klauss 121:ee02790d00b7 1809 ts->return_timeslice( cb->call_end ( false ) );
klauss 121:ee02790d00b7 1810
klauss 121:ee02790d00b7 1811 send2callboxes( build_cb_package( cb->get_ext (), cb->get_port (), CB_BYE,
klauss 121:ee02790d00b7 1812 ( char * )buffer, cb->get_msg_id(), CB_BUFFER_SIZE - VZ_HEADER_OFFSET, write_buffer ) );
klauss 121:ee02790d00b7 1813
klauss 121:ee02790d00b7 1814 if( debug_invite ) debug_msg("[%d] Received Bye from *", cb->get_ext () );
klauss 121:ee02790d00b7 1815 }
klauss 121:ee02790d00b7 1816 } else if( debug_main ) debug_msg("[%d] Missed bye request", ext_to__be_removed );
klauss 121:ee02790d00b7 1817 }
klauss 121:ee02790d00b7 1818
klauss 121:ee02790d00b7 1819 return ( 0 );
klauss 121:ee02790d00b7 1820 }
klauss 121:ee02790d00b7 1821
klauss 121:ee02790d00b7 1822 int check_for_runaways_ts ( Vector * v_cb, Timeslice * ts )
klauss 121:ee02790d00b7 1823 {
klauss 126:1f90756250fb 1824 if( ( v_call->size() == 0 ) && ( ts->remain_timeslices() not_eq MAX_TIMESLICES ) ) {
klauss 121:ee02790d00b7 1825 bool ts_reset = true;
klauss 121:ee02790d00b7 1826 for( register uint8_t i = 0; i < v_cb->size(); i++ ) {
klauss 121:ee02790d00b7 1827 uint16_t cb_status = ((Call_Box *)v_cb->get_element( i ))->get_status();
klauss 121:ee02790d00b7 1828 uint16_t cb_sip_status = ((Call_Box *)v_cb->get_element( i ))->get_sip_status();
klauss 121:ee02790d00b7 1829
klauss 126:1f90756250fb 1830 if ((cb_status not_eq cb_idle) and (cb_sip_status not_eq sip_idle)) {
klauss 121:ee02790d00b7 1831 ts_reset = false;
klauss 121:ee02790d00b7 1832 break;
klauss 121:ee02790d00b7 1833 }
klauss 121:ee02790d00b7 1834
klauss 121:ee02790d00b7 1835 }
klauss 121:ee02790d00b7 1836 if( ts_reset && !bl_start_flag )
klauss 121:ee02790d00b7 1837 {
klauss 121:ee02790d00b7 1838 if( debug_invite ) debug_msg("Resetando TS");
klauss 121:ee02790d00b7 1839 ts->reset();
klauss 121:ee02790d00b7 1840 }
klauss 121:ee02790d00b7 1841 }
klauss 121:ee02790d00b7 1842
klauss 121:ee02790d00b7 1843 return ( 0 );
klauss 121:ee02790d00b7 1844 }
klauss 121:ee02790d00b7 1845
klauss 121:ee02790d00b7 1846 int show_wdt_status ( void )
klauss 121:ee02790d00b7 1847 {
klauss 121:ee02790d00b7 1848 send_msg("lpc_low_level_input_counter :: %d", lpc_low_level_input_counter );
klauss 121:ee02790d00b7 1849
klauss 121:ee02790d00b7 1850 lpc_low_level_input_counter = 0;
klauss 121:ee02790d00b7 1851
klauss 121:ee02790d00b7 1852 if( eth_status == 0 ) {
klauss 121:ee02790d00b7 1853 send_msg( "Wdt last reset: %s - status_eth :: Connected - Extern Wdt idle for :: %3d sec ( %3d ) - Rx from CBx idle for :: %3d sec ( %3d )",
klauss 121:ee02790d00b7 1854 ( wdt.WatchdogCausedReset() ) ? "true" : "false",
klauss 121:ee02790d00b7 1855 EXTERN_WDT_IDLE - external_wdt,
klauss 121:ee02790d00b7 1856 EXTERN_WDT_IDLE,
klauss 121:ee02790d00b7 1857 RX_CB_IDLE - pkg_wdt,
klauss 121:ee02790d00b7 1858 RX_CB_IDLE
klauss 121:ee02790d00b7 1859 );
klauss 121:ee02790d00b7 1860 } else {
klauss 121:ee02790d00b7 1861 send_msg( "Wdt last reset: %s - status_eth :: Disconnected :: since %3d sec - Extern Wdt idle for :: %3d sec ( %3d ) - Rx from CBx idle for :: %3d sec ( %3d )",
klauss 121:ee02790d00b7 1862 ( wdt.WatchdogCausedReset() ) ? "true" : "false",
klauss 121:ee02790d00b7 1863 ETH_CONNECT_TIMEOUT - eth_wdt,
klauss 121:ee02790d00b7 1864 EXTERN_WDT_IDLE - external_wdt,
klauss 121:ee02790d00b7 1865 EXTERN_WDT_IDLE,
klauss 121:ee02790d00b7 1866 RX_CB_IDLE - pkg_wdt,
klauss 121:ee02790d00b7 1867 RX_CB_IDLE
klauss 121:ee02790d00b7 1868 );
klauss 121:ee02790d00b7 1869 }
klauss 121:ee02790d00b7 1870
klauss 121:ee02790d00b7 1871 return ( 0 );
klauss 121:ee02790d00b7 1872 }
klauss 121:ee02790d00b7 1873
klauss 121:ee02790d00b7 1874
klauss 121:ee02790d00b7 1875 int wdt_update ( void )
klauss 121:ee02790d00b7 1876 {
klauss 121:ee02790d00b7 1877 uptime++;
klauss 121:ee02790d00b7 1878
klauss 121:ee02790d00b7 1879 current_time++;
klauss 121:ee02790d00b7 1880
klauss 122:480c44b0e205 1881 if ( wdt_show ) debug_wdt = true;
klauss 121:ee02790d00b7 1882
klauss 122:480c44b0e205 1883 if ( external_wdt ) external_wdt--;
klauss 122:480c44b0e205 1884 if ( pkg_wdt ) pkg_wdt--;
klauss 122:480c44b0e205 1885 if ( eth_wdt ) eth_wdt--;
klauss 121:ee02790d00b7 1886
klauss 122:480c44b0e205 1887 if ( eth_wdt && external_wdt && pkg_wdt ){
klauss 121:ee02790d00b7 1888 wdt.kick();
klauss 122:480c44b0e205 1889 return ( 0 );
klauss 121:ee02790d00b7 1890 }
klauss 121:ee02790d00b7 1891
klauss 122:480c44b0e205 1892 return ( 1 );
klauss 121:ee02790d00b7 1893 }
klauss 121:ee02790d00b7 1894
klauss 121:ee02790d00b7 1895 int check_for_unwanted_rtp_ports ( Vector * v_cb )
klauss 121:ee02790d00b7 1896 {
klauss 121:ee02790d00b7 1897 for ( register uint8_t i = 0; i < v_cb->size(); i++ )
klauss 121:ee02790d00b7 1898 {
klauss 121:ee02790d00b7 1899 Call_Box * cb = (Call_Box *) v_cb->get_element (i);
klauss 126:1f90756250fb 1900 if ( cb not_eq NULL )
klauss 121:ee02790d00b7 1901 {
klauss 121:ee02790d00b7 1902 if ( ( cb->get_status () == cb_idle ) && ( cb->get_sip_status () == sip_idle ) && ( cb -> is_rtp_timer_timeout () ) )
klauss 121:ee02790d00b7 1903 {
klauss 121:ee02790d00b7 1904 if ( debug_reset_rtp ) debug_msg( "[%d] rtp reset", cb -> get_ext () );
klauss 121:ee02790d00b7 1905 cb -> cb_set_status( cb_idle );
klauss 121:ee02790d00b7 1906 cb -> set_sip_status ( sip_idle );
klauss 121:ee02790d00b7 1907 cb -> reset_rtp_timer ();
klauss 121:ee02790d00b7 1908 cb -> set_rtp_port ( 0 );
klauss 121:ee02790d00b7 1909 }
klauss 121:ee02790d00b7 1910 }
klauss 121:ee02790d00b7 1911 }
klauss 121:ee02790d00b7 1912 return ( 0 );
klauss 121:ee02790d00b7 1913 }
klauss 121:ee02790d00b7 1914
klauss 121:ee02790d00b7 1915
klauss 121:ee02790d00b7 1916 int process_received_pkg_from_cbx ( void )
klauss 121:ee02790d00b7 1917 {
klauss 121:ee02790d00b7 1918 pkg_wdt = RX_CB_IDLE;
klauss 124:c1b6c893e1c3 1919
klauss 126:1f90756250fb 1920 // short path
klauss 125:8ff4dc96ad58 1921 if ( buffer_from_cb_ptr [ TYPE_PLACE ] == AUDIO )
klauss 124:c1b6c893e1c3 1922 {
klauss 125:8ff4dc96ad58 1923 xmemcpy ( buffer, buffer_from_cb_ptr, CB_BUFFER_SIZE );
klauss 124:c1b6c893e1c3 1924 status = WAITING;
klauss 124:c1b6c893e1c3 1925 missed_pkg--;
klauss 124:c1b6c893e1c3 1926 }
klauss 124:c1b6c893e1c3 1927 else
klauss 126:1f90756250fb 1928 // long path
klauss 124:c1b6c893e1c3 1929 {
klauss 125:8ff4dc96ad58 1930 xmemcpy ( cb_rx_buffer, buffer_from_cb_ptr, CB_BUFFER_SIZE );
klauss 124:c1b6c893e1c3 1931 status = WAITING;
klauss 124:c1b6c893e1c3 1932 missed_pkg--;
klauss 125:8ff4dc96ad58 1933 xmemcpy ( buffer, cb_rx_buffer, CB_BUFFER_SIZE );
klauss 125:8ff4dc96ad58 1934
klauss 125:8ff4dc96ad58 1935 if ( debug_show_rx_cpld )
klauss 124:c1b6c893e1c3 1936 {
klauss 126:1f90756250fb 1937 char str [ 256 ];
klauss 126:1f90756250fb 1938 strcpy ( str, "RX :: \n\r" );
klauss 125:8ff4dc96ad58 1939
klauss 126:1f90756250fb 1940 for ( register uint16_t i = 0; i < 32; i++ )
klauss 125:8ff4dc96ad58 1941 {
klauss 126:1f90756250fb 1942 char tmp [ 8 ];
klauss 125:8ff4dc96ad58 1943 sprintf ( tmp, "%02x ", cb_rx_buffer [ i ] );
klauss 126:1f90756250fb 1944 strcat ( str, tmp );
klauss 124:c1b6c893e1c3 1945 }
klauss 125:8ff4dc96ad58 1946
klauss 125:8ff4dc96ad58 1947 strcat ( str, "\n\r " );
klauss 125:8ff4dc96ad58 1948
klauss 126:1f90756250fb 1949 send_msg ( "%s", str );
klauss 124:c1b6c893e1c3 1950 }
klauss 121:ee02790d00b7 1951 }
klauss 121:ee02790d00b7 1952
klauss 121:ee02790d00b7 1953 data = parse_vz_pkg ( &ext, &port, &type, buffer );
klauss 121:ee02790d00b7 1954
klauss 126:1f90756250fb 1955 if ( data not_eq NULL )
klauss 121:ee02790d00b7 1956 {
klauss 126:1f90756250fb 1957 if ( min_ext == 0 ) min_ext = ext;
klauss 121:ee02790d00b7 1958
klauss 126:1f90756250fb 1959 if ( ext > max_ext ) max_ext = ext;
klauss 121:ee02790d00b7 1960
klauss 126:1f90756250fb 1961 if ( ext < min_ext ) min_ext = ext;
klauss 121:ee02790d00b7 1962
klauss 126:1f90756250fb 1963 if ( debug_fw ) { fw_cbx_pkg ( ext, ( char *)buffer ); }
klauss 121:ee02790d00b7 1964
klauss 126:1f90756250fb 1965 if ( type == TELEMETRY )
klauss 126:1f90756250fb 1966 {
klauss 126:1f90756250fb 1967 telemetry_counter++;
klauss 126:1f90756250fb 1968 if ( debug_telemetry ) show_last_rx = true;
klauss 126:1f90756250fb 1969 }
klauss 121:ee02790d00b7 1970
klauss 127:e7160a463b6c 1971 if( type not_eq AUDIO )
klauss 127:e7160a463b6c 1972 {
klauss 127:e7160a463b6c 1973 if ( debug_cb_rx ) { send_msg ("[%d %d] -- Type :: %d", ext, port, type ); }
klauss 127:e7160a463b6c 1974
klauss 121:ee02790d00b7 1975 if(
klauss 126:1f90756250fb 1976 type == TELEMETRY or
klauss 126:1f90756250fb 1977 type == CB_STATS or
klauss 126:1f90756250fb 1978 type == FW1 or
klauss 126:1f90756250fb 1979 type == FW2 or
klauss 126:1f90756250fb 1980 type == FW3 or
klauss 126:1f90756250fb 1981 type == FW4 or
klauss 126:1f90756250fb 1982 type == FW5 or
klauss 121:ee02790d00b7 1983 type == FW6
klauss 121:ee02790d00b7 1984 ) type = FW;
klauss 121:ee02790d00b7 1985
klauss 126:1f90756250fb 1986 if ( debug_sqn ) { send_msg ("[%d %d] -- Type :: %d -- seq_num :: %u", ext, port, type, cb_tx_buffer [ SEQ_NUM_PLACE ] ); }
klauss 121:ee02790d00b7 1987
klauss 126:1f90756250fb 1988 Call_Box * cb = find_CB ( v_cb, ext );
klauss 126:1f90756250fb 1989 if ( cb not_eq NULL )
klauss 126:1f90756250fb 1990 {
klauss 126:1f90756250fb 1991 if ( data[ 0 ] bitand BIT7 )
klauss 126:1f90756250fb 1992 {
klauss 126:1f90756250fb 1993 if ( type == BOOT )
klauss 126:1f90756250fb 1994 {
klauss 121:ee02790d00b7 1995 send2callboxes( build_cb_package( ext, port, REGISTRY,
klauss 121:ee02790d00b7 1996 ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - VZ_HEADER_OFFSET, write_buffer ) );
klauss 121:ee02790d00b7 1997 } else {
klauss 126:1f90756250fb 1998 if ( debug_main ) debug_msg("[%d] Received ack pkg with seq_num %d", ext, data[ 0 ] );
klauss 121:ee02790d00b7 1999
klauss 126:1f90756250fb 2000 switch ( type )
klauss 126:1f90756250fb 2001 {
klauss 121:ee02790d00b7 2002 case INVITE : {
klauss 129:d73538fbc017 2003 if ( debug_main or debug_invite ) debug_msg ("[%d] Invite ACK - msg_id %d -- Cbx seqNum %d", ext, cb->get_msg_id(), data[ 0 ] );
klauss 121:ee02790d00b7 2004 break;
klauss 121:ee02790d00b7 2005 }
klauss 121:ee02790d00b7 2006 case CB_BYE : {
klauss 129:d73538fbc017 2007 if ( debug_main or debug_invite ) debug_msg ("[%d] BYE ACK - msg_id %d", ext, cb->get_msg_id() );
klauss 126:1f90756250fb 2008 cb -> set_bye_response_ok ();
klauss 121:ee02790d00b7 2009 break;
klauss 121:ee02790d00b7 2010 }
klauss 121:ee02790d00b7 2011 case REGISTRY : {
klauss 126:1f90756250fb 2012 if ( debug_main or debug_aging ) debug_msg ("[%d] Registry ACK - msg_id %d", ext, cb->get_msg_id() );
klauss 121:ee02790d00b7 2013 break;
klauss 121:ee02790d00b7 2014 }
klauss 121:ee02790d00b7 2015 default : {
klauss 126:1f90756250fb 2016 if ( debug_main or debug_aging ) debug_msg ("[%d] ACK msg_id :: %d :: type %d", ext, cb->get_msg_id(), type );
klauss 121:ee02790d00b7 2017 }
klauss 121:ee02790d00b7 2018 }
klauss 126:1f90756250fb 2019 if ( type not_eq REGISTRY and type not_eq CB_BYE and type not_eq INVITE ) type = DO_NOTHING;
klauss 126:1f90756250fb 2020 if ( type == CB_BYE )
klauss 126:1f90756250fb 2021 {
klauss 126:1f90756250fb 2022 VZ_call * call = find_Call ( v_call, ext );
klauss 126:1f90756250fb 2023 if ( call not_eq NULL )
klauss 126:1f90756250fb 2024 {
klauss 126:1f90756250fb 2025 if ( call -> get_elapsed_time () < 120000 )
klauss 126:1f90756250fb 2026 {
klauss 126:1f90756250fb 2027 if ( debug_invite ) debug_msg("[%d] ack bye ignored", ext );
klauss 121:ee02790d00b7 2028 type = DO_NOTHING;
klauss 121:ee02790d00b7 2029 }
klauss 121:ee02790d00b7 2030 }
klauss 121:ee02790d00b7 2031 }
klauss 121:ee02790d00b7 2032 }
klauss 121:ee02790d00b7 2033 }
klauss 121:ee02790d00b7 2034 }
klauss 121:ee02790d00b7 2035 }
klauss 121:ee02790d00b7 2036 } else type = DO_NOTHING;
klauss 121:ee02790d00b7 2037
klauss 121:ee02790d00b7 2038 return 0;
klauss 123:1d395b5a4cad 2039 }
klauss 123:1d395b5a4cad 2040
klauss 123:1d395b5a4cad 2041 void update_all_cb_timer ( Vector * v_cb )
klauss 123:1d395b5a4cad 2042 {
klauss 123:1d395b5a4cad 2043 if ( v_cb == NULL ) return;
klauss 123:1d395b5a4cad 2044
klauss 123:1d395b5a4cad 2045 for( register uint8_t i = 0; i < v_cb->size(); i++ )
klauss 123:1d395b5a4cad 2046 {
klauss 123:1d395b5a4cad 2047 Call_Box * cb = ( Call_Box * )v_cb->get_element( i );
klauss 126:1f90756250fb 2048 if ( cb not_eq NULL ) cb -> update_time ();
klauss 123:1d395b5a4cad 2049 }
klauss 124:c1b6c893e1c3 2050 }
klauss 124:c1b6c893e1c3 2051
klauss 124:c1b6c893e1c3 2052 int init_hello ( void )
klauss 124:c1b6c893e1c3 2053 {
klauss 124:c1b6c893e1c3 2054 hello_sync.start ();
klauss 124:c1b6c893e1c3 2055 hello_times = 0;
klauss 124:c1b6c893e1c3 2056 return ( 0 );
klauss 124:c1b6c893e1c3 2057 }
klauss 124:c1b6c893e1c3 2058
klauss 124:c1b6c893e1c3 2059 void send_hello_to_cbx ( void )
klauss 124:c1b6c893e1c3 2060 {
klauss 124:c1b6c893e1c3 2061 if ( hello_times >= 3 ){
klauss 124:c1b6c893e1c3 2062 hello_sync.stop ();
klauss 124:c1b6c893e1c3 2063 hello_sync.reset ();
klauss 124:c1b6c893e1c3 2064 dont_say_hello_again = true;
klauss 124:c1b6c893e1c3 2065 }
klauss 124:c1b6c893e1c3 2066
klauss 124:c1b6c893e1c3 2067 if ( ( !dont_say_hello_again ) && ( hello_sync.read () > 3 ) && ( hello_times < 3 ) )
klauss 124:c1b6c893e1c3 2068 {
klauss 124:c1b6c893e1c3 2069 hello_times++;
klauss 124:c1b6c893e1c3 2070
klauss 124:c1b6c893e1c3 2071 char cmd_msg [ CB_BUFFER_SIZE ] = "pend\r";
klauss 124:c1b6c893e1c3 2072
klauss 124:c1b6c893e1c3 2073 if ( debug_hello ) debug_msg("Enviando pend_all nro [ %i ]", hello_times );
klauss 124:c1b6c893e1c3 2074
klauss 124:c1b6c893e1c3 2075 send2callboxes( build_cb_package( BROADCAST_EXT, BROADCAST_EXT, PROMPT, cmd_msg, ( 0x11 + hello_times ), CB_BUFFER_SIZE - VZ_HEADER_OFFSET, write_buffer ) );
klauss 124:c1b6c893e1c3 2076
klauss 124:c1b6c893e1c3 2077 hello_sync.reset ();
klauss 124:c1b6c893e1c3 2078 }
klauss 124:c1b6c893e1c3 2079 }
klauss 124:c1b6c893e1c3 2080
klauss 124:c1b6c893e1c3 2081 void show_hello_status_function ( void )
klauss 124:c1b6c893e1c3 2082 {
klauss 124:c1b6c893e1c3 2083 send_msg ("hello_sync.read :: %d -- hello_times :: %u", ( int ) hello_sync.read (), hello_times );
klauss 126:1f90756250fb 2084 }
klauss 126:1f90756250fb 2085
klauss 126:1f90756250fb 2086 void show_last_rx_pkg_from_cbx ( void )
klauss 126:1f90756250fb 2087 {
klauss 126:1f90756250fb 2088 char str [ 256 ] = "";
klauss 126:1f90756250fb 2089
klauss 126:1f90756250fb 2090 for ( register uint16_t i = 0; i < CB_BUFFER_SIZE; i++ )
klauss 126:1f90756250fb 2091 {
klauss 126:1f90756250fb 2092 char tmp[ 8 ];
klauss 126:1f90756250fb 2093
klauss 126:1f90756250fb 2094 sprintf ( tmp, "%02x", cb_rx_buffer [ i ] );
klauss 126:1f90756250fb 2095
klauss 126:1f90756250fb 2096 strcat ( str, tmp );
klauss 126:1f90756250fb 2097
klauss 126:1f90756250fb 2098 if ( ( i not_eq 0 ) && !( ( i + 1 ) % 25 ) )
klauss 126:1f90756250fb 2099 {
klauss 126:1f90756250fb 2100 send_msg ( "%s", str );
klauss 126:1f90756250fb 2101 strcpy ( str, "" );
klauss 126:1f90756250fb 2102 }
klauss 126:1f90756250fb 2103
klauss 126:1f90756250fb 2104 else { strcat ( str, " " ); }
klauss 126:1f90756250fb 2105 }
klauss 126:1f90756250fb 2106
klauss 126:1f90756250fb 2107 send_msg ( "%s", str );
klauss 126:1f90756250fb 2108 }
klauss 126:1f90756250fb 2109
klauss 126:1f90756250fb 2110 void show_last_tx_pkg_from_cbx ( void )
klauss 126:1f90756250fb 2111 {
klauss 126:1f90756250fb 2112 char str [ 256 ] = "";
klauss 126:1f90756250fb 2113
klauss 126:1f90756250fb 2114 for ( register uint16_t i = 0; i < CB_BUFFER_SIZE; i++ )
klauss 126:1f90756250fb 2115 {
klauss 126:1f90756250fb 2116 char tmp[ 8 ];
klauss 126:1f90756250fb 2117
klauss 126:1f90756250fb 2118 sprintf ( tmp, "%02x", cb_tx_buffer [ i ] );
klauss 126:1f90756250fb 2119
klauss 126:1f90756250fb 2120 strcat ( str, tmp );
klauss 126:1f90756250fb 2121
klauss 126:1f90756250fb 2122 if ( ( i not_eq 0 ) && !( ( i + 1 ) % 25 ) )
klauss 126:1f90756250fb 2123 {
klauss 126:1f90756250fb 2124 send_msg ( "%s", str );
klauss 126:1f90756250fb 2125 strcpy ( str, "" );
klauss 126:1f90756250fb 2126 }
klauss 126:1f90756250fb 2127
klauss 126:1f90756250fb 2128 else { strcat ( str, " " ); }
klauss 126:1f90756250fb 2129 }
klauss 126:1f90756250fb 2130
klauss 126:1f90756250fb 2131 send_msg ( "%s", str );
klauss 128:3ae1c74773a8 2132 }
klauss 128:3ae1c74773a8 2133
klauss 128:3ae1c74773a8 2134 /* Funcao para leitura da fonte de alimentacao e aviso ao servidor */
klauss 128:3ae1c74773a8 2135 void check_power_source ( void )
klauss 128:3ae1c74773a8 2136 {
klauss 128:3ae1c74773a8 2137 static uint8_t samples = 0, warn_back = 0, wait_to_warn = 0;
klauss 128:3ae1c74773a8 2138 //static uint16_t wait_to_warn = 0;
klauss 128:3ae1c74773a8 2139
klauss 128:3ae1c74773a8 2140 pwr_src_timer.stop();
klauss 128:3ae1c74773a8 2141 pwr_src_timer.reset();
klauss 128:3ae1c74773a8 2142
klauss 128:3ae1c74773a8 2143 if (pwr_src_in) {
klauss 128:3ae1c74773a8 2144 if (samples < 8) samples++;
klauss 128:3ae1c74773a8 2145 } else {
klauss 128:3ae1c74773a8 2146 if (samples > 0) samples--;
klauss 128:3ae1c74773a8 2147 }
klauss 128:3ae1c74773a8 2148
klauss 128:3ae1c74773a8 2149 if (wait_to_warn) wait_to_warn--;
klauss 128:3ae1c74773a8 2150
klauss 128:3ae1c74773a8 2151 if (samples >= 8) {
klauss 128:3ae1c74773a8 2152 pwr_src_status = 1;
klauss 128:3ae1c74773a8 2153 if (!wait_to_warn) {
klauss 128:3ae1c74773a8 2154 wait_to_warn = 255;
klauss 128:3ae1c74773a8 2155 warn_back = 1;
klauss 128:3ae1c74773a8 2156 pwr_src_client.sendTo( pwr_src_server, "mainpowerisdown", strlen( "mainpowerisdown" ) );
klauss 128:3ae1c74773a8 2157 debug_msg( "Main power is DOWN!" );
klauss 128:3ae1c74773a8 2158 } else {
klauss 128:3ae1c74773a8 2159 wait_to_warn--;
klauss 128:3ae1c74773a8 2160 }
klauss 128:3ae1c74773a8 2161 }
klauss 128:3ae1c74773a8 2162 if ((samples == 0) and (warn_back)) {
klauss 128:3ae1c74773a8 2163 pwr_src_status = 0;
klauss 128:3ae1c74773a8 2164 warn_back = 0;
klauss 128:3ae1c74773a8 2165 wait_to_warn = 0;
klauss 128:3ae1c74773a8 2166 pwr_src_client.sendTo( pwr_src_server, "mainpowerisback", strlen( "mainpowerisback" ) );
klauss 128:3ae1c74773a8 2167 debug_msg( "Main power is BACK!" );
klauss 128:3ae1c74773a8 2168 }
klauss 128:3ae1c74773a8 2169
klauss 128:3ae1c74773a8 2170 pwr_src_timer.start();
klauss 121:ee02790d00b7 2171 }