File content as of revision 106:a34fcf9f0e02:

#include "call_box_manager.h"

Timer timer_refresh;
Timer timer_aging;
Timer timer_sync_refresh;

Call_Box * __find_CB__( Vector * v_cb, int ext ){
    Call_Box * cb = NULL;
    for( register int i = 0; i < v_cb->size(); i++ ){
        cb = ( Call_Box * )v_cb->get_element( i );
        if( cb->get_ext() == ext ) return( cb );
    }
    return( NULL );
}

int refresh ( Vector * v_cb )
{
    if( v_cb != NULL)
    {
        static int lst_index = 0;
            
        if( v_cb->size() > 0 )
        {
            uint8_t data[ CB_BUFFER_SIZE ], write_buffer[ CB_BUFFER_SIZE ];
            
            led4 = 0;
            if( lst_index >= v_cb->size() ) lst_index = 0;
            
            Call_Box * cb = (Call_Box * )v_cb->get_element( lst_index++ );
            
            if( cb != NULL && cb->status == cb_idle ){
                
                if( cb->get_ext() % 2 == 1 ){ 
                    Call_Box * cb_master =  __find_CB__( v_cb, cb->get_ext() - 1 );
                    if( cb_master != NULL && cb_master->status != cb_idle ) return( 0x20 );
                }
        
                cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
                        
                send2callboxes( build_cb_package( cb->get_ext(), cb->get_port(), __REGISTRY__, 
                    ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - __VZ_HEADER_OFFSET__, write_buffer ) );
                
                if( debug_refresh ) send_msg("Refresh %d", cb->get_ext() );
                
                return( 0 );
            }else return( -5 );
        }else return( -3 );
    }else return( -1 );
}


//FiXME se validar, nao preciso de tantos parametros ...
void registry_aging( Vector * v_cb, uint8_t * data, uint8_t * write_buffer ){
    for( register int i = 0; i < v_cb->size(); i++ ){
        Call_Box * cb = (Call_Box * )v_cb->get_element( i );
        if( cb->is_timeout() ){
            if( debug_aging ) debug_msg("sands for %d", cb->get_ext() );
            if( cb->has_next_try() == false ){
                if( debug_aging ) debug_msg( "time to really go ( ext %d removed )", cb->get_ext() );
                v_cb->remove_element( i );
                delete( cb );
                break;
            }
        }
    }
}

//void wake_all_up( Vector * v_cb, uint8_t * data, uint8_t * write_buffer ){
void wake_all_up( Vector * v_cb )
{
 /***
    [ Principio ]
        -- Procurar por CBx que constem sem seus pares registrados na lógica.
        -- Mandar uma mensagem do tipo prompt-ping para este elemento
        
    -- Fluxo --
        - Verificar se possui uma lista ordenada de CBx atualizada
            - Caso nao possua, gerar esta lista.
        - Para cada iteraçao
            - Verifica se o CBx é master ou slave
            - Verifica se o par deste esta registrado
                - Caso contratio
                    - Verifica se o CBx encontrado esta em ligaçao
                        - Caso nao esteja, encaminha mensagem de ping para o CBx ausente da dupla.
 ***/
 
    uint8_t data[ CB_BUFFER_SIZE ], write_buffer[ CB_BUFFER_SIZE ];
    if( ( v_cb != NULL ) ){
        static int ext_list[ __MAX_CB_IN_A_BRANCH__ + 1 ];
        static uint8_t last_size = 0;
        uint8_t size = v_cb->size();
        static int wake_all_up_index = 0;
        
        if( last_size != size )
        {
            for( register int i = 0; i < size; i++ ){
                ext_list[ i ] = ( ( Call_Box * )v_cb->get_element( i ) )->get_ext();
            }
            
            qsort( ext_list, v_cb->size(), sizeof( int ), ls_comp );
        }
        
        if( size > 0 )
        {   
            // testa se eh o master
            if( ( ext_list[ wake_all_up_index ] % 2 ) == 0 )
            {
                //testa se o slave nao esta registrado
                if( ( size == 1 ) || ( ( wake_all_up_index + 1 ) == size ) || ( ext_list[ wake_all_up_index + 1 ] !=  ( ext_list[ wake_all_up_index ] + 1 ) ) )
                {
                    strcpy( ( char * )data, "ping\r" );
                    Call_Box * cb = __find_CB__( v_cb, ext_list[ wake_all_up_index ] );
                 
                    // verifica se o master esta em chamada.   
                    if( cb != NULL && cb->status == cb_idle )
                    { 
                        cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
                        
                        send2callboxes( build_cb_package( ( cb->get_ext() + 1 ), ( cb->get_port() + 1 ), __PROMPT__, 
                            ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - __VZ_HEADER_OFFSET__, write_buffer ) );
        
                        if( debug_wake ) send_msg("%d without %d - ping sent to %d", 
                            ext_list[ wake_all_up_index ], ext_list[ wake_all_up_index ] + 1, cb->get_ext() + 1 );
                    }
                }
                
            }else{
                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 ) ) )
                {
                    strcpy( ( char * )data, "ping\r" );
                    Call_Box * cb = __find_CB__( v_cb, ( ext_list[ wake_all_up_index ] ) );
                    
                    // verifica se o slave esta em chamada.
                    if( cb != NULL && cb->status == cb_idle )
                    { 
                        cb->set_msg_id( ( cb->get_msg_id() + 1 ) & ~BIT7 );
        
                        send2callboxes( build_cb_package( ( cb->get_ext() - 1 ), ( cb->get_port() - 1 ), __PROMPT__, 
                            ( char * )data, cb->get_msg_id(), CB_BUFFER_SIZE - __VZ_HEADER_OFFSET__, write_buffer ) );
                        
                        if( debug_wake ) send_msg("%d without %d - ping sent to %d", 
                            ext_list[ wake_all_up_index ], ext_list[ wake_all_up_index ] - 1, cb->get_ext() - 1 );
                    }
                }
            }
        }
        if( ++wake_all_up_index >= size ) wake_all_up_index = 0;
    }
}