DCDT_Agora.cpp

Go to the documentation of this file.

/****************************************************************************
dEVICE cOMMUNITIES dEVELOPMENT tOOLKIT 

DCDT_Agora.cpp

COPYRIGHT (C) 2002   Paolo Meriggi (meriggi@ing.unibs.it)
                     Alessandro Mazzini (mazzini@airlab.elet.polimi.it)


This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.

This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.

****************************************************************************/


#ifndef DCDT_AGORA_CPP
#define DCDT_AGORA_CPP

using namespace std;

#include <DCDT_Agora.h>
#include <DCDT_Finder.h>
#include <DCDT_PostOffice.h>
#include <DCDT_Member.h>
#include <DCDT_MsgManager.h>
#include <DCDT_InnerLinkManager.h>
#include <DCDT_ctrace.h>

DCDT_Agora::DCDT_Agora( int PO_Type ) {

  // Enable tracing
  TRC_INIT ( "agora.log", TRC_ENABLED, TRC_ON, TRC_ALL, UNIT_MAX, 0 );
  TRC_ADD_THREAD ( "Agora", 0 );
  
  // TODO: Associare signalling in order to have a smooth closing
  //  signal( SIGINT, endme);

  // Initialization of System variables
  Status = DCDT_ZERO;
  //LastMemberID = 1;
  AgoraID = 0;
  MaxIDMember = 0;

  strcpy( IPStrAddr, "");

#ifdef SEQUENCER_VERSION
  Sequencer = new DCDT_Sequencer;
#endif

  // Initialize MemberTable
  for( int i = 0; i<MAX_MEMBERS; i++) {
    DeleteMemberTableEntry(i);
   }

  // Create a brand new postoffice
  PostOffice = new DCDT_PostOffice( this, PO_Type ) ;

  // Setup InnerLink
  InnerLinkManager = new DCDT_InnerLinkManager( this );
  if ( InnerLinkManager->LookForExistingAgora(AgoraID) ) {
    // There is an existing agora
    FirstAgora = false;
    
    // Let's create and run the MsgManager
    MsgManager = new DCDT_MsgManager( this ) ;
    AddSysMember( MsgManager, MPM_SYSTEM );
    ActivateSysMember( MsgManager, "MsgManager" );
    
    Delay( 20000 );
    
    cout << "\nRunning in standalone secondary mode\n";
  }
  else {
    FirstAgora = true;
    Finder = NULL;

    // Let's activate and run the InnerLinkManager
    AddSysMember (InnerLinkManager, MPM_SYSTEM );
    ActivateSysMember( InnerLinkManager, "InnerLinkManager" );
    
    // Let's create and run the MsgManager
    MsgManager = new DCDT_MsgManager( this ) ;
    AddSysMember( MsgManager, MPM_SYSTEM );
    ActivateSysMember( MsgManager, "MsgManager" );

    Delay( 20000 );
    
    cout << "\nRunning in standalone primary mode\n";
  }

};

