Modularizando o src

Dependencies:   EALib EthernetInterface_vz mbed-rtos mbed

Fork of header_main_colinas_V0-20-09-14 by VZTECH

Committer:
klauss
Date:
Fri Mar 13 19:40:56 2015 +0000
Revision:
106:a34fcf9f0e02
Parent:
105:a930035b6556
Child:
108:18a3702650f3
bugfix do refresh/wake_all_up; agora o unico parametro passado ? o vetor de CBx, os dois buffers s?o locais

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 106:a34fcf9f0e02 16 int refresh ( Vector * v_cb )
klauss 106:a34fcf9f0e02 17 {
klauss 106:a34fcf9f0e02 18 if( v_cb != NULL)
klauss 106:a34fcf9f0e02 19 {
klauss 81:3656f00ab3db 20 static int lst_index = 0;
klauss 81:3656f00ab3db 21
klauss 106:a34fcf9f0e02 22 if( v_cb->size() > 0 )
klauss 106:a34fcf9f0e02 23 {
klauss 106:a34fcf9f0e02 24 uint8_t data[ CB_BUFFER_SIZE ], write_buffer[ CB_BUFFER_SIZE ];
klauss 81:3656f00ab3db 25
klauss 106:a34fcf9f0e02 26 led4 = 0;
klauss 106:a34fcf9f0e02 27 if( lst_index >= v_cb->size() ) lst_index = 0;
klauss 106:a34fcf9f0e02 28
klauss 106:a34fcf9f0e02 29 Call_Box * cb = (Call_Box * )v_cb->get_element( lst_index++ );
klauss 106:a34fcf9f0e02 30
klauss 106:a34fcf9f0e02 31 if( cb != NULL && cb->status == cb_idle ){
klauss 80:61d61c9eb75c 32
klauss 106:a34fcf9f0e02 33 if( cb->get_ext() % 2 == 1 ){
klauss 106:a34fcf9f0e02 34 Call_Box * cb_master = __find_CB__( v_cb, cb->get_ext() - 1 );
klauss 106:a34fcf9f0e02 35 if( cb_master != NULL && cb_master->status != cb_idle ) return( 0x20 );
klauss 106:a34fcf9f0e02 36 }
klauss 106:a34fcf9f0e02 37
klauss 106:a34fcf9f0e02 38 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
klauss 106:a34fcf9f0e02 39
klauss 106:a34fcf9f0e02 40 send2callboxes( build_cb_package( cb->get_ext(), cb->get_port(), __REGISTRY__,
klauss 106:a34fcf9f0e02 41 ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 80:61d61c9eb75c 42
klauss 106:a34fcf9f0e02 43 if( debug_refresh ) send_msg("Refresh %d", cb->get_ext() );
klauss 106:a34fcf9f0e02 44
klauss 106:a34fcf9f0e02 45 return( 0 );
klauss 106:a34fcf9f0e02 46 }else return( -5 );
klauss 106:a34fcf9f0e02 47 }else return( -3 );
klauss 89:0fe315117b00 48 }else return( -1 );
klauss 80:61d61c9eb75c 49 }
klauss 80:61d61c9eb75c 50
klauss 106:a34fcf9f0e02 51
klauss 80:61d61c9eb75c 52 //FiXME se validar, nao preciso de tantos parametros ...
klauss 74:81c47fff88a5 53 void registry_aging( Vector * v_cb, uint8_t * data, uint8_t * write_buffer ){
klauss 80:61d61c9eb75c 54 for( register int i = 0; i < v_cb->size(); i++ ){
klauss 80:61d61c9eb75c 55 Call_Box * cb = (Call_Box * )v_cb->get_element( i );
klauss 80:61d61c9eb75c 56 if( cb->is_timeout() ){
klauss 80:61d61c9eb75c 57 if( debug_aging ) debug_msg("sands for %d", cb->get_ext() );
klauss 80:61d61c9eb75c 58 if( cb->has_next_try() == false ){
klauss 80:61d61c9eb75c 59 if( debug_aging ) debug_msg( "time to really go ( ext %d removed )", cb->get_ext() );
klauss 80:61d61c9eb75c 60 v_cb->remove_element( i );
klauss 80:61d61c9eb75c 61 delete( cb );
klauss 80:61d61c9eb75c 62 break;
klauss 89:0fe315117b00 63 }
klauss 80:61d61c9eb75c 64 }
klauss 80:61d61c9eb75c 65 }
klauss 78:1353744f01e1 66 }
klauss 78:1353744f01e1 67
klauss 106:a34fcf9f0e02 68 //void wake_all_up( Vector * v_cb, uint8_t * data, uint8_t * write_buffer ){
klauss 106:a34fcf9f0e02 69 void wake_all_up( Vector * v_cb )
klauss 106:a34fcf9f0e02 70 {
klauss 105:a930035b6556 71 /***
klauss 105:a930035b6556 72 [ Principio ]
klauss 105:a930035b6556 73 -- Procurar por CBx que constem sem seus pares registrados na lógica.
klauss 105:a930035b6556 74 -- Mandar uma mensagem do tipo prompt-ping para este elemento
klauss 105:a930035b6556 75
klauss 105:a930035b6556 76 -- Fluxo --
klauss 105:a930035b6556 77 - Verificar se possui uma lista ordenada de CBx atualizada
klauss 105:a930035b6556 78 - Caso nao possua, gerar esta lista.
klauss 105:a930035b6556 79 - Para cada iteraçao
klauss 105:a930035b6556 80 - Verifica se o CBx é master ou slave
klauss 105:a930035b6556 81 - Verifica se o par deste esta registrado
klauss 105:a930035b6556 82 - Caso contratio
klauss 105:a930035b6556 83 - Verifica se o CBx encontrado esta em ligaçao
klauss 105:a930035b6556 84 - Caso nao esteja, encaminha mensagem de ping para o CBx ausente da dupla.
klauss 105:a930035b6556 85 ***/
klauss 105:a930035b6556 86
klauss 106:a34fcf9f0e02 87 uint8_t data[ CB_BUFFER_SIZE ], write_buffer[ CB_BUFFER_SIZE ];
klauss 106:a34fcf9f0e02 88 if( ( v_cb != NULL ) ){
klauss 104:62646ef786a3 89 static int ext_list[ __MAX_CB_IN_A_BRANCH__ + 1 ];
klauss 104:62646ef786a3 90 static uint8_t last_size = 0;
klauss 78:1353744f01e1 91 uint8_t size = v_cb->size();
klauss 104:62646ef786a3 92 static int wake_all_up_index = 0;
klauss 78:1353744f01e1 93
klauss 104:62646ef786a3 94 if( last_size != size )
klauss 104:62646ef786a3 95 {
klauss 78:1353744f01e1 96 for( register int i = 0; i < size; i++ ){
klauss 78:1353744f01e1 97 ext_list[ i ] = ( ( Call_Box * )v_cb->get_element( i ) )->get_ext();
klauss 78:1353744f01e1 98 }
klauss 78:1353744f01e1 99
klauss 78:1353744f01e1 100 qsort( ext_list, v_cb->size(), sizeof( int ), ls_comp );
klauss 104:62646ef786a3 101 }
klauss 104:62646ef786a3 102
klauss 104:62646ef786a3 103 if( size > 0 )
klauss 104:62646ef786a3 104 {
klauss 104:62646ef786a3 105 // testa se eh o master
klauss 104:62646ef786a3 106 if( ( ext_list[ wake_all_up_index ] % 2 ) == 0 )
klauss 104:62646ef786a3 107 {
klauss 104:62646ef786a3 108 //testa se o slave nao esta registrado
klauss 104:62646ef786a3 109 if( ( size == 1 ) || ( ( wake_all_up_index + 1 ) == size ) || ( ext_list[ wake_all_up_index + 1 ] != ( ext_list[ wake_all_up_index ] + 1 ) ) )
klauss 104:62646ef786a3 110 {
klauss 105:a930035b6556 111 strcpy( ( char * )data, "ping\r" );
klauss 104:62646ef786a3 112 Call_Box * cb = __find_CB__( v_cb, ext_list[ wake_all_up_index ] );
klauss 105:a930035b6556 113
klauss 105:a930035b6556 114 // verifica se o master esta em chamada.
klauss 105:a930035b6556 115 if( cb != NULL && cb->status == cb_idle )
klauss 104:62646ef786a3 116 {
klauss 104:62646ef786a3 117 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
klauss 104:62646ef786a3 118
klauss 105:a930035b6556 119 send2callboxes( build_cb_package( ( cb->get_ext() + 1 ), ( cb->get_port() + 1 ), __PROMPT__,
klauss 105:a930035b6556 120 ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 104:62646ef786a3 121
klauss 104:62646ef786a3 122 if( debug_wake ) send_msg("%d without %d - ping sent to %d",
klauss 104:62646ef786a3 123 ext_list[ wake_all_up_index ], ext_list[ wake_all_up_index ] + 1, cb->get_ext() + 1 );
klauss 104:62646ef786a3 124 }
klauss 104:62646ef786a3 125 }
klauss 78:1353744f01e1 126
klauss 104:62646ef786a3 127 }else{
klauss 104:62646ef786a3 128 if( ( size == 1 ) || ( wake_all_up_index == 0 ) || ( wake_all_up_index >= 1 ) && ( ext_list[ wake_all_up_index - 1 ] != ( ext_list[ wake_all_up_index ] - 1 ) ) )
klauss 104:62646ef786a3 129 {
klauss 105:a930035b6556 130 strcpy( ( char * )data, "ping\r" );
klauss 104:62646ef786a3 131 Call_Box * cb = __find_CB__( v_cb, ( ext_list[ wake_all_up_index ] ) );
klauss 105:a930035b6556 132
klauss 105:a930035b6556 133 // verifica se o slave esta em chamada.
klauss 105:a930035b6556 134 if( cb != NULL && cb->status == cb_idle )
klauss 104:62646ef786a3 135 {
klauss 104:62646ef786a3 136 cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
klauss 104:62646ef786a3 137
klauss 105:a930035b6556 138 send2callboxes( build_cb_package( ( cb->get_ext() - 1 ), ( cb->get_port() - 1 ), __PROMPT__,
klauss 105:a930035b6556 139 ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 104:62646ef786a3 140
klauss 104:62646ef786a3 141 if( debug_wake ) send_msg("%d without %d - ping sent to %d",
klauss 104:62646ef786a3 142 ext_list[ wake_all_up_index ], ext_list[ wake_all_up_index ] - 1, cb->get_ext() - 1 );
klauss 78:1353744f01e1 143 }
klauss 74:81c47fff88a5 144 }
klauss 74:81c47fff88a5 145 }
klauss 74:81c47fff88a5 146 }
klauss 104:62646ef786a3 147 if( ++wake_all_up_index >= size ) wake_all_up_index = 0;
klauss 74:81c47fff88a5 148 }
klauss 74:81c47fff88a5 149 }