(file) Return to Monitor.cpp CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / Common

Diff for /pegasus/src/Pegasus/Common/Monitor.cpp between version 1.70 and 1.115.14.3

version 1.70, 2004/01/30 15:41:28 version 1.115.14.3, 2007/01/24 04:31:02
Line 1 
Line 1 
 //%2003////////////////////////////////////////////////////////////////////////  //%2006////////////////////////////////////////////////////////////////////////
 // //
 // Copyright (c) 2000, 2001, 2002  BMC Software, Hewlett-Packard Development  // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
 // Company, L. P., IBM Corp., The Open Group, Tivoli Systems.  // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
 // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L. P.; // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L. P.;
 // IBM Corp.; EMC Corporation, The Open Group. // IBM Corp.; EMC Corporation, The Open Group.
   // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
   // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
   // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
   // EMC Corporation; VERITAS Software Corporation; The Open Group.
   // Copyright (c) 2006 Hewlett-Packard Development Company, L.P.; IBM Corp.;
   // EMC Corporation; Symantec Corporation; The Open Group.
 // //
 // Permission is hereby granted, free of charge, to any person obtaining a copy // Permission is hereby granted, free of charge, to any person obtaining a copy
 // of this software and associated documentation files (the "Software"), to // of this software and associated documentation files (the "Software"), to
Line 23 
Line 29 
 // //
 //============================================================================== //==============================================================================
 // //
 // Author: Mike Brasher (mbrasher@bmc.com)  
 //  
 // Modified By: Mike Day (monitor_2) mdday@us.ibm.com  
 // //
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
   #include "Network.h"
 #include <Pegasus/Common/Config.h> #include <Pegasus/Common/Config.h>
   
 #include <cstring> #include <cstring>
 #include "Monitor.h" #include "Monitor.h"
 #include "MessageQueue.h" #include "MessageQueue.h"
Line 38 
Line 41 
 #include <Pegasus/Common/Tracer.h> #include <Pegasus/Common/Tracer.h>
 #include <Pegasus/Common/HTTPConnection.h> #include <Pegasus/Common/HTTPConnection.h>
 #include <Pegasus/Common/MessageQueueService.h> #include <Pegasus/Common/MessageQueueService.h>
   #include <Pegasus/Common/Exception.h>
 #ifdef PEGASUS_OS_TYPE_WINDOWS  #include "ArrayIterator.h"
 # if defined(FD_SETSIZE) && FD_SETSIZE != 1024  #include <errno.h>
 #  error "FD_SETSIZE was not set to 1024 prior to the last inclusion \  
 of <winsock.h>. It may have been indirectly included (e.g., by including \  
 <windows.h>). Finthe inclusion of that header which is visible to this \  
 compilation unit and #define FD_SETZIE to 1024 prior to that inclusion; \  
 otherwise, less than 64 clients (the default) will be able to connect to the \  
 CIMOM. PLEASE DO NOT SUPPRESS THIS WARNING; PLEASE FIX THE PROBLEM."  
   
 # endif  
 # define FD_SETSIZE 1024  
 # include <windows.h>  
 #else  
 # include <sys/types.h>  
 # include <sys/socket.h>  
 # include <sys/time.h>  
 # include <netinet/in.h>  
 # include <netdb.h>  
 # include <arpa/inet.h>  
 #endif  
   
 PEGASUS_USING_STD; PEGASUS_USING_STD;
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
   static AtomicInt _connections(0);
  
 static AtomicInt _connections = 0;  // Added for NamedPipe implementation for windows
   #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined (PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
 static struct timeval create_time = {0, 1};  Mutex Monitor::_cout_mut;
 static struct timeval destroy_time = {300, 0};  #define PIPE_INCREMENT 1
 static struct timeval deadlock_time = {0, 0};  #endif
   
 ////////////////////////////////////////////////////////////////////////////////  
 //  
 // MonitorRep  
 //  
 ////////////////////////////////////////////////////////////////////////////////  
   
 struct MonitorRep  
 {  
     fd_set rd_fd_set;  
     fd_set wr_fd_set;  
     fd_set ex_fd_set;  
     fd_set active_rd_fd_set;  
     fd_set active_wr_fd_set;  
     fd_set active_ex_fd_set;  
 };  
   
 //////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
 // //
 // Monitor // Monitor