DCDT_Agora::DCDT_Agora( char *filename, int PO_Type ) {
  // Enable tracing
  TRC_INIT ( "agora.log", TRC_ENABLED, TRC_ON, TRC_ALL, UNIT_MAX, 0 );
  TRC_ADD_THREAD ( "Agora", 0 );
  TRC_PRINT ( DCDT_TRC_AGORA, TRC1, ("Config: %s", filename));

  // Initialization of System variables
  Status = DCDT_ZERO;
  AgoraID = 0;
  MaxIDMember = 0;

#ifdef SEQUENCER_VERSION
  Sequencer = new DCDT_Sequencer;
#endif
  
  // Initialize MemberTable
  for( int i = 0; i<MAX_MEMBERS; i++) {
    DeleteMemberTableEntry(i);
  }
  
  commflag = CommConfig(filename);
  
  // PostOffice type read from the configuration file
  if ( finder_data != NULL ) {
    if ( finder_data->fp != NULL ) {
      char cdmy=10;
      while ( cdmy == 0x0a )
        cdmy=fgetc( finder_data->fp );
      
      //printf ( "Read %c (%d)\n", cdmy, cdmy );
      if ( cdmy == 'P' ) {
        char str1[80],str2[80];
        str1[0]=str2[0]=0x00;
        
        fscanf( finder_data->fp, "%s%s", str1, str2 );
        
        if ( strcasecmp( str2, "SLWB" ) == 0 )
          PO_Type = POSTOFFICE_SLWB;
        
        if ( strcasecmp( str2, "SLWDWCV" ) == 0 )
          PO_Type = POSTOFFICE_SLWDC;
        
        if ( strcasecmp( str2, "SLWSM" ) == 0 )
          PO_Type = POSTOFFICE_SLWSM;
      }
      else
        ungetc ( cdmy, finder_data->fp );
    }
  }
  
  PostOffice = new DCDT_PostOffice( this, PO_Type ) ;
  
  // Setup InnerLink
  InnerLinkManager = new DCDT_InnerLinkManager( this );
  if ( InnerLinkManager->LookForExistingAgora(AgoraID) ) {
    // There is an existing agora
    FirstAgora = false;
    
    // Let's create and run the MsgManager
    MsgManager = new DCDT_MsgManager( this ) ;
    AddSysMember( MsgManager, MPM_SYSTEM );
    ActivateSysMember( MsgManager, "MsgManager" );
    
    Delay( 20000 );
    
    cout << "\nRunning in normal secondary mode\n\nPress a key\n";
  }
  else {
    FirstAgora = true;
    
    // Let's activate and run the InnerLinkManager
    AddSysMember (InnerLinkManager, MPM_SYSTEM );
    ActivateSysMember( InnerLinkManager, "InnerLink" );
    
    // Let's create and run the MsgManager
    MsgManager = new DCDT_MsgManager( this) ;
    AddSysMember( MsgManager, MPM_SYSTEM );
    ActivateSysMember( MsgManager, "MsgManager" );
    
    Delay( 20000 );
    
    // Let's start a Finder
    if (commflag) {
      Finder = new DCDT_Finder(this, finder_data);
      cout << endl << "Finder " << Finder << endl;

      AddSysMember(Finder, MPM_SYSTEM );
      ActivateSysMember(Finder, "Finder" );
      
      cout << "\nRunning in normal primary mode\n\nPress a key\n";
    }
    else
      cout << "\nRunning in standalone primary mode\n\nPress a key\n";
  }
};

DCDT_Agora::~DCDT_Agora() {
  
  // TODO: Check that all Members was previously deleted
  delete PostOffice;
  delete MsgManager;
  delete InnerLinkManager; 
  
  // If we are the frist Agorà, terminate the Finder thread,
  // it will free finder_data
  // otherwise we have to free it manually
  if( FirstAgora )  {
    if ( Finder ) {
      delete Finder;
    }
  }
  else
  if ( finder_data ) {
    if ( finder_data->fp )
      fclose ( finder_data->fp );
    delete finder_data;
  }

  /* ??? Manca di terminare alcuni membri questo aiuta ma ne rimane ancora uno attivo e se non si usa valgrind porta a un segment fault */
  /*
  for(int i = MAX_MEMBERS; i>0; i--) {
        if ( MemberTable[i].empty == false &&
             MemberTable[i].MemberPtr) {
           if ( MemberTable[i].active == true )
              pthread_cancel( MemberTable[i].MemberPtr->myThread );
        }
  }
  */

  TRC_REMOVE_THREAD ( pthread_self() );
  TRC_END();
};

void DCDT_Agora::AddMember(DCDT_Member * MemberPtr) {
  int newMemberID;

  // Create a new entry for the DCDT_Member in the DCDT_MemberList
  newMemberID = GetFirstFreeMemberTableSlot();
  
  // Set the top ID yet assigned
  if (newMemberID > MaxIDMember )
    MaxIDMember = newMemberID;
  
  MemberPtr->Profile = 0;
  MemberPtr->myID = newMemberID;
  MemberPtr->myAgoraID = AgoraID;
  MemberPtr->myPostOffice = PostOffice;
  MemberPtr->myFinder = NULL;
  strcpy(MemberPtr->myIPAddr, IPStrAddr);// serve per testing di rapida identificazione
  
#ifdef SEQUENCER_VERSION
  MemberPtr->mySequencer = Sequencer;
#endif
 
  MemberTable[newMemberID].active = false; 
  MemberTable[newMemberID].empty = false; 
  MemberTable[newMemberID].system = false; 
  MemberTable[newMemberID].MemberPtr = MemberPtr;
  MemberTable[newMemberID].Profile = MPM_USER;
  MemberTable[newMemberID].status = EMPTYSLOT;
  PostOffice->AddMember(newMemberID);

  TRC_PRINT ( DCDT_TRC_AGORA, TRC1, ("AddMember ID=%d", newMemberID));

};

