VZTECH / Mbed 2 deprecated main_src

Modularizando o src

Dependencies:   EALib EthernetInterface_vz mbed-rtos mbed

Fork of header_main_colinas_V0-20-09-14 by VZTECH

call_box_manager.cpp@89:0fe315117b00, 2015-01-07 (annotated)

Committer:
klauss
Date:
Wed Jan 07 21:48:53 2015 +0000
Revision:
89:0fe315117b00
Parent:
86:bf7b0d4c3232
Child:
92:92df17f538a8
wip

Who changed what in which revision?

UserRevisionLine numberNew contents of line
klauss 74:81c47fff88a5 1 #include "call_box_manager.h"
klauss 74:81c47fff88a5 2
klauss 80:61d61c9eb75c 3 Timer timer_refresh;
klauss 78:1353744f01e1 4 Timer timer_aging;
klauss 89:0fe315117b00 5 Timer timer_sync_refresh;
klauss 78:1353744f01e1 6
klauss 74:81c47fff88a5 7 Call_Box * __find_CB__( Vector * v_cb, int ext ){
klauss 74:81c47fff88a5 8 Call_Box * cb = NULL;
klauss 74:81c47fff88a5 9 for( register int i = 0; i < v_cb->size(); i++ ){
klauss 74:81c47fff88a5 10 cb = ( Call_Box * )v_cb->get_element( i );
klauss 74:81c47fff88a5 11 if( cb->get_ext() == ext ) return( cb );
klauss 74:81c47fff88a5 12 }
klauss 74:81c47fff88a5 13 return( NULL );
klauss 74:81c47fff88a5 14 }
klauss 74:81c47fff88a5 15
klauss 80:61d61c9eb75c 16 int refresh( Vector * v_cb, uint8_t * data, uint8_t * write_buffer, Call_Box * cb ){
klauss 80:61d61c9eb75c 17 if( v_cb != NULL && data != NULL && write_buffer != NULL ){
klauss 81:3656f00ab3db 18 static int lst_index = 0;
klauss 81:3656f00ab3db 19
klauss 80:61d61c9eb75c 20 if( cb != NULL ){
klauss 80:61d61c9eb75c 21 timer_refresh.reset();
klauss 80:61d61c9eb75c 22
klauss 81:3656f00ab3db 23 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ( ~BIT7 ) );
klauss 81:3656f00ab3db 24
klauss 80:61d61c9eb75c 25 send2callboxes( __build_cb_package__( cb->get_ext(), cb->get_port(), __REGISTRY__,
klauss 80:61d61c9eb75c 26 ( char * )data, cb->get_msg_id(), __CB_BUFFER_SIZE__ - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 80:61d61c9eb75c 27
klauss 81:3656f00ab3db 28 if( debug_refresh ) send_msg("Refresh specific %d", cb->get_ext() );
klauss 81:3656f00ab3db 29
klauss 80:61d61c9eb75c 30 return( 0x10 );
klauss 89:0fe315117b00 31 }else{
klauss 80:61d61c9eb75c 32 if( v_cb->size() > 0 ){
klauss 81:3656f00ab3db 33 if( lst_index >= v_cb->size() ) lst_index = 0;
klauss 80:61d61c9eb75c 34
klauss 80:61d61c9eb75c 35 Call_Box * cb = (Call_Box * )v_cb->get_element( lst_index++ );
klauss 80:61d61c9eb75c 36
klauss 89:0fe315117b00 37 if( cb != NULL && cb->status == cb_idle ){
klauss 89:0fe315117b00 38
klauss 81:3656f00ab3db 39 if( cb->get_ext() % 2 == 1 ){
klauss 81:3656f00ab3db 40 Call_Box * cb_master = __find_CB__( v_cb, cb->get_ext() - 1 );
klauss 86:bf7b0d4c3232 41 if( cb_master != NULL && cb_master->status != cb_idle ) return( 0x20 );
klauss 81:3656f00ab3db 42 }
klauss 89:0fe315117b00 43
klauss 80:61d61c9eb75c 44 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ( ~BIT7 ) );
klauss 81:3656f00ab3db 45
klauss 80:61d61c9eb75c 46 send2callboxes( __build_cb_package__( cb->get_ext(), cb->get_port(), __REGISTRY__,
klauss 80:61d61c9eb75c 47 ( char * )data, cb->get_msg_id(), __CB_BUFFER_SIZE__ - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 80:61d61c9eb75c 48
klauss 81:3656f00ab3db 49 if( debug_refresh ) send_msg("Refresh %d", cb->get_ext() );
klauss 81:3656f00ab3db 50
klauss 80:61d61c9eb75c 51 return( 0 );
klauss 89:0fe315117b00 52 }else return( -5 );
klauss 89:0fe315117b00 53 }else return( -3 );
klauss 89:0fe315117b00 54 }
klauss 89:0fe315117b00 55 }else return( -1 );
klauss 80:61d61c9eb75c 56 }
klauss 80:61d61c9eb75c 57
klauss 80:61d61c9eb75c 58 //FiXME se validar, nao preciso de tantos parametros ...
klauss 74:81c47fff88a5 59 void registry_aging( Vector * v_cb, uint8_t * data, uint8_t * write_buffer ){
klauss 80:61d61c9eb75c 60 for( register int i = 0; i < v_cb->size(); i++ ){
klauss 80:61d61c9eb75c 61 Call_Box * cb = (Call_Box * )v_cb->get_element( i );
klauss 80:61d61c9eb75c 62 if( cb->is_timeout() ){
klauss 80:61d61c9eb75c 63 if( debug_aging ) debug_msg("sands for %d", cb->get_ext() );
klauss 80:61d61c9eb75c 64 if( cb->has_next_try() == false ){
klauss 80:61d61c9eb75c 65 if( debug_aging ) debug_msg( "time to really go ( ext %d removed )", cb->get_ext() );
klauss 80:61d61c9eb75c 66 v_cb->remove_element( i );
klauss 80:61d61c9eb75c 67 delete( cb );
klauss 80:61d61c9eb75c 68 break;
klauss 89:0fe315117b00 69 }
klauss 80:61d61c9eb75c 70 }
klauss 80:61d61c9eb75c 71 }
klauss 78:1353744f01e1 72 }
klauss 78:1353744f01e1 73
klauss 89:0fe315117b00 74 /*
klauss 89:0fe315117b00 75 A ideia desse cara aqui ... a cada x sec. ele vai passar pelos cbx registrados na logica,
klauss 89:0fe315117b00 76 contidos em v_cb e verificar quais estao ausentes ( pares, masters, slaves ) e mandar um
klauss 89:0fe315117b00 77 registry pra cada um deles ... um por ver ... mantendo uma lista com os que estao ainda
klauss 89:0fe315117b00 78 off, e deveriam estar on, e atualizar essa lista ... por exemplo a cada 3 sec.
klauss 89:0fe315117b00 79
klauss 89:0fe315117b00 80 */
klauss 78:1353744f01e1 81 void wake_all_up( Vector * v_cb, uint8_t * data, uint8_t * write_buffer ){
klauss 78:1353744f01e1 82 if( v_cb != NULL && data != NULL && write_buffer != NULL ){
klauss 89:0fe315117b00 83 static int ext_list[ __MAX_CB_IN_A_BRANCH__ ];
klauss 78:1353744f01e1 84 uint8_t size = v_cb->size();
klauss 78:1353744f01e1 85
klauss 78:1353744f01e1 86 bool once = true;
klauss 78:1353744f01e1 87
klauss 78:1353744f01e1 88 if( size > 0 ){
klauss 78:1353744f01e1 89 for( register int i = 0; i < size; i++ ){
klauss 78:1353744f01e1 90 ext_list[ i ] = ( ( Call_Box * )v_cb->get_element( i ) )->get_ext();
klauss 78:1353744f01e1 91 }
klauss 78:1353744f01e1 92
klauss 78:1353744f01e1 93 qsort( ext_list, v_cb->size(), sizeof( int ), ls_comp );
klauss 78:1353744f01e1 94
klauss 78:1353744f01e1 95 for( register int i = 0; i < size; i++ ){
klauss 78:1353744f01e1 96 // testa se eh o master
klauss 78:1353744f01e1 97 if( ( ext_list[ i ] % 2 ) == 0 ){
klauss 78:1353744f01e1 98 //testa se o slave nao esta registrado
klauss 78:1353744f01e1 99 if( ( ( i + 1 ) < size ) && ( ext_list[ i + 1 ] != ( ext_list[ i ] + 1 ) ) || ( size == 1 ) ){
klauss 78:1353744f01e1 100 if( debug_wake ) debug_msg("Mestre %d encontrado sem slave %d", ext_list[ i ], ext_list[ i ] + 1 );
klauss 78:1353744f01e1 101 if( once ){
klauss 78:1353744f01e1 102 strcpy( ( char * )data, "ping\r\r\r\n" );
klauss 78:1353744f01e1 103 Call_Box * cb = __find_CB__( v_cb, ext_list[ i ] );
klauss 78:1353744f01e1 104 if( cb != NULL ){
klauss 78:1353744f01e1 105 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ( ~BIT7 ) );
klauss 78:1353744f01e1 106
klauss 78:1353744f01e1 107 send2callboxes( __build_cb_package__( ( cb->get_ext() + 1 ), ( cb->get_port() + 1 ), __PROMPT__,
klauss 78:1353744f01e1 108 ( char * )data, cb->get_msg_id(), __CB_BUFFER_SIZE__ - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 78:1353744f01e1 109
klauss 78:1353744f01e1 110 if( debug_wake ) debug_msg("Slave %d pingado", cb->get_ext() + 1 );
klauss 78:1353744f01e1 111 }
klauss 78:1353744f01e1 112 once = false;
klauss 78:1353744f01e1 113 }
klauss 78:1353744f01e1 114 }
klauss 74:81c47fff88a5 115 }else{
klauss 78:1353744f01e1 116 if( ( ( i - 1 ) > 0 ) && ( ext_list[ i - 1 ] != ( ext_list[ i ] - 1 ) ) || ( size == 1 ) ){
klauss 78:1353744f01e1 117 if( debug_wake ) debug_msg("Escravo revolucionario %d encontrado sem master %d", ext_list[ i ], ext_list[ i ] - 1 );
klauss 78:1353744f01e1 118 if( once ){
klauss 78:1353744f01e1 119 strcpy( ( char * )data, "ping\r\r\r\n" );
klauss 78:1353744f01e1 120 Call_Box * cb = __find_CB__( v_cb, ( ext_list[ i ] ) );
klauss 78:1353744f01e1 121 if( cb != NULL ){
klauss 78:1353744f01e1 122 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ( ~BIT7 ) );
klauss 78:1353744f01e1 123
klauss 78:1353744f01e1 124 send2callboxes( __build_cb_package__( ( cb->get_ext() - 1 ), ( cb->get_port() - 1 ), __PROMPT__,
klauss 78:1353744f01e1 125 ( char * )data, cb->get_msg_id(), __CB_BUFFER_SIZE__ - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 78:1353744f01e1 126
klauss 78:1353744f01e1 127 if( debug_wake ) debug_msg("Master %d pingado", cb->get_ext() - 1 );
klauss 78:1353744f01e1 128 }
klauss 78:1353744f01e1 129 once = false;
klauss 78:1353744f01e1 130 }
klauss 78:1353744f01e1 131 }
klauss 74:81c47fff88a5 132 }
klauss 74:81c47fff88a5 133 }
klauss 74:81c47fff88a5 134 }
klauss 74:81c47fff88a5 135 }
klauss 74:81c47fff88a5 136 }