Line 96 
Line 64 
  
 #define MAX_NUMBER_OF_MONITOR_ENTRIES  32 #define MAX_NUMBER_OF_MONITOR_ENTRIES  32
 Monitor::Monitor() Monitor::Monitor()
    : _module_handle(0), _controller(0), _async(false), _stopConnections(0)     : _stopConnections(0),
        _stopConnectionsSem(0),
        _solicitSocketCount(0),
   #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
        _solicitPipeCount(0),
   #endif
        _tickle_client_socket(-1),
        _tickle_server_socket(-1),
        _tickle_peer_socket(-1)
 { {
     int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;     int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;
     Socket::initializeInterface();     Socket::initializeInterface();
     _rep = 0;      _entries_socket.reserveCapacity(numberOfMonitorEntriesToAllocate);
     _entries.reserveCapacity(numberOfMonitorEntriesToAllocate);  
     for( int i = 0; i < numberOfMonitorEntriesToAllocate; i++ )  #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
       _entries_pipe.reserveCapacity(numberOfMonitorEntriesToAllocate);
   #endif
       // setup the tickler
       initializeTickler();
   
       // Start the count at 1 because initilizeTickler()
       // has added an entry in the first position of the
       // _entries array
       for( int i = 1; i < numberOfMonitorEntriesToAllocate; i++ )
     {     {
        _MonitorEntry entry(0, 0, 0);        _MonitorEntry entry(0, 0, 0);
        _entries.append(entry);         _entries_socket.append(entry);
     }  
 } }
   #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
 Monitor::Monitor(Boolean async)      !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
    : _module_handle(0), _controller(0), _async(async), _stopConnections(0)      for ( int i = 1; i < numberOfMonitorEntriesToAllocate; i++ )
 {  
     int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;  
     Socket::initializeInterface();  
     _rep = 0;  
     _entries.reserveCapacity(numberOfMonitorEntriesToAllocate);  
     for( int i = 0; i < numberOfMonitorEntriesToAllocate; i++ )  
     {     {
        _MonitorEntry entry(0, 0, 0);        _MonitorEntry entry(0, 0, 0);
        _entries.append(entry);         _entries_pipe.append(entry);
     }     }
   #endif
 } }
  
 Monitor::~Monitor() Monitor::~Monitor()
 { {
     Tracer::trace(TRC_HTTP, Tracer::LEVEL4,      uninitializeTickler();
                   "deregistering with module controller");  
   
     if(_module_handle != NULL)  
     {  
        _controller->deregister_module(PEGASUS_MODULENAME_MONITOR);  
        _controller = 0;  
        delete _module_handle;  
     }  
     Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "deleting rep");  
   
     Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "uninitializing interface");  
     Socket::uninitializeInterface();     Socket::uninitializeInterface();
     Tracer::trace(TRC_HTTP, Tracer::LEVEL4,     Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                   "returning from monitor destructor");                   "returning from monitor destructor");
 } }
   void Monitor::uninitializeTickler(){
  
 Boolean Monitor::run(Uint32 milliseconds)      Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "uninitializing interface");
 {  
   
     Boolean handled_events = false;  
      int i = 0;  
     #if defined(PEGASUS_OS_OS400) || defined(PEGASUS_OS_HPUX)  
     struct timeval tv = {milliseconds/1000, milliseconds%1000*1000};  
 #else  
     struct timeval tv = {0, 1};  
 #endif  
     fd_set fdread;  
     FD_ZERO(&fdread);  
     _entry_mut.lock(pegasus_thread_self());  
  
     // Check the stopConnections flag.  If set, clear the Acceptor monitor entries      try{
     if (_stopConnections == 1)          if(_tickle_peer_socket >= 0)
     {  
         for ( int indx = 0; indx < (int)_entries.size(); indx++)  
         {  
             if (_entries[indx]._type == Monitor::ACCEPTOR)  
             {  
                 if ( _entries[indx]._status.value() != _MonitorEntry::EMPTY)  
                 {  
                    if ( _entries[indx]._status.value() == _MonitorEntry::IDLE ||  
                         _entries[indx]._status.value() == _MonitorEntry::DYING )  
                    {                    {
                        // remove the entry              Socket::close(_tickle_peer_socket);
                        _entries[indx]._status = _MonitorEntry::EMPTY;  
                    }                    }
                    else          if(_tickle_client_socket >= 0)
                    {                    {
                        // set status to DYING              Socket::close(_tickle_client_socket);
                       _entries[indx]._status = _MonitorEntry::DYING;  
                    }  
                }  
            }            }
           if(_tickle_server_socket >= 0)
           {
               Socket::close(_tickle_server_socket);
         }         }
         _stopConnections = 0;  
     }     }
       catch(...)
     for( int indx = 0; indx < (int)_entries.size(); indx++)  
     {  
        if ((_entries[indx]._status.value() == _MonitorEntry::DYING) &&  
                 (_entries[indx]._type == Monitor::CONNECTION))  
        {        {
           MessageQueue *q = MessageQueue::lookup(_entries[indx].queueId);          Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
           PEGASUS_ASSERT(q != 0);                    "Failed to close tickle sockets");
           MessageQueue & o = static_cast<HTTPConnection *>(q)->get_owner();  
           Message* message= new CloseConnectionMessage(_entries[indx].socket);  
           message->dest = o.getQueueId();  
   
           // HTTPAcceptor is responsible for closing the connection.  
           // The lock is released to allow HTTPAcceptor to call  
           // unsolicitSocketMessages to free the entry.  
           // Once HTTPAcceptor completes processing of the close  
           // connection, the lock is re-requested and processing of  
           // the for loop continues.  This is safe with the current  
           // implementation of the _entries object.  Note that the  
           // loop condition accesses the _entries.size() on each  
           // iteration, so that a change in size while the mutex is  
           // unlocked will not result in an ArrayIndexOutOfBounds  
           // exception.  
   
           _entry_mut.unlock();  
           o.enqueue(message);  
           _entry_mut.lock(pegasus_thread_self());  
        }        }
   
     }     }
  
     Uint32 _idleEntries = 0;  void Monitor::initializeTickler(){
       /*
          NOTE: On any errors trying to
                setup out tickle connection,
                throw an exception/end the server
       */
  
     for( int indx = 0; indx < (int)_entries.size(); indx++)      /* setup the tickle server/listener */
     {      // try until the tcpip is restarted
        if(_entries[indx]._status.value() == _MonitorEntry::IDLE)      do
        {        {
           _idleEntries++;  
           FD_SET(_entries[indx].socket, &fdread);  
        }  
     }  
  
     // Fixed in monitor_2 but added because Monitor is still the default monitor.          // get a socket for the server side
     // When _idleEntries is 0 don't immediately return, otherwise this loops out of control          if((_tickle_server_socket = Socket::createSocket(PF_INET, SOCK_STREAM, 0)) == PEGASUS_INVALID_SOCKET)
     // kicking off kill idle thread threads.  E.g. There is nothing to select on when the cimserver  
     // is shutting down.  
     if( _idleEntries == 0 )  
     {     {
         Thread::sleep( milliseconds );              //handle error
         _entry_mut.unlock();              MessageLoaderParms parms("Common.Monitor.TICKLE_CREATE",
         return false;                                       "Received error number $0 while creating the internal socket.",
                                        getSocketError());
               throw Exception(parms);
     }     }
  
     _entry_mut.unlock();          // initialize the address
     int events = select(FD_SETSIZE, &fdread, NULL, NULL, &tv);          memset(&_tickle_server_addr, 0, sizeof(_tickle_server_addr));
    _entry_mut.lock(pegasus_thread_self());  #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM
   #pragma convert(37)
 #ifdef PEGASUS_OS_TYPE_WINDOWS  
     if(events == SOCKET_ERROR)  
 #else  
     if(events == -1)  
 #endif #endif
     {          _tickle_server_addr.sin_addr.s_addr = inet_addr("127.0.0.1");
        Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM
           "Monitor::run - errorno = %d has occurred on select.", errno);  #pragma convert(0)
        // The EBADF error indicates that one or more or the file  #endif
        // descriptions was not valid. This could indicate that          _tickle_server_addr.sin_family = PF_INET;
        // the _entries structure has been corrupted or that          _tickle_server_addr.sin_port = 0;
        // we have a synchronization error.  
  
        PEGASUS_ASSERT(errno != EBADF);          SocketLength _addr_size = sizeof(_tickle_server_addr);
     }  
     else if (events)  
     {  
        Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
           "Monitor::run select event received events = %d, monitoring %d idle entries",  
            events, _idleEntries);  
        for( int indx = 0; indx < (int)_entries.size(); indx++)  
        {  
           // The Monitor should only look at entries in the table that are IDLE (i.e.,  
           // owned by the Monitor).  
           if((_entries[indx]._status.value() == _MonitorEntry::IDLE) &&  
              (FD_ISSET(_entries[indx].socket, &fdread)))  
           {  
              MessageQueue *q = MessageQueue::lookup(_entries[indx].queueId);  
              Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
                   "Monitor::run indx = %d, queueId =  %d, q = %p",  
                   indx, _entries[indx].queueId, q);  
              PEGASUS_ASSERT(q !=0);  
  
              try          // bind server side to socket
              {          if((::bind(_tickle_server_socket,
                 if(_entries[indx]._type == Monitor::CONNECTION)                     reinterpret_cast<struct sockaddr*>(&_tickle_server_addr),
                 {                     sizeof(_tickle_server_addr))) < 0)
                    Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
                      "_entries[indx].type for indx = %d is Monitor::CONNECTION", indx);  
                    static_cast<HTTPConnection *>(q)->_entry_index = indx;  
                    _entries[indx]._status = _MonitorEntry::BUSY;  
                    // If allocate_and_awaken failure, retry on next iteration  
                    if (!MessageQueueService::get_thread_pool()->allocate_and_awaken(  
                            (void *)q, _dispatch))  
                    {                    {
                       Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2,              // handle error
                           "Monitor::run: Insufficient resources to process request.");  #ifdef PEGASUS_OS_ZOS
                       _entries[indx]._status = _MonitorEntry::IDLE;              MessageLoaderParms parms("Common.Monitor.TICKLE_BIND_LONG",
                       _entry_mut.unlock();                                  "Received error:$0 while binding the internal socket."
                       return true;                                  ,strerror(errno));
                    }  #else
               MessageLoaderParms parms("Common.Monitor.TICKLE_BIND",
                                   "Received error number $0 while binding the internal socket.",
                                   getSocketError());
   #endif
               throw Exception(parms);
                 }                 }
                 else  
                 {  
                    Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
                      "Non-connection entry, indx = %d, has been received.", indx);  
                    int events = 0;  
                    events |= SocketMessage::READ;  
                    Message *msg = new SocketMessage(_entries[indx].socket, events);  
                    _entries[indx]._status = _MonitorEntry::BUSY;  
                    _entry_mut.unlock();  
  
                    q->enqueue(msg);          // tell the kernel we are a server
                    _entries[indx]._status = _MonitorEntry::IDLE;          if((::listen(_tickle_server_socket,3)) < 0)
                    return true;  
                 }  
              }  
              catch(...)  
              {              {
              }              // handle error
              handled_events = true;              MessageLoaderParms parms("Common.Monitor.TICKLE_LISTEN",
           }                                  "Received error number $0 while listening to the internal socket.",
        }                                  getSocketError());
     }              throw Exception(parms);
     _entry_mut.unlock();  
     return(handled_events);  
 } }
  
 void Monitor::stopListeningForConnections()          // make sure we have the correct socket for our server
           int sock = ::getsockname(_tickle_server_socket,
                               reinterpret_cast<struct sockaddr*>(&_tickle_server_addr),
                               &_addr_size);
           if(sock < 0)
 { {
     PEG_METHOD_ENTER(TRC_HTTP, "Monitor::stopListeningForConnections()");              // handle error
               MessageLoaderParms parms("Common.Monitor.TICKLE_SOCKNAME",
     _stopConnections = 1;                                  "Received error number $0 while getting the internal socket name.",
                                   getSocketError());
     PEG_METHOD_EXIT();              throw Exception(parms);
 } }
  
           /* set up the tickle client/connector */
  
 int  Monitor::solicitSocketMessages(          // get a socket for our tickle client
     Sint32 socket,          if((_tickle_client_socket = Socket::createSocket(PF_INET, SOCK_STREAM, 0))
     Uint32 events,             == PEGASUS_INVALID_SOCKET)
     Uint32 queueId,  
     int type)  
 { {
               // handle error
               MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_CREATE",
                                   "Received error number $0 while creating the internal client socket.",
                                   getSocketError());
               throw Exception(parms);
           }
  
    PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");          // setup the address of the client
           memset(&_tickle_client_addr, 0, sizeof(_tickle_client_addr));
    _entry_mut.lock(pegasus_thread_self());  #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM
   #pragma convert(37)
   #endif
           _tickle_client_addr.sin_addr.s_addr = inet_addr("127.0.0.1");
   #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM
   #pragma convert(0)
   #endif
           _tickle_client_addr.sin_family = PF_INET;
           _tickle_client_addr.sin_port = 0;
  
    for(int index = 0; index < (int)_entries.size(); index++)          // bind socket to client side
    {          if((::bind(_tickle_client_socket,
       try                     reinterpret_cast<struct sockaddr*>(&_tickle_client_addr),
       {                     sizeof(_tickle_client_addr))) < 0)
          if(_entries[index]._status.value() == _MonitorEntry::EMPTY)  
          {          {
             _entries[index].socket = socket;              // handle error
             _entries[index].queueId  = queueId;              MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_BIND",
             _entries[index]._type = type;                                       "Received error number $0 while binding the internal client socket.",
             _entries[index]._status = _MonitorEntry::IDLE;                                       getSocketError());
             _entry_mut.unlock();              throw Exception(parms);
   
             return index;  
          }  
       }       }
       catch(...)  
           // connect to server side
           if((::connect(_tickle_client_socket,
                         reinterpret_cast<struct sockaddr*>(&_tickle_server_addr),
                         sizeof(_tickle_server_addr))) < 0)
       {       {
               // handle error
               MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_CONNECT",
                                        "Received error number $0 while connecting the internal client socket.",
                                        getSocketError());
               throw Exception(parms);
       }       }
  
    }          /* set up the slave connection */
    _entry_mut.unlock();          memset(&_tickle_peer_addr, 0, sizeof(_tickle_peer_addr));
    PEG_METHOD_EXIT();          SocketLength peer_size = sizeof(_tickle_peer_addr);
    return -1;          Threads::sleep(1);
 }  
  
 void Monitor::unsolicitSocketMessages(Sint32 socket)          // this call may fail, we will try a max of 20 times to establish this peer connection
           if((_tickle_peer_socket = ::accept(_tickle_server_socket,
                                              reinterpret_cast<struct sockaddr*>(&_tickle_peer_addr),
                                              &peer_size)) < 0)
 { {
  
     PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitSocketMessages");              if(_tickle_peer_socket == PEGASUS_SOCKET_ERROR
     _entry_mut.lock(pegasus_thread_self());                 && getSocketError() == PEGASUS_NETWORK_TRYAGAIN)
   
     for(int index = 0; index < (int)_entries.size(); index++)  
     {     {
        if(_entries[index].socket == socket)                  int retries = 0;
                   do
        {        {
           _entries[index]._status = _MonitorEntry::EMPTY;                      Threads::sleep(1);
           _entries[index].socket = -1;                      _tickle_peer_socket = ::accept(_tickle_server_socket,
           break;                                                     reinterpret_cast<struct sockaddr*>(&_tickle_peer_addr),
        }                                                     &peer_size);
     }                      retries++;
     _entry_mut.unlock();                  } while(_tickle_peer_socket == PEGASUS_SOCKET_ERROR
     PEG_METHOD_EXIT();                          && getSocketError() == PEGASUS_NETWORK_TRYAGAIN
                           && retries < 20);
 } }
               // TCP/IP is down, destroy sockets and retry again.
 PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)              if(_tickle_peer_socket == PEGASUS_SOCKET_ERROR &&
 {                 getSocketError() == PEGASUS_NETWORK_TCPIP_STOPPED )
    HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(parm);  
    Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
         "Monitor::_dispatch: entering run() for indx  = %d, queueId = %d, q = %p",  
         dst->_entry_index, dst->_monitor->_entries[dst->_entry_index].queueId, dst);  
    try  
    {    {
       dst->run(1);                  // destroy everything
                   uninitializeTickler();
                   // retry again.
                   continue;
    }    }
    catch (...)  
    {  
       Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
           "Monitor::_dispatch: exception received");  
    }    }
    Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  
           "Monitor::_dispatch: exited run() for index %d", dst->_entry_index);  
  
    PEGASUS_ASSERT(dst->_monitor->_entries[dst->_entry_index]._status.value() == _MonitorEntry::BUSY);  
  
    // Once the HTTPConnection thread has set the status value to either          if(_tickle_peer_socket == PEGASUS_SOCKET_ERROR)
    // Monitor::DYING or Monitor::IDLE, it has returned control of the connection  
    // to the Monitor.  It is no longer permissible to access the connection  
    // or the entry in the _entries table.  
    if (dst->_connectionClosePending)  
    {    {
       dst->_monitor->_entries[dst->_entry_index]._status = _MonitorEntry::DYING;              // handle error
    }              MessageLoaderParms parms("Common.Monitor.TICKLE_ACCEPT",
    else                                       "Received error number $0 while accepting the internal socket connection.",
                                        getSocketError());
               throw Exception(parms);
           } else
    {    {
       dst->_monitor->_entries[dst->_entry_index]._status = _MonitorEntry::IDLE;              // socket is ok
    }              break;
    return 0;  
 } }
       } while(1); // try until TCP/IP is restarted
  
       Socket::disableBlocking(_tickle_peer_socket);
       Socket::disableBlocking(_tickle_client_socket);
  
       // add the tickler to the list of entries to be monitored and set to IDLE because Monitor only
       // checks entries with IDLE state for events
       _MonitorEntry entry(_tickle_peer_socket, 1, INTERNAL);
       entry._status = _MonitorEntry::IDLE;
  
 ////************************* monitor 2 *****************************////      // is the tickler initalized as first socket on startup ?
 ////************************* monitor 2 *****************************////      if (_entries_socket.size()==0)
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
   
   
   
   
   
 m2e_rep::m2e_rep(void)  
   :Base(), state(IDLE)  
   
 { {
          // if yes, append a new entry
          _entries_socket.append(entry);
 } }
       else
 m2e_rep::m2e_rep(monitor_2_entry_type _type,  
                  pegasus_socket _sock,  
                  void* _accept,  
                  void* _dispatch)  
   : Base(), type(_type), state(IDLE), psock(_sock),  
     accept_parm(_accept), dispatch_parm(_dispatch)  
 { {
          // if not, overwrite the tickler entry with new socket
          _entries_socket[0]=entry;
 } }
  
 m2e_rep::~m2e_rep(void)  
 {  
 } }
  
 m2e_rep::m2e_rep(const m2e_rep& r)  void Monitor::tickle(void)
   : Base()  {
       static char _buffer[] =
 { {
   if(this != &r){        '0','0'
     type = r.type;      };
     psock = r.psock;  
     accept_parm = r.accept_parm;  
     dispatch_parm = r.dispatch_parm;  
     state = IDLE;  
  
   }      AutoMutex autoMutex(_tickle_mutex);
       Socket::write(_tickle_client_socket,&_buffer, 2);
 } }
  
   void Monitor::setSocketState( Uint32 index, _MonitorEntry::entry_status status )
 m2e_rep& m2e_rep::operator =(const m2e_rep& r)  
 { {
   if(this != &r) {      // Set the state to requested state
     type = r.type;      _entries_socket[index]._status = status;
     psock = r.psock;  
     accept_parm = r.accept_parm;  
     dispatch_parm = r.dispatch_parm;  
     state = IDLE;  
   }  
   return *this;  
 } }
  
 Boolean m2e_rep::operator ==(const m2e_rep& r)  #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
   void Monitor::setPipeState( Uint32 index, _MonitorEntry::entry_status status )
 { {
   if(this == &r)      // Set the state to requested state
     return true;      _entries_pipe[index]._status = status;
   return false;  
 } }
  
 Boolean m2e_rep::operator ==(void* r)  void  Monitor::handlePipe()
 { {
   if((void*)this == r)  
     return true;  
   return false;  
 }  
  
 m2e_rep::operator pegasus_socket() const      AutoMutex autoEntryMutex(_entry_pipe_mut);
 {  
   return psock;  
 }  
  
       ArrayIterator<_MonitorEntry> entries(_entries_pipe);
  
 monitor_2_entry::monitor_2_entry(void)      // Check the stopConnections flag.  If set, clear the Acceptor monitor entries
 {  
   _rep = new m2e_rep();  
 }  
  
 monitor_2_entry::monitor_2_entry(pegasus_socket& _psock,      if (_stopConnections.get() > 0)
                                  monitor_2_entry_type _type,      {
                                  void* _accept_parm, void* _dispatch_parm)          for ( int indx = 0; indx < (int)entries.size(); indx++)
           {
               if (entries[indx]._type == Monitor::ACCEPTOR)
 { {
   _rep = new m2e_rep(_type, _psock, _accept_parm, _dispatch_parm);                  if ( entries[indx]._status.get() != _MonitorEntry::EMPTY)
                   {
                      if ( entries[indx]._status.get() == _MonitorEntry::IDLE ||
                           entries[indx]._status.get() == _MonitorEntry::DYING )
                      {
                          // remove the entry
                          entries[indx]._status = _MonitorEntry::EMPTY;
 } }
                      else
 monitor_2_entry::monitor_2_entry(const monitor_2_entry& e)  
 { {
   if(this != &e){                         // set status to DYING
     Inc(this->_rep = e._rep);                         entries[indx]._status = _MonitorEntry::DYING;
                      }
   }   }
 } }
   
 monitor_2_entry::~monitor_2_entry(void)  
 {  
   
   Dec(_rep);  
 } }
           _stopConnections--;
  
 monitor_2_entry& monitor_2_entry::operator=(const monitor_2_entry& e)          if (_stopConnections.get() == 0)
 { {
   if(this != &e){              _stopConnectionsSem.signal();
     Dec(_rep);  
     Inc(this->_rep = e._rep);  
   }   }
   return *this;  
 } }
  
 Boolean monitor_2_entry::operator ==(const monitor_2_entry& me) const      for( int indx = 0; indx < (int)entries.size(); indx++)
 { {
   if(this == &me)         const _MonitorEntry &entry = entries[indx];
     return true;         if ((entry._status.get() == _MonitorEntry::DYING) &&
   return false;                       (entry._type == Monitor::CONNECTION))
 }  
   
 Boolean monitor_2_entry::operator ==(void* k) const  
 { {
   if((void *)this == k)              MessageQueue *q = MessageQueue::lookup(entry.queueId);
     return true;              PEGASUS_ASSERT(q != 0);
   return false;              HTTPConnection &h = *static_cast<HTTPConnection *>(q);
 }  
  
               if (h._connectionClosePending == false)
                   continue;
  
 monitor_2_entry_type monitor_2_entry::get_type(void) const              // NOTE: do not attempt to delete while there are pending responses
 {              // coming thru. The last response to come thru after a
   return _rep->type;              // _connectionClosePending will reset _responsePending to false
 }              // and then cause the monitor to rerun this code and clean up.
               // (see HTTPConnection.cpp)
  
 void monitor_2_entry::set_type(monitor_2_entry_type t)              if (h._responsePending == true)
 { {
   _rep->type = t;                  Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
 }                      "Monitor::handlePipe - "
                       "Ignoring connection delete request because "
                       "responses are still pending. "
                       "connection=0x%p, NamedPipe=%d\n",
                       (void *)&h, h.getNamedPipe().getPipe());
                   continue;
               }
               h._connectionClosePending = false;
               MessageQueue &o = h.get_owner();
               Message* message = 0;
  
               message= new CloseConnectionMessage(entry.namedPipe);
  
 monitor_2_entry_state  monitor_2_entry::get_state(void) const              message->dest = o.getQueueId();
 {  
   return (monitor_2_entry_state) _rep->state.value();  
 }  
  
 void monitor_2_entry::set_state(monitor_2_entry_state t)              // HTTPAcceptor is responsible for closing the connection.
 {              // The lock is released to allow HTTPAcceptor to call
   _rep->state = t;              // unsolicitPipeMessages to free the entry.
 }              // Once HTTPAcceptor completes processing of the close
               // connection, the lock is re-requested and processing of
               // the for loop continues.  This is safe with the current
               // implementation of the entries object.  Note that the
               // loop condition accesses the entries.size() on each
               // iteration, so that a change in size while the mutex is
               // unlocked will not result in an ArrayIndexOutOfBounds
               // exception.
  
 void* monitor_2_entry::get_accept(void) const              _entry_pipe_mut.unlock();
 {              o.enqueue(message);
   return _rep->accept_parm;              _entry_pipe_mut.lock();
               // After enqueue a message and the autoEntryMutex has been released and locked again,
               // the array of _entries_socket can be changed. The ArrayIterator has be reset with the original _entries_socket.
               entries.reset(_entries_pipe);
 } }
   
 void monitor_2_entry::set_accept(void* a)  
 {  
   _rep->accept_parm = a;  
 } }
  
       Uint32 _idleEntries = 0;
       //Records the list of index in entries_pipe that are valid
       Array <Uint32> indexPipeCountAssociator;
       int pipeEntryCount=0;
       int MaxPipes = PIPE_INCREMENT;
       // List of Pipe Handlers
       HANDLE * hPipeList = new HANDLE[PIPE_INCREMENT];
  
 void* monitor_2_entry::get_dispatch(void) const      for( int indx = 0; indx < (int)entries.size()  ; indx++)
 { {
   return _rep->dispatch_parm;          if (!entries[indx].namedPipeConnection)
 }  
   
 void monitor_2_entry::set_dispatch(void* a)  
 { {
   _rep->dispatch_parm = a;              continue;
 } }
  
 pegasus_socket monitor_2_entry::get_sock(void) const          entries[indx].pipeSet = false;
           if (pipeEntryCount >= MaxPipes)
 { {
   return _rep->psock;              MaxPipes += PIPE_INCREMENT;
 }              HANDLE* temp_pList = new HANDLE[MaxPipes];
               for (Uint32 i =0;i<pipeEntryCount;i++)
   
 void monitor_2_entry::set_sock(pegasus_socket& s)  
 { {
   _rep->psock = s;                  temp_pList[i] = hPipeList[i];
   
 } }
               delete [] hPipeList;
               hPipeList = temp_pList;
           }
           hPipeList[pipeEntryCount] = entries[indx].namedPipe.getPipe();
           indexPipeCountAssociator.append(indx);
           pipeEntryCount++;
  
 //static monitor_2* _m2_instance;      }
   
 AsyncDQueue<HTTPConnection2> monitor_2::_connections(true, 0);  
   
 monitor_2::monitor_2(void)  
   : _session_dispatch(0), _accept_dispatch(0), _listeners(true, 0),  
     _ready(true, 0), _die(0), _requestCount(0)  
 {  
   try {  
  
     bsd_socket_factory _factory;  
  
     // set up the listener/acceptor      int pEvents = -1;
     pegasus_socket temp = pegasus_socket(&_factory);      int pCount = -1;
       BOOL bPeekPipe = 0;
       DWORD dwBytesAvail=0;
       // The pipe is sniffed and check if there are any data. If available, the
       // message is picked from the Queue and appropriate methods are invoked.
  
     temp.socket(PF_INET, SOCK_STREAM, 0);  
     // initialize the address  
     memset(&_tickle_addr, 0, sizeof(_tickle_addr));  
 #ifdef PEGASUS_OS_ZOS  
     _tickle_addr.sin_addr.s_addr = inet_addr_ebcdic("127.0.0.1");  
 #else  
 #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM  
 #pragma convert(37)  
 #endif  
     _tickle_addr.sin_addr.s_addr = inet_addr("127.0.0.1");  
 #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM  
 #pragma convert(0)  
 #endif  
 #endif  
     _tickle_addr.sin_family = PF_INET;  
     _tickle_addr.sin_port = 0;  
  
     PEGASUS_SOCKLEN_SIZE _addr_size = sizeof(_tickle_addr);      // pipeProcessCount records the number of requests that are processed.
       // At the end of loop this is verified against the count of request
       // on local connection . If there are any pipes which needs to be
       // processed we would apply delay and then proceed to iterate.
  
     temp.bind((struct sockaddr *)&_tickle_addr, sizeof(_tickle_addr));      Uint32 pipeProcessCount =0;
     temp.listen(3);  
     temp.getsockname((struct sockaddr*)&_tickle_addr, &_addr_size);  
  
     // set up the connector      // pipeIndex is used to index into indexPipeCountAssociator to fetch
       // index of the _MonitorEntry of Monitor
       for (int pipeIndex = 0; pipeIndex < pipeEntryCount; pipeIndex++)
       {
           dwBytesAvail = 0;
  
     pegasus_socket tickler = pegasus_socket(&_factory);          bPeekPipe = ::PeekNamedPipe(hPipeList[pipeIndex],
     tickler.socket(PF_INET, SOCK_STREAM, 0);                                      NULL,
     struct sockaddr_in _addr;                                      NULL,
     memset(&_addr, 0, sizeof(_addr));                                      NULL,
 #ifdef PEGASUS_OS_ZOS                                      &dwBytesAvail,
     _addr.sin_addr.s_addr = inet_addr_ebcdic("127.0.0.1");                                      NULL
 #else                                      );
     _addr.sin_addr.s_addr = inet_addr("127.0.0.1");  
 #endif  
     _addr.sin_family = PF_INET;  
     _addr.sin_port = 0;  
     tickler.bind((struct sockaddr*)&_addr, sizeof(_addr));  
     tickler.connect((struct sockaddr*)&_tickle_addr, sizeof(_tickle_addr));  
  
     _tickler.set_sock(tickler);          // If peek on NamedPipe was successfull and data is available
     _tickler.set_type(INTERNAL);          if (bPeekPipe && dwBytesAvail)
     _tickler.set_state(BUSY);          {
  
     struct sockaddr_in peer;              pEvents = 1;
     memset(&peer, 0, sizeof(peer));              Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "EVENT TRIGGERED in Pipe = %u ",entries[indexPipeCountAssociator[pipeIndex]].namedPipe.getPipe());
     PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);              entries[indexPipeCountAssociator[pipeIndex]].pipeSet = true;
               int pIndx = indexPipeCountAssociator[pipeIndex];
  
     pegasus_socket accepted = temp.accept((struct sockaddr*)&peer, &peer_size);              if ((entries[pIndx]._status.get() == _MonitorEntry::IDLE) &&
                       entries[pIndx].namedPipe.isConnected())
               {
  
     monitor_2_entry* _tickle = new monitor_2_entry(accepted, INTERNAL, 0, 0);                  MessageQueue *q = 0;
     _tickle->set_state(BUSY);  
  
     _listeners.insert_first(_tickle);                  try
                   {
  
                       q = MessageQueue::lookup (entries[pIndx].queueId);
                       PEGASUS_ASSERT(q !=0);
   }   }
   catch(...){  }                  catch (Exception e)
 }  
   
 monitor_2::~monitor_2(void)  
 { {
                       e.getMessage();
    stop();  
   
   try {  
     monitor_2_entry* temp = _listeners.remove_first();  
     while(temp){  
       delete temp;  
       temp = _listeners.remove_first();  
     }     }
                   catch(...)
                   {
   }   }
  
   catch(...){  }                  Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                   "Monitor::handlePipe indx = %d, queueId =  %d,\
                                   q = %p",pIndx, entries[pIndx].queueId, q);
                   try
                   {
                       if (entries[pIndx]._type == Monitor::CONNECTION)
                       {
  
                           Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                           "entries[indx].type for indx = \
                                           %d is Monitor::CONNECTION",
                                           pIndx);
                           static_cast<HTTPConnection *>(q)->_entry_index = pIndx;
                           HTTPConnection *dst = reinterpret_cast \
                                                       <HTTPConnection *>(q);
                           Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                           "Monitor::_dispatch: entering handlePipe() \
                                           for indx  = %d, queueId = %d, \
                                           q = %p",\
                                           dst->_entry_index,
                                           dst->_monitor->_entries_pipe\
                                           [dst->_entry_index].queueId, dst);
  
   try   try
   {   {
      HTTPConnection2* temp = _connections.remove_first();  
      while(temp)                              dst->run(1);
      {  
         delete temp;                              // Record that the requested data is read/Written
         temp = _connections.remove_first();                              pipeProcessCount++;
      }  
   }   }
   catch(...)   catch(...)
   {   {
                               Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                               "Monitor::_dispatch: \
                                               exception received");
   }   }
  
                           Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
 }                                          "Monitor::_dispatch: exited \
                                           handlePipe() index %d",
                                           dst->_entry_index);
  
  
 void monitor_2::run(void)                      }
                       else
 { {
   monitor_2_entry* temp;                          /* The condition
   while(_die.value() == 0) {                              entries[indx]._type == Monitor::INTERNAL can be
                               ignored for pipes as the tickler is of
                               Monitor::INTERNAL type. The tickler is
                               a socket.
                           */
                           Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                               "Non-connection entry, indx = %d,\
                                               has been received.", pIndx);
  
      struct timeval tv_idle = { 60, 0 };                          Message *msg = 0;
  
     // place all sockets in the select set                          pEvents |= NamedPipeMessage::READ;
     FD_ZERO(&rd_fd_set);                          msg = new NamedPipeMessage(entries[pIndx].namedPipe, pEvents);
     try {                          entries[pIndx]._status = _MonitorEntry::BUSY;
       _listeners.lock(pegasus_thread_self());                          _entry_pipe_mut.unlock();
       temp = _listeners.next(0);                          q->enqueue(msg);
       while(temp != 0 ){                          _entry_pipe_mut.lock();
         if(temp->get_state() == CLOSED ) {                          entries.reset(_entries_pipe);
           monitor_2_entry* closed = temp;                          entries[pIndx]._status = _MonitorEntry::IDLE;
           temp = _listeners.next(closed);                          delete [] hPipeList;
           _listeners.remove_no_lock(closed);  
   
           HTTPConnection2 *cn = monitor_2::remove_connection((Sint32)(closed->get_sock()));  
           delete cn;  
           delete closed;  
         }  
         if(temp == 0)  
            break;  
         Sint32 fd = (Sint32) temp->get_sock();  
         if(fd >= 0 )  
            FD_SET(fd , &rd_fd_set);  
         temp = _listeners.next(temp);  
       }  
       _listeners.unlock();  
     }  
     catch(...){  
       return;       return;
     }     }
     // important -  the dispatch routine has pointers to all the  
     // entries that are readable. These entries can be changed but  
     // the pointer must not be tampered with.  
     if(_connections.count() )  
        int events = select(FD_SETSIZE, &rd_fd_set, NULL, NULL, NULL);  
     else  
        int events = select(FD_SETSIZE, &rd_fd_set, NULL, NULL, &tv_idle);  
  
     if(_die.value())  
     {  
        break;  
     }  
  
     try {  
       _listeners.lock(pegasus_thread_self());  
       temp = _listeners.next(0);  
       while(temp != 0 ){  
         Sint32 fd = (Sint32) temp->get_sock();  
         if(fd >= 0 && FD_ISSET(fd, &rd_fd_set)) {  
           temp->set_state(BUSY);  
           FD_CLR(fd,  &rd_fd_set);  
           monitor_2_entry* ready = new monitor_2_entry(*temp);  
           try  
           {  
              _ready.insert_first(ready);  
           }           }
           catch(...)           catch(...)
           {           {
           }  
  
           _requestCount++;  
         }  
         temp = _listeners.next(temp);  
       }       }
       _listeners.unlock();  
     }     }
     catch(...){  
       return;  
     }     }
     // now handle the sockets that are ready to read  
     if(_ready.count())  
        _dispatch();  
     else  
     {  
        if(_connections.count() == 0 )  
           _idle_dispatch(_idle_parm);  
     }     }
   } // while alive      delete [] hPipeList;
   
       return;
  
 } }
   #endif
  
 int  monitor_2::solicitSocketMessages(  void Monitor::run(Uint32 milliseconds)
     Sint32 socket,  
     Uint32 events,  
     Uint32 queueId,  
     int type)  
 { {
  
    PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");      int i = 0;
   
       struct timeval tv = {milliseconds/1000, milliseconds%1000*1000};
   
       fd_set fdread;
       FD_ZERO(&fdread);
  
    _entry_mut.lock(pegasus_thread_self());      AutoMutex autoEntryMutex(_entry_mut);
  
    for(int index = 0; index < (int)_entries.size(); index++)      ArrayIterator<_MonitorEntry> entries(_entries_socket);
   
       // Check the stopConnections flag.  If set, clear the Acceptor monitor entries
   #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
       if (_stopConnections.get() > 0)
   #else
       if (_stopConnections.get() == 1)
   #endif
    {    {
       try          for ( int indx = 0; indx < (int)entries.size(); indx++)
       {       {
          if(_entries[index]._status.value() == monitor_2_entry::EMPTY)              if (entries[indx]._type == Monitor::ACCEPTOR)
          {          {
             _entries[index].socket = socket;                  if ( entries[indx]._status.get() != _MonitorEntry::EMPTY)
             //_entries[index].queueId  = queueId;                  {
             //_entries[index]._type = type;                     if ( entries[indx]._status.get() == _MonitorEntry::IDLE ||
             _entries[index]._status = _MonitorEntry::IDLE;                          entries[indx]._status.get() == _MonitorEntry::DYING )
             _entry_mut.unlock();                     {
                          // remove the entry
             return index;                         entries[indx]._status = _MonitorEntry::EMPTY;
          }  
       }       }
       catch(...)                     else
       {       {
                          // set status to DYING
                          entries[indx]._status = _MonitorEntry::DYING;
       }       }
   
    }    }
    _entry_mut.unlock();  
    PEG_METHOD_EXIT();  
    return -1;  
 } }
           }
           _stopConnections--;
 void monitor_2::unsolicitSocketMessages(Sint32 socket)          if (_stopConnections.get() == 0)
 { {
               _stopConnectionsSem.signal();
           }
       }
  
     PEG_METHOD_ENTER(TRC_HTTP, "monitor_2::unsolicitSocketMessages");      for( int indx = 0; indx < (int)entries.size(); indx++)
     _entry2_mut.lock(pegasus_thread_self());  
   
     for(int index = 0; index < (int)_entries2.size(); index++)  
     {     {
        if(_entries2[index].socket == socket)               const _MonitorEntry &entry = entries[indx];
          if ((entry._status.get() == _MonitorEntry::DYING) &&
                        (entry._type == Monitor::CONNECTION))
        {        {
           _entries2[index]._status = monitor_2_entry::EMPTY;            MessageQueue *q = MessageQueue::lookup(entry.queueId);
           _entries2[index].socket = -1;            PEGASUS_ASSERT(q != 0);
           break;            HTTPConnection &h = *static_cast<HTTPConnection *>(q);
   
                       if (h._connectionClosePending == false)
                           continue;
   
                       // NOTE: do not attempt to delete while there are pending responses
                       // coming thru. The last response to come thru after a
                       // _connectionClosePending will reset _responsePending to false
                       // and then cause the monitor to rerun this code and clean up.
                       // (see HTTPConnection.cpp)
   
                       if (h._responsePending == true)
                       {
                           Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "Monitor::run - "
                                                       "Ignoring connection delete request because "
                                                       "responses are still pending. "
                                                       "connection=0x%p, socket=%d\n",
                                                       (void *)&h, h.getSocket());
                           continue;
                       }
                       h._connectionClosePending = false;
             MessageQueue &o = h.get_owner();
             Message* message= new CloseConnectionMessage(entry.socket);
             message->dest = o.getQueueId();
   
             // HTTPAcceptor is responsible for closing the connection.
             // The lock is released to allow HTTPAcceptor to call
             // unsolicitSocketMessages to free the entry.
             // Once HTTPAcceptor completes processing of the close
             // connection, the lock is re-requested and processing of
             // the for loop continues.  This is safe with the current
             // implementation of the entries object.  Note that the
             // loop condition accesses the entries.size() on each
             // iteration, so that a change in size while the mutex is
             // unlocked will not result in an ArrayIndexOutOfBounds
             // exception.
   
             _entry_mut.unlock();
             o.enqueue(message);
             _entry_mut.lock();
             // After enqueue a message and the autoEntryMutex has been released and locked again,
             // the array of _entries_socket can be changed. The ArrayIterator has be reset with the original _entries_socket.
             entries.reset(_entries_socket);
        }        }
     }     }
     _entry2_mut.unlock();  
     PEG_METHOD_EXIT();  
 }  
  
 void* monitor_2::set_session_dispatch(void (*dp)(monitor_2_entry*))      Uint32 _idleEntries = 0;
 {  
   void* old = (void *)_session_dispatch;  
   _session_dispatch = dp;  
   return old;  
 }  
  
 void* monitor_2::set_accept_dispatch(void (*dp)(monitor_2_entry*))      /*
           We will keep track of the maximum socket number and pass this value
           to the kernel as a parameter to SELECT.  This loop seems like a good
           place to calculate the max file descriptor (maximum socket number)
           because we have to traverse the entire array.
       */
       SocketHandle maxSocketCurrentPass = 0;
       for( int indx = 0; indx < (int)entries.size(); indx++)
 { {
   void* old = (void*)_accept_dispatch;         if(maxSocketCurrentPass < entries[indx].socket)
   _accept_dispatch = dp;              maxSocketCurrentPass = entries[indx].socket;
   return old;  
 }  
  
 void* monitor_2::set_idle_dispatch(void (*dp)(void*))         if(entries[indx]._status.get() == _MonitorEntry::IDLE)
 { {
    void* old = (void*)_idle_dispatch;             _idleEntries++;
    _idle_dispatch = dp;             FD_SET(entries[indx].socket, &fdread);
    return old;  
 } }
   
 void* monitor_2::set_idle_parm(void* parm)  
 {  
    void* old = _idle_parm;  
    _idle_parm = parm;  
    return old;  
 } }
  
       /*
           Add 1 then assign maxSocket accordingly. We add 1 to account for
           descriptors starting at 0.
       */
       maxSocketCurrentPass++;
  
       _entry_mut.unlock();
  
 //-----------------------------------------------------------------  
 // Note on deleting the monitor_2_entry nodes:  
 //  Each case: in the switch statement needs to handle the deletion  
 //  of the monitor_2_entry * node differently. A SESSION dispatch  
 //  routine MUST DELETE the entry during its dispatch handling.  
 //  All other dispatch routines MUST NOT delete the entry during the  
 //  dispatch handling, but must allow monitor_2::_dispatch to delete  
 //   the entry.  
 // //
 //  The reason is pretty obscure and it is debatable whether or not      // The first argument to select() is ignored on Windows and it is not
 //  to even bother, but during cimserver shutdown the single monitor_2_entry*      // a socket value.  The original code assumed that the number of sockets
 //  will leak unless the _session_dispatch routine takes care of deleting it.      // and a socket value have the same type.  On Windows they do not.
 // //
 //  The reason is that a shutdown messages completely stops everything and  #ifdef PEGASUS_OS_TYPE_WINDOWS
 //  the _session_dispatch routine never returns. So monitor_2::_dispatch is      int events = select(0, &fdread, NULL, NULL, &tv);
 //  never able to do its own cleanup.  #else
 //      int events = select(maxSocketCurrentPass, &fdread, NULL, NULL, &tv);
 // << Mon Oct 13 09:33:33 2003 mdd >>  #endif
 //-----------------------------------------------------------------      _entry_mut.lock();
       // After enqueue a message and the autoEntryMutex has been released and locked again,
       // the array of _entries_socket can be changed. The ArrayIterator has be reset with the original _entries_socket
       entries.reset(_entries_socket);
  
 void monitor_2::_dispatch(void)      if (events == PEGASUS_SOCKET_ERROR)
 { {
    monitor_2_entry* entry;         Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
             "Monitor::run - errorno = %d has occurred on select.", errno);
          // The EBADF error indicates that one or more or the file
          // descriptions was not valid. This could indicate that
          // the entries structure has been corrupted or that
          // we have a synchronization error.
   
          PEGASUS_ASSERT(errno != EBADF);
       }
       else if (events)
       {
          Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
             "Monitor::run select event received events = %d, monitoring %d idle entries",
              events, _idleEntries);
          for( int indx = 0; indx < (int)entries.size(); indx++)
          {
             // The Monitor should only look at entries in the table that are IDLE (i.e.,
             // owned by the Monitor).
             if((entries[indx]._status.get() == _MonitorEntry::IDLE) &&
                (FD_ISSET(entries[indx].socket, &fdread)))
             {
                MessageQueue *q = MessageQueue::lookup(entries[indx].queueId);
                Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                     "Monitor::run indx = %d, queueId =  %d, q = %p",
                     indx, entries[indx].queueId, q);
                PEGASUS_ASSERT(q !=0);
  
    try    try
    {    {
                   if(entries[indx]._type == Monitor::CONNECTION)
                   {
                      Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                        "entries[indx].type for indx = %d is Monitor::CONNECTION", indx);
                      static_cast<HTTPConnection *>(q)->_entry_index = indx;
   
                      // Do not update the entry just yet. The entry gets updated once
                      // the request has been read.
                      //entries[indx]._status = _MonitorEntry::BUSY;
  
          entry = _ready.remove_first();                     // If allocate_and_awaken failure, retry on next iteration
   /* Removed for PEP 183.
                      if (!MessageQueueService::get_thread_pool()->allocate_and_awaken(
                              (void *)q, _dispatch))
                      {
                         Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2,
                             "Monitor::run: Insufficient resources to process request.");
                         entries[indx]._status = _MonitorEntry::IDLE;
                         return true;
                      }
   */
   // Added for PEP 183
                      HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(q);
                      Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                            "Monitor::_dispatch: entering run() for indx  = %d, queueId = %d, q = %p",
                      dst->_entry_index, dst->_monitor->_entries_socket[dst->_entry_index].queueId, dst);
                      try
                      {
                          dst->run(1);
    }    }
    catch(...)    catch(...)
    {    {
                          Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                          "Monitor::_dispatch: exception received");
    }    }
                      Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                      "Monitor::_dispatch: exited run() for index %d", dst->_entry_index);
  
   while(entry != 0 ) {                     // It is possible the entry status may not be set to busy.
     switch(entry->get_type()) {                     // The following will fail in that case.
     case INTERNAL:                // PEGASUS_ASSERT(dst->_monitor->_entries_socket[dst->_entry_index]._status.get() == _MonitorEntry::BUSY);
       static char buffer[2];             // Once the HTTPConnection thread has set the status value to either
       entry->get_sock().disableBlocking();             // Monitor::DYING or Monitor::IDLE, it has returned control of the connection
       entry->get_sock().read(&buffer, 2);             // to the Monitor.  It is no longer permissible to access the connection
       entry->get_sock().enableBlocking();             // or the entry in the _entries_socket table.
       delete entry;  
  
       break;                     // The following is not relevant as the worker thread or the
     case LISTEN:                     // reader thread will update the status of the entry.
       {             //if (dst->_connectionClosePending)
         static struct sockaddr peer;             //{
         static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);             //  dst->_monitor->_entries_socket[dst->_entry_index]._status = _MonitorEntry::DYING;
         entry->get_sock().disableBlocking();             //}
         pegasus_socket connected = entry->get_sock().accept(&peer, &peer_size);             //else
 #ifdef PEGASUS_OS_TYPE_WINDOWS             //{
     if((Sint32)connected  == SOCKET_ERROR)             //  dst->_monitor->_entries_socket[dst->_entry_index]._status = _MonitorEntry::IDLE;
 #else             //}
         if((Sint32)connected == -1 )  // end Added for PEP 183
 #endif          }
         {              else if( entries[indx]._type == Monitor::INTERNAL){
            delete entry;              // set ourself to BUSY,
            break;                          // read the data
         }                          // and set ourself back to IDLE
  
         entry->get_sock().enableBlocking();                 entries[indx]._status = _MonitorEntry::BUSY;
         monitor_2_entry *temp = add_entry(connected, SESSION, entry->get_accept(), entry->get_dispatch());              static char buffer[2];
         if(temp && _accept_dispatch != 0)              Sint32 amt = Socket::read(entries[indx].socket,&buffer, 2);
            _accept_dispatch(temp);  
         delete entry;  
  
       }              if(amt == PEGASUS_SOCKET_ERROR &&
       break;                 getSocketError() == PEGASUS_NETWORK_TCPIP_STOPPED )
     case SESSION:  
        if(_session_dispatch != 0 )  
        {        {
           // NOTE: _session_dispatch will delete entry - do not do it here                  Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
           _session_dispatch(entry);                        "Monitor::run: Tickler socket got an IO error. "
        }                        "Going to re-create Socket and wait for TCP/IP restart.");
                   uninitializeTickler();
                   initializeTickler();
  
       else {              } else
         static char buffer[4096];              {
         int bytes = entry->get_sock().read(&buffer, 4096);                  entries[indx]._status = _MonitorEntry::IDLE;
         delete entry;  
       }       }
  
       break;  
     case UNTYPED:  
     default:  
            delete entry;  
       break;  
     }     }
     _requestCount--;          else
   
     if(_ready.count() == 0 )  
        break;  
   
     try  
     {     {
        entry = _ready.remove_first();                     Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                        "Non-connection entry, indx = %d, has been received.", indx);
              int events = 0;
              events |= SocketMessage::READ;
              Message *msg = new SocketMessage(entries[indx].socket, events);
              entries[indx]._status = _MonitorEntry::BUSY;
                      _entry_mut.unlock();
              q->enqueue(msg);
                      _entry_mut.lock();
              // After enqueue a message and the autoEntryMutex has been released and locked again,
              // the array of entries can be changed. The ArrayIterator has be reset with the original _entries_socket
              entries.reset(_entries_socket);
              entries[indx]._status = _MonitorEntry::IDLE;
           }
     }     }
     catch(...)     catch(...)
     {     {
     }     }
   
   }   }
 } }
       }
 void monitor_2::stop(void)  
 {  
   _die = 1;  
   tickle();  
   // shut down the listener list, free the list nodes  
   _tickler.get_sock().close();  
   _listeners.shutdown_queue();  
 } }
  
 void monitor_2::tickle(void)  void Monitor::stopListeningForConnections(Boolean wait)
 {  
   static char _buffer[] =  
     {     {
       '0','0'      PEG_METHOD_ENTER(TRC_HTTP, "Monitor::stopListeningForConnections()");
     };      // set boolean then tickle the server to recognize _stopConnections
       #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
           !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
       _stopConnections = 2;
       #else
       _stopConnections = 1;
       #endif
  
   _tickler.get_sock().disableBlocking();      tickle();
  
   _tickler.get_sock().write(&_buffer, 2);      if (wait)
   _tickler.get_sock().enableBlocking();      {
         // Wait for the monitor to notice _stopConnections.  Otherwise the
         // caller of this function may unbind the ports while the monitor
         // is still accepting connections on them.
         _stopConnectionsSem.wait();
       }
  
       PEG_METHOD_EXIT();
 } }
  
  
 monitor_2_entry*  monitor_2::add_entry(pegasus_socket& ps,  
                                        monitor_2_entry_type type,  
                                        void* accept_parm,  
                                        void* dispatch_parm)  
 {  
   monitor_2_entry* m2e = new monitor_2_entry(ps, type, accept_parm, dispatch_parm);  
  
   try{  int  Monitor::solicitSocketMessages(
     _listeners.insert_first(m2e);      SocketHandle socket,
   }      Uint32 events,
   catch(...){      Uint32 queueId,
     delete m2e;      int type)
     return 0;  {
      PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");
      AutoMutex autoMut(_entry_mut);
      // Check to see if we need to dynamically grow the _entries_socket array
      // We always want the _entries_socket array to 2 bigger than the
      // current connections requested
      _solicitSocketCount++;  // bump the count
      int size = (int)_entries_socket.size();
      if((int)_solicitSocketCount >= (size-1)){
           for(int i = 0; i < ((int)_solicitSocketCount - (size-1)); i++){
                   _MonitorEntry entry(0, 0, 0);
                   _entries_socket.append(entry);
   }   }
   tickle();  
   return m2e;  
 } }
  
 Boolean monitor_2::remove_entry(Sint32 s)     int index;
      for(index = 1; index < (int)_entries_socket.size(); index++)
 { {
   monitor_2_entry* temp;        try
   try {        {
     _listeners.try_lock(pegasus_thread_self());           if(_entries_socket[index]._status.get() == _MonitorEntry::EMPTY)
     temp = _listeners.next(0);           {
     while(temp != 0){              _entries_socket[index].socket = socket;
       if(s == (Sint32)temp->_rep->psock ){              _entries_socket[index].queueId  = queueId;
         temp = _listeners.remove_no_lock(temp);              _entries_socket[index]._type = type;
         delete temp;              _entries_socket[index]._status = _MonitorEntry::IDLE;
         _listeners.unlock();  
         return true;              return index;
       }       }
       temp = _listeners.next(temp);  
     }     }
     _listeners.unlock();        catch(...)
         {
   }   }
   catch(...){  
   }   }
   return false;     _solicitSocketCount--;  // decrease the count, if we are here we didnt do anything meaningful
      PEG_METHOD_EXIT();
      return -1;
   
 } }
  
 Uint32 monitor_2::getOutstandingRequestCount(void)  void Monitor::unsolicitSocketMessages(SocketHandle socket)
 { {
   return _requestCount.value();  
  
       PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitSocketMessages");
       AutoMutex autoMut(_entry_mut);
   
       /*
           Start at index = 1 because _entries_socket[0] is the tickle entry which never needs
           to be EMPTY;
       */
       unsigned int index;
       for(index = 1; index < _entries_socket.size(); index++)
       {
          if(_entries_socket[index].socket == socket)
          {
             _entries_socket[index]._status = _MonitorEntry::EMPTY;
             _entries_socket[index].socket = PEGASUS_INVALID_SOCKET;
             _solicitSocketCount--;
             break;
          }
 } }
  
       /*
       Dynamic Contraction:
       To remove excess entries we will start from the end of the _entries_socket array
       and remove all entries with EMPTY status until we find the first NON EMPTY.
       This prevents the positions, of the NON EMPTY entries, from being changed.
       */
       index = _entries_socket.size() - 1;
       while(_entries_socket[index]._status.get() == _MonitorEntry::EMPTY){
       if(_entries_socket.size() > MAX_NUMBER_OF_MONITOR_ENTRIES)
                   _entries_socket.remove(index);
       index--;
       }
       PEG_METHOD_EXIT();
   }
  
 HTTPConnection2* monitor_2::remove_connection(Sint32 sock)  // Note: this is no longer called with PEP 183.
   ThreadReturnType PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)
 { {
      HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(parm);
    HTTPConnection2* temp;  // Added for NamedPipe implementation for windows
   #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
      Array<_MonitorEntry>& entry = (dst->_namedPipeConnection)? dst->_monitor->_entries_pipe:dst->_monitor->_entries_socket;
   #else
      Array<_MonitorEntry>& entry = dst->_entries_socket;
   #endif
      Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
          "Monitor::_dispatch: entering run() for indx  = %d, queueId = %d, q = %p",
          dst->_entry_index, entry[dst->_entry_index].queueId, dst);
    try    try
    {    {
       monitor_2::_connections.lock(pegasus_thread_self());        dst->run(1);
       temp = monitor_2::_connections.next(0);     }
       while(temp != 0 )     catch (...)
       {       {
          if(sock == temp->getSocket())        Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
             "Monitor::_dispatch: exception received");
      }
      Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
             "Monitor::_dispatch: exited run() for index %d", dst->_entry_index);
   
      PEGASUS_ASSERT(entry[dst->_entry_index]._status.get() == _MonitorEntry::BUSY);
   
      // Once the HTTPConnection thread has set the status value to either
      // Monitor::DYING or Monitor::IDLE, it has returned control of the connection
      // to the Monitor.  It is no longer permissible to access the connection
      // or the entry in the _entries table.
      if (dst->_connectionClosePending)
          {          {
             temp = monitor_2::_connections.remove_no_lock(temp);        entry[dst->_entry_index]._status = _MonitorEntry::DYING;
             monitor_2::_connections.unlock();  
             return temp;  
          }          }
          temp = monitor_2::_connections.next(temp);     else
      {
         entry[dst->_entry_index]._status = _MonitorEntry::IDLE;
       }       }
       monitor_2::_connections.unlock();     return 0;
    }    }
    catch(...)  // Added for NamedPipe implementation for windows
   #if defined (PEGASUS_OS_TYPE_WINDOWS) &&\
       !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
   //This method is anlogus to solicitSocketMessages. It does the same thing for named Pipes
   int  Monitor::solicitPipeMessages(
       NamedPipe namedPipe,
       Uint32 events,  //not sure what has to change for this enum
       Uint32 queueId,
       int type)
    {    {
      PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitPipeMessages");
      AutoMutex autoMut(_entry_pipe_mut);
      // Check to see if we need to dynamically grow the _entries array
      // We always want the _entries array to 2 bigger than the
      // current connections requested
   
      _solicitPipeCount++;  // bump the count
      int size = (int)_entries_pipe.size();
      if((int)_solicitPipeCount >= (size-1)){
           for(int i = 0; i < ((int)_solicitPipeCount - (size-1)); i++){
                   _MonitorEntry entry(0, 0, 0);
                   _entries_pipe.append(entry);
    }    }
    return 0;  
 } }
  
 Boolean monitor_2::insert_connection(HTTPConnection2* connection)     int index;
      for(index = 1; index < (int)_entries_pipe.size(); index++)
 { {
    try    try
    {    {
       monitor_2::_connections.insert_first(connection);           if(_entries_pipe[index]._status.get() == _MonitorEntry::EMPTY)
            {
               _entries_pipe[index].socket = NULL;
               _entries_pipe[index].namedPipe = namedPipe;
               _entries_pipe[index].namedPipeConnection = true;
               _entries_pipe[index].queueId  = queueId;
               _entries_pipe[index]._type = type;
               _entries_pipe[index]._status = _MonitorEntry::IDLE;
               return index;
            }
    }    }
    catch(...)    catch(...)
    {    {
       return false;  
    }    }
    return true;  
      }
      _solicitPipeCount--;  // decrease the count, if we are here we didnt do anything meaningful
      PEGASUS_STD(cout) << "In Monitor::solicitPipeMessages nothing happed - it didn't work" << PEGASUS_STD(endl);
   
      PEG_METHOD_EXIT();
      return -1;
   
 } }
  
   //////////////////////////////////////////////////////////////////////////////
   // Method Name      : unsolicitPipeMessages
   // Input Parameter  : namedPipe  - type NamedPipe
   // Return Type      : void
   //============================================================================
   // This method is invoked from HTTPAcceptor::handleEnqueue for server
   // when the CLOSE_CONNECTION_MESSAGE is recieved. This method is also invoked
   // from HTTPAcceptor::destroyConnections method when the CIMServer is shutdown.
   // For the CIMClient, this is invoked from HTTPConnector::handleEnqueue when the
   // CLOSE_CONNECTION_MESSAGE is recieved. This method is also invoked from
   // HTTPConnector::disconnect when CIMClient requests a disconnect request.
   // The list of _MonitorEntry is searched for the matching pipe.
   // The Handle of the identified is closed and _MonitorEntry for the
   // requested pipe is removed.
   ///////////////////////////////////////////////////////////////////////////////
   
   void Monitor::unsolicitPipeMessages(NamedPipe namedPipe)
   {
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Entering: Monitor::unsolicitPipeMessages():"
                             <<"(tid:" << Uint32(pegasus_thread_self()) << ")"
                             << PEGASUS_STD(endl);
       }
   #endif
   
       PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitPipeMessages");
       AutoMutex autoMut(_entry_pipe_mut);
   
       /*
           Start at index = 1 because _entries[0] is the tickle entry which never needs
           to be EMPTY;
       */
       unsigned int index;
       for (index = 1; index < _entries_pipe.size(); index++)
       {
           if (_entries_pipe[index].namedPipe.getPipe() == namedPipe.getPipe())
           {
               _entries_pipe[index]._status = _MonitorEntry::EMPTY;
               // Ensure that the client has read the data
               ::FlushFileBuffers (namedPipe.getPipe());
               //Disconnect to release the pipe. This doesn't release Pipe Handle
               ::DisconnectNamedPipe (_entries_pipe[index].namedPipe.getPipe());
               // Must use CloseHandle to Close Pipe
               ::CloseHandle(_entries_pipe[index].namedPipe.getPipe());
               _entries_pipe[index].namedPipe.disconnect();
               _solicitPipeCount--;
               break;
           }
       }
   
       /*
           Dynamic Contraction:
           To remove excess entries we will start from the end of the _entries array
           and remove all entries with EMPTY status until we find the first NON EMPTY.
           This prevents the positions, of the NON EMPTY entries, from being changed.
       */
       index = _entries_pipe.size() - 1;
       while (_entries_pipe[index]._status.get() == _MonitorEntry::EMPTY
           && index > 0)
       {
           if ((_entries_pipe[index].namedPipe.getPipe() == namedPipe.getPipe()) ||
               (_entries_pipe.size() > MAX_NUMBER_OF_MONITOR_ENTRIES))
           {
               _entries_pipe.remove(index);
           }
           index--;
       }
       PEG_METHOD_EXIT();
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Exiting:  Monitor::unsolicitPipeMessages():"
                             <<(tid:" << Uint32(pegasus_thread_self()) << ")"
                             << PEGASUS_STD(endl);
       }
   #endif
   }
   
   #endif
   
   
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END


Legend:
Removed from v.1.70  
changed lines
  Added in v.1.115.14.3

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2