void DCDT_Agora::AddSysMember(DCDT_Member * MemberPtr, unsigned int profile) {
  int newMemberID;
  
  // Create a new entry for the DCDT_Member in the DCDT_MemberList
  newMemberID = GetFirstFreeMemberTableSlot();
  
  // Set the top ID yet assigned
  if (newMemberID > MaxIDMember )
    MaxIDMember = newMemberID;
  
  MemberPtr->Profile = profile;
  MemberPtr->myID = newMemberID;
  MemberPtr->myAgoraID = AgoraID;
  MemberPtr->myPostOffice = PostOffice;
  MemberPtr->myFinder = Finder;
  
#ifdef SEQUENCER_VERSION
  MemberPtr->mySequencer = Sequencer;
#endif
  
  MemberTable[newMemberID].active = false; 
  MemberTable[newMemberID].empty = false; 
  MemberTable[newMemberID].system = true; 
  MemberTable[newMemberID].MemberPtr = MemberPtr;
  MemberTable[newMemberID].Profile = profile;
  MemberTable[newMemberID].status = EMPTYSLOT;
  PostOffice->AddSysMember(newMemberID);
  
  TRC_PRINT( DCDT_TRC_AGORA, TRC1, ("AddSysMember ID=%d Profile=%x", newMemberID, MemberTable[newMemberID].Profile));
  
};


void DCDT_Agora::RemoveMember(DCDT_Member * MemberPtr) {
  
  // Wait that the thread ends or is cancelled
  int ret;
  ret = pthread_join( (MemberPtr->myThread), NULL );
  if ( ret!= 0 ) {
    TRC_PRINT ( DCDT_TRC_AGORA, TRC1, ("pthread_join ID=%d Error=%d", MemberPtr->myID, ret));
    printf ( "pthread_join %p ( MemberID %d ) = %d\n", MemberPtr, MemberPtr->myID, ret );
  }
  
  TRC_PRINT ( DCDT_TRC_AGORA, TRC1, ("RemoveMember ID=%d", MemberPtr->myID));
  
  MemberPtr->Status = TERMINATING;
  
  // TODO: check that the member wasn't working
  Delay(20000);
  
  // Delete all the references to the deleted member from PostOffice and Agora members table
  PostOffice->DeleteMemberTableEntry(MemberPtr->myID);
  DeleteMemberTableEntry(MemberPtr->myID);

  delete(MemberPtr);
};

int DCDT_Agora::ActivateMember(DCDT_Member * Memb, char *name) {
  
  return Memb->Activate( name );
};

int DCDT_Agora::ActivateSysMember(DCDT_Member * Memb, char *name) {

  return Memb->Activate( name );
};


void DCDT_Agora::LetsWork() {

  // TODO: set the process priority
  //  nice( -18);

  Status = DCDT_LETSWORK;
  // da sostituire con un segnale ( ??? )
  // Delay(500000);

#ifdef SEQUENCER_VERSION
  while( Status == DCDT_LETSWORK){
    Sequencer->CheckNextDeadline();
    pthread_testcancel();
    //    Delay(100);
  };
#else
  
  bool vote_for_termination;
  int existing_members,terminating_votes;
  DCDT_MemberTableElem *member;

  while( Status == DCDT_LETSWORK){
    vote_for_termination = true;
    terminating_votes = 0;
    existing_members = 0;

    // if all user Members set TERMINATING, lets shutdown
    for(int i = 0; i< MAX_MEMBERS; i++) {
      member = &(MemberTable[i]);
      if (  member->empty == false && 
            member->MemberPtr ) {

        existing_members++;

        if ( member->system == false) { 
          if ( member->MemberPtr->Status == TERMINATING ) {
            // ??? Questa parte si puo' togliere perche' basta uscire dal ciclo con
            // vote_for_termination == true per indicare che bisogna chiudere
            vote_for_termination &= true;
            terminating_votes ++;
          }
          else {
            vote_for_termination = false;
            break;
          }
        }
      }
    }

    /* If all user member are in TERMINATING status the agora must terminate */
    if (vote_for_termination) { 
      Status = DCDT_TERMINATING;
      printf("AGORA: Vote for TERMINATION by %d user Members over %d existing\n"
             , terminating_votes, existing_members );
      break;
    }

    Delay( 10000 );
    //     printf("No vote for termination, Members = %d\n", MaxIDMember);
     
  } // while ( Status == DCDT_LETSWORK )
 

  if ( Status == DCDT_TERMINATING ) { 
    bool all_members_terminated = false;
    
    TRC_PRINT ( DCDT_TRC_AGORA, TRC1, ("Waiting for the termination of all members"));

    while ( !all_members_terminated ){ 

      all_members_terminated = true; 
      for(int i = MAX_MEMBERS; i>1; i--) {
        if ( MemberTable[i].empty == false && 
             MemberTable[i].MemberPtr) {
          if ( MemberTable[i].active == false )
            all_members_terminated |= true;
          else
            all_members_terminated = false;
        }
      }

      Status = DCDT_SHUTDOWN;
      Delay (10000);
    }
   }
   
  TRC_PRINT ( DCDT_TRC_AGORA, TRC1, ("Returning from DoYourJob"));
#endif
};

bool DCDT_Agora::CommConfig(char *filename)
{
// SI FA RIFERIMENTO ALLA STESSA STRUTTURA DATI channels, VA FATTA UNA MODIFICA CHE AL MOMENTO
// DELLA PARTENZA DEL LINK DISATTIVA IL CANALE

// TODO: Check if the parameters are valid, if not write a message to the user
  FILE *fp;
  int retval, port;

  cout << "\nReading configuration file...\n";
  if ((fp = fopen(filename, "r"))) {
    finder_data = new FinderData();
    finder_data->fp = fp;

    retval = fscanf(fp, "%s%s%i", finder_data->IfStrAddr, finder_data->McStrAddr, &port);
    cout << "\n" << finder_data->IfStrAddr << " " << finder_data->McStrAddr << " " << port << "\n";
    if ((retval == 0) || (retval == EOF) || (inet_pton(AF_INET, finder_data->IfStrAddr, &finder_data->IfNumAddr) <= 0) || (inet_pton(AF_INET, finder_data->McStrAddr, &finder_data->McNumAddr) <= 0)) {
      cout << "\nError while reading configuration file, running in 'standalone mode'\n\nPress a key\n";
      getchar();
      return false;
    }
    finder_data->McPort = htons((short)port);
    cout << "\nAgoraID: " << (unsigned int)(AgoraID = finder_data->IfNumAddr) << "\n";
    strcpy(IPStrAddr, finder_data->IfStrAddr);
    return true;
  }
  else {
    cout << "\nCan't find configuration file, running in 'standalone mode'\n\nPress a key\n";
    getchar();
    strcpy ( IPStrAddr, "" );
    return false;
  }
};

void DCDT_Agora::SetStatus(int NewStatus) {
  Status = NewStatus;
};


inline int DCDT_Agora::CheckIfAllMemberReady() {
      bool all_mebers_ready = true;

    // If all user Members are in READY status
    for(int i = 0; i<= MaxIDMember; i++) {
      if ( MemberTable[i].system == false &&
           MemberTable[i].empty == false && 
           MemberTable[i].MemberPtr) { 
        if ( MemberTable[i].MemberPtr->Status == READY )
          all_mebers_ready |= true;
        else
          all_mebers_ready = false;
      }
    }
    
    return all_mebers_ready;
};
#endif // define

---