(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.50 and 1.103.10.27

version 1.50, 2003/09/28 03:27:45 version 1.103.10.27, 2006/10/18 04:24:42
Line 1 
Line 1 
 //%/////////////////////////////////////////////////////////////////////////////  //%2006////////////////////////////////////////////////////////////////////////
 // //
 // Copyright (c) 2000, 2001, 2002 BMC Software, Hewlett-Packard Company, IBM,  // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
 // 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.;
   // 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 21 
Line 29 
 // //
 //============================================================================== //==============================================================================
 // //
 // Author: Mike Brasher (mbrasher@bmc.com)  
 //  
 // Modified By: Mike Day (monitor_2) mdday@us.ibm.com  
 // //
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
 #include <Pegasus/Common/Config.h> #include <Pegasus/Common/Config.h>
  
 #include <cstring> #include <cstring>
 #include "Monitor.h"  #include <Pegasus/Common/Monitor.h>
 #include "MessageQueue.h"  #include <Pegasus/Common/MessageQueue.h>
 #include "Socket.h"  #include <Pegasus/Common/Socket.h>
 #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/Exception.h>
   #include <Pegasus/Common/ArrayIterator.h>
   
   //const static DWORD MAX_BUFFER_SIZE = 4096;  // 4 kilobytes
   
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
   // Maximum iterations of Pipe processing in Monitor::run
   const Uint32 maxIterations = 3;
   
   #endif
  
 #ifdef PEGASUS_OS_TYPE_WINDOWS #ifdef PEGASUS_OS_TYPE_WINDOWS
 # if defined(FD_SETSIZE) && FD_SETSIZE != 1024 # if defined(FD_SETSIZE) && FD_SETSIZE != 1024
 #  error "FD_SETSIZE was not set to 1024 prior to the last inclusion \ #  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 \ 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 \  <windows.h>). Find inclusion of that header which is visible to this \
 compilation unit and #define FD_SETZIE to 1024 prior to that inclusion; \ 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 \ 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." CIMOM. PLEASE DO NOT SUPPRESS THIS WARNING; PLEASE FIX THE PROBLEM."
Line 61 
Line 77 
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
   static AtomicInt _connections(0);
  
 static AtomicInt _connections = 0;  Mutex Monitor::_cout_mut;
  
  
 static struct timeval create_time = {0, 1};  // Added for NamedPipe implementation for windows
 static struct timeval destroy_time = {300, 0};  #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
 static struct timeval deadlock_time = {0, 0};   #define PIPE_INCREMENT 1
   #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;  
 };  
  
 //////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
 // //
Line 91 
Line 93 
 // //
 //////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
  
   #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),
        _tickle_client_socket(-1),
        _tickle_server_socket(-1),
        _tickle_peer_socket(-1)
 { {
     Socket::initializeInterface();  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
     _rep = 0;  
     _entries.reserveCapacity(32);  
     for( int i = 0; i < 32; i++ )  
     {     {
        _MonitorEntry entry(0, 0, 0);          AutoMutex automut(Monitor::_cout_mut);
        _entries.append(entry);          PEGASUS_STD(cout) << "Entering: Monitor::Monitor(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
     }  
 } }
   #endif
 Monitor::Monitor(Boolean async)      int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;
    : _module_handle(0), _controller(0), _async(async), _stopConnections(0)  
 {  
     Socket::initializeInterface();     Socket::initializeInterface();
     _rep = 0;      _entries.reserveCapacity(numberOfMonitorEntriesToAllocate);
     _entries.reserveCapacity(32);  
     for( int i = 0; i < 32; i++ )      // 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.append(entry);
     }     }
     if( _async == true )  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
     {     {
        _thread_pool = new ThreadPool(0,          AutoMutex automut(Monitor::_cout_mut);
                                      "Monitor",          PEGASUS_STD(cout) << "Exiting:  Monitor::Monitor(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
                                      0,  
                                      0,  
                                      create_time,  
                                      destroy_time,  
                                      deadlock_time);  
     }     }
     else  #endif
        _thread_pool = 0;  
 } }
  
 Monitor::~Monitor() Monitor::~Monitor()
 { {
     Tracer::trace(TRC_HTTP, Tracer::LEVEL4,  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
                   "deregistering with module controller");      {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Entering: Monitor::~Monitor(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
       }
   #endif
       Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "uninitializing interface");
  
     if(_module_handle != NULL)      try{
           if(_tickle_peer_socket >= 0)
     {     {
        _controller->deregister_module(PEGASUS_MODULENAME_MONITOR);              Socket::close(_tickle_peer_socket);
        _controller = 0;          }
        delete _module_handle;          if(_tickle_client_socket >= 0)
           {
               Socket::close(_tickle_client_socket);
           }
           if(_tickle_server_socket >= 0)
           {
               Socket::close(_tickle_server_socket);
           }
       }
       catch(...)
       {
           Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                     "Failed to close tickle sockets");
     }     }
     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");
     if(_async == true)  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
        delete _thread_pool;      {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Exiting:  Monitor::~Monitor(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
       }
   #endif
   }
   
   void Monitor::initializeTickler(){
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Entering: Monitor::initializeTickler(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
       }
   #endif
       /*
          NOTE: On any errors trying to
                setup out tickle connection,
                throw an exception/end the server
       */
   
       /* setup the tickle server/listener */
   
       // get a socket for the server side
       if((_tickle_server_socket = ::socket(PF_INET, SOCK_STREAM, 0)) == PEGASUS_INVALID_SOCKET){
           //handle error
           MessageLoaderParms parms("Common.Monitor.TICKLE_CREATE",
                                    "Received error number $0 while creating the internal socket.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
       }
   
       // initialize the address
       memset(&_tickle_server_addr, 0, sizeof(_tickle_server_addr));
   #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM
   #pragma convert(37)
   #endif
       _tickle_server_addr.sin_addr.s_addr = inet_addr("127.0.0.1");
   #ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM
   #pragma convert(0)
   #endif
       _tickle_server_addr.sin_family = PF_INET;
       _tickle_server_addr.sin_port = 0;
   
       PEGASUS_SOCKLEN_T _addr_size = sizeof(_tickle_server_addr);
   
       // bind server side to socket
       if((::bind(_tickle_server_socket,
                  reinterpret_cast<struct sockaddr*>(&_tickle_server_addr),
                  sizeof(_tickle_server_addr))) < 0){
           // handle error
   #ifdef PEGASUS_OS_ZOS
       MessageLoaderParms parms("Common.Monitor.TICKLE_BIND_LONG",
                                    "Received error:$0 while binding the internal socket.",strerror(errno));
   #else
           MessageLoaderParms parms("Common.Monitor.TICKLE_BIND",
                                    "Received error number $0 while binding the internal socket.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
   #endif
           throw Exception(parms);
       }
   
       // tell the kernel we are a server
       if((::listen(_tickle_server_socket,3)) < 0){
           // handle error
           MessageLoaderParms parms("Common.Monitor.TICKLE_LISTEN",
                            "Received error number $0 while listening to the internal socket.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
       }
   
       // 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){
           // handle error
           MessageLoaderParms parms("Common.Monitor.TICKLE_SOCKNAME",
                            "Received error number $0 while getting the internal socket name.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
 } }
  
       /* set up the tickle client/connector */
   
       // get a socket for our tickle client
       if((_tickle_client_socket = ::socket(PF_INET, SOCK_STREAM, 0)) == PEGASUS_INVALID_SOCKET){
           // handle error
           MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_CREATE",
                            "Received error number $0 while creating the internal client socket.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
       }
  
 int Monitor::kill_idle_threads()      // setup the address of the client
       memset(&_tickle_client_addr, 0, sizeof(_tickle_client_addr));
   #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;
   
       // bind socket to client side
       if((::bind(_tickle_client_socket,
                  reinterpret_cast<struct sockaddr*>(&_tickle_client_addr),
                  sizeof(_tickle_client_addr))) < 0){
           // handle error
           MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_BIND",
                            "Received error number $0 while binding the internal client socket.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
       }
   
       // 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.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
       }
   
       /* set up the slave connection */
       memset(&_tickle_peer_addr, 0, sizeof(_tickle_peer_addr));
       PEGASUS_SOCKLEN_T peer_size = sizeof(_tickle_peer_addr);
       pegasus_sleep(1);
   
       // 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){
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
           // Only retry on non-windows platforms.
           if(_tickle_peer_socket == -1 && errno == EAGAIN)
           {
             int retries = 0;
             do
             {
               pegasus_sleep(1);
               _tickle_peer_socket = ::accept(_tickle_server_socket,
                   reinterpret_cast<struct sockaddr*>(&_tickle_peer_addr),
                   &peer_size);
               retries++;
             } while(_tickle_peer_socket == -1 && errno == EAGAIN && retries < 20);
           }
   #endif
       }
       if(_tickle_peer_socket == -1){
           // handle error
           MessageLoaderParms parms("Common.Monitor.TICKLE_ACCEPT",
                            "Received error number $0 while accepting the internal socket connection.",
   #if !defined(PEGASUS_OS_TYPE_WINDOWS)
                                    errno);
   #else
                                    WSAGetLastError());
   #endif
           throw Exception(parms);
       }
       // 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);
           Tracer::trace(TRC_HTTP,Tracer::LEVEL2,"!!!!!!!! TICKLE SOCKET-ID = %u",_tickle_peer_socket);
       entry._status = _MonitorEntry::IDLE;
       _entries.append(entry);
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
 { {
    static struct timeval now, last;          AutoMutex automut(Monitor::_cout_mut);
    gettimeofday(&now, NULL);          PEGASUS_STD(cout) << "Exiting:  Monitor::initializeTickler(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
    int dead_threads = 0;      }
   #endif
   }
  
    if( now.tv_sec - last.tv_sec > 120 )  void Monitor::tickle(void)
    {    {
       gettimeofday(&last, NULL);  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       try  
       {       {
          dead_threads =  _thread_pool->kill_dead_threads();          AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Entering: Monitor::tickle(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
       }       }
       catch(IPCException& )  #endif
       static char _buffer[] =
       {       {
       }        '0','0'
       };
                  Tracer::trace (TRC_HTTP, Tracer::LEVEL2,
                                      "Now Monitor::Tickle ");
       AutoMutex autoMutex(_tickle_mutex);
       Socket::disableBlocking(_tickle_client_socket);
                          Tracer::trace (TRC_HTTP, Tracer::LEVEL2,
                                              "Now Monitor::Tickle::Write() ");
   
       Socket::write(_tickle_client_socket,&_buffer, 2);
       Socket::enableBlocking(_tickle_client_socket);
                          Tracer::trace (TRC_HTTP, Tracer::LEVEL2,
                                      "Now Monitor::Tickled ");
  
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Exiting:  Monitor::tickle(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
    }    }
    return dead_threads;  #endif
 } }
  
   void Monitor::setState( Uint32 index, _MonitorEntry::entry_status status )
   {
       // Set the state to requested state
       _entries[index]._status = status;
   }
  
 Boolean Monitor::run(Uint32 milliseconds) Boolean Monitor::run(Uint32 milliseconds)
 { {
  
     Boolean handled_events = false;     Boolean handled_events = false;
      int i = 0;      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_set fdread;
     FD_ZERO(&fdread);     FD_ZERO(&fdread);
     _entry_mut.lock(pegasus_thread_self());  
       AutoMutex autoEntryMutex(_entry_mut);
   
       ArrayIterator<_MonitorEntry> entries(_entries);
  
     // Check the stopConnections flag.  If set, clear the Acceptor monitor entries     // Check the stopConnections flag.  If set, clear the Acceptor monitor entries
     if (_stopConnections == 1)      if (_stopConnections.get() == 1)
     {     {
         for ( int indx = 0; indx < (int)_entries.size(); indx++)          for ( int indx = 0; indx < (int)entries.size(); indx++)
         {         {
             if (_entries[indx]._type == Monitor::ACCEPTOR)              if (entries[indx]._type == Monitor::ACCEPTOR)
             {             {
                 if ( _entries[indx]._status.value() != _MonitorEntry::EMPTY)                  if ( entries[indx]._status.get() != _MonitorEntry::EMPTY)
                 {                 {
                    if ( _entries[indx]._status.value() == _MonitorEntry::IDLE ||                                          if ( entries[indx]._status.get() == _MonitorEntry::IDLE ||
                         _entries[indx]._status.value() == _MonitorEntry::DYING )                          entries[indx]._status.get() == _MonitorEntry::DYING )
                    {                    {
                        // remove the entry                        // remove the entry
                        _entries[indx]._status = _MonitorEntry::EMPTY;                         entries[indx]._status = _MonitorEntry::EMPTY;
                    }                    }
                    else                    else
                    {                    {
                        // set status to DYING                        // set status to DYING
                       _entries[indx]._status.value() == _MonitorEntry::DYING;                        entries[indx]._status = _MonitorEntry::DYING;
                    }                    }
                }                }
            }            }
         }         }
         _stopConnections = 0;         _stopConnections = 0;
           _stopConnectionsSem.signal();
     }     }
  
     for( int indx = 0; indx < (int)_entries.size(); indx++)      for( int indx = 0; indx < (int)entries.size(); indx++)
     {     {
        if(_entries[indx]._status.value() == _MonitorEntry::IDLE)          const _MonitorEntry &entry = entries[indx];
           if ((entry._status.get() == _MonitorEntry::DYING) &&
              (entry._type == Monitor::CONNECTION))
        {        {
           FD_SET(_entries[indx].socket, &fdread);  
        }  
     }  
  
     int events = select(FD_SETSIZE, &fdread, NULL, NULL, &tv);              MessageQueue *q = MessageQueue::lookup(entry.queueId);
               PEGASUS_ASSERT(q != 0);
               HTTPConnection &h = *static_cast<HTTPConnection *>(q);
  
 #ifdef PEGASUS_OS_TYPE_WINDOWS              if (h._connectionClosePending == false)
     if(events == SOCKET_ERROR)  
 #else  
     if(events == -1)  
 #endif  
     {     {
        Tracer::trace(TRC_HTTP, Tracer::LEVEL4,                              continue;
           "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)  
     {  
        for( int indx = 0; indx < (int)_entries.size(); indx++)              // NOTE: do not attempt to delete while there are pending responses
        {              // coming thru. The last response to come thru after a
           if(FD_ISSET(_entries[indx].socket, &fdread))              // _connectionClosePending will reset _responsePending to false
           {              // and then cause the monitor to rerun this code and clean up.
              MessageQueue *q = MessageQueue::lookup(_entries[indx].queueId);              // (see HTTPConnection.cpp)
              if(q == 0)  
              {              if (h._responsePending == true)
                 try              {
   // Added for NamedPipe implementation for windows
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
                   if  (!entry.namedPipeConnection)
                 {                 {
                    _entries[indx]._status = _MonitorEntry::EMPTY;  #endif
                       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());
   
   // Added for NamedPipe implementation for windows
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
                 }                 }
                 catch(...)                  else
                 {                 {
                       Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "Monitor::run - "
                           "Ignoring connection delete request because "
                           "responses are still pending. "
                           "connection=0x%p, NamedPipe=%d\n",
                           (void *)&h, h.getNamedPipe().getPipe());
                 }                 }
   #endif
                 continue;                 continue;
              }              }
              try              h._connectionClosePending = false;
               MessageQueue &o = h.get_owner();
                       Message* message = 0;
   
   // Added for NamedPipe implementation for windows
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
               if (!entry.namedPipeConnection)
              {              {
                 if(_entries[indx]._type == Monitor::CONNECTION)  #endif
                 {                  message= new CloseConnectionMessage(entry.socket);
                    static_cast<HTTPConnection *>(q)->_entry_index = indx;  
                    if(static_cast<HTTPConnection *>(q)->_dying.value() > 0 )  // Added for NamedPipe implementation for windows
                    {  #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
                       _entries[indx]._status = _MonitorEntry::DYING;  
                       MessageQueue & o = static_cast<HTTPConnection *>(q)->get_owner();  
                       Message* message= new CloseConnectionMessage(_entries[indx].socket);  
                       message->dest = o.getQueueId();  
                       _entry_mut.unlock();  
                       o.enqueue(message);  
                       return true;  
                    }  
                    _entries[indx]._status = _MonitorEntry::BUSY;  
                    _thread_pool->allocate_and_awaken((void *)q, _dispatch);  
                 }                 }
                 else                 else
                 {                 {
                    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);                              message= new CloseConnectionMessage(entry.namedPipe);
                    _entries[indx]._status = _MonitorEntry::IDLE;  
                    return true;  
                 }  
              }  
              catch(...)  
              {  
              }  
              handled_events = true;  
           }  
        }  
     }  
     _entry_mut.unlock();  
     return(handled_events);  
 }  
  
 void Monitor::stopListeningForConnections()              }
 {  #endif
     PEG_METHOD_ENTER(TRC_HTTP, "Monitor::stopListeningForConnections()");              message->dest = o.getQueueId();
  
     _stopConnections = 1;              // 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.
  
     PEG_METHOD_EXIT();              autoEntryMutex.unlock();
               o.enqueue(message);
               autoEntryMutex.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.
   
               entries.reset(_entries);
           }
 } }
  
       Uint32 _idleEntries = 0;
   
       /*
           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.
       */
   
       PEGASUS_SOCKET maxSocketCurrentPass = 0;
       int indx;
   
           // Record the indexes at which Sockets are available
           Array <Uint32> socketCountAssociator;
       int socketEntryCount=0;
   
        // Added for NamedPipe implementation for windows
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
       //This array associates named pipe connections to their place in [indx]
       //in the entries array. The value in portion zero of the array is the
       //index of the fist named pipe connection in the entries array
   
           // Record the indexes at which Pipes are available
           Array <Uint32> indexPipeCountAssociator;
       int pipeEntryCount=0;
       int MaxPipes = PIPE_INCREMENT;
       // List of Pipe Handlers
       HANDLE * hPipeList = new HANDLE[PIPE_INCREMENT];
   #endif
  
 int  Monitor::solicitSocketMessages(      // This loop takes care of setting the namedpipe which has to be used from the list....
     Sint32 socket,      for ( indx = 0,socketEntryCount=0 ;
     Uint32 events,                               indx < (int)entries.size(); indx++)
     Uint32 queueId,  
     int type)  
 { {
  
    PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");  // Added for NamedPipe implementation for windows
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
    _entry_mut.lock(pegasus_thread_self());                  if (!entries[indx].namedPipeConnection)
   
    for(int index = 0; index < (int)_entries.size(); index++)  
    {  
       try  
       {       {
          if(_entries[index]._status.value() == _MonitorEntry::EMPTY)  #endif
               if (maxSocketCurrentPass < entries[indx].socket)
          {          {
             _entries[index].socket = socket;                                  maxSocketCurrentPass = entries[indx].socket;
             _entries[index].queueId  = queueId;  
             _entries[index]._type = type;  
             _entries[index]._status = _MonitorEntry::IDLE;  
             _entry_mut.unlock();  
   
             return index;  
          }  
       }       }
       catch(...)              if(entries[indx]._status.get() == _MonitorEntry::IDLE)
       {       {
                   _idleEntries++;
                   FD_SET(entries[indx].socket, &fdread);
                   socketCountAssociator.append(indx);
                                   socketEntryCount++;
       }       }
  
   // Added for NamedPipe implementation for windows
   #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
    }    }
    _entry_mut.unlock();                  else
    PEG_METHOD_EXIT();  
    return -1;  
 }  
   
 void Monitor::unsolicitSocketMessages(Sint32 socket)  
 { {
                       entries[indx].pipeSet = false;
     PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitSocketMessages");                          if (pipeEntryCount >= MaxPipes)
     _entry_mut.lock(pegasus_thread_self());  
   
     for(int index = 0; index < (int)_entries.size(); index++)  
     {     {
        if(_entries[index].socket == socket)                              MaxPipes += PIPE_INCREMENT;
                                   HANDLE* temp_pList = new HANDLE[MaxPipes];
                                   for (Uint32 i =0;i<pipeEntryCount;i++)
        {        {
           _entries[index]._status = _MonitorEntry::EMPTY;                                      temp_pList[i] = hPipeList[i];
           break;  
        }        }
                                   delete [] hPipeList;
                                   hPipeList = temp_pList;
     }     }
     _entry_mut.unlock();                          hPipeList[pipeEntryCount] = entries[indx].namedPipe.getPipe();
     PEG_METHOD_EXIT();                          indexPipeCountAssociator.append(indx);
                           pipeEntryCount++;
 } }
  
 PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)  #endif
 {      }
    HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(parm);  
  
    dst->run(1);      /*
    dst->_monitor->_entry_mut.lock(pegasus_thread_self());          Add 1 then assign maxSocket accordingly. We add 1 to account for
           descriptors starting at 0.
       */
       maxSocketCurrentPass++;
   
       autoEntryMutex.unlock();
   
       int events = -1;
           // Since the pipes have been introduced, the ratio of procesing
           // time Socket:Pipe :: 3/4:1/4 respectively
  
    // It shouldn't be necessary to set status = _MonitorEntry::IDLE          Uint32 newMilliseconds = milliseconds;
    // if the connection is being closed.  However, the current logic          #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
    // in Monitor::run requires this value to be set for the close  
    // to be processed.  
    dst->_monitor->_entries[dst->_entry_index]._status = _MonitorEntry::IDLE;  
    if (dst->_connectionClosePending)  
    {  
       dst->_dying = 1;  
    }  
    dst->_monitor->_entry_mut.unlock();  
    return 0;  
 }  
  
           newMilliseconds = (milliseconds * 3)/4 ;
  
       #endif
  
 ////************************* monitor 2 *****************************////          struct timeval tv = {newMilliseconds/1000, newMilliseconds%1000*1000};
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
 ////************************* monitor 2 *****************************////  
  
  
 m2e_rep::m2e_rep(void)          #ifdef PEGASUS_OS_TYPE_WINDOWS
   :Base(), state(IDLE)                  events = select(0, &fdread, NULL, NULL, &tv);
           #else
                   events = select(maxSocketCurrentPass, &fdread, NULL, NULL, &tv);
           #endif
  
 {      autoEntryMutex.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
       entries.reset(_entries);
  
 m2e_rep::m2e_rep(monitor_2_entry_type _type,  #ifdef PEGASUS_OS_TYPE_WINDOWS
                  pegasus_socket _sock,      if(events == SOCKET_ERROR)
                  void* _accept,  #else
                  void* _dispatch)      if(events == -1)
   : Base(), type(_type), state(IDLE), psock(_sock),  #endif
     accept_parm(_accept), dispatch_parm(_dispatch)  
 { {
            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)
 m2e_rep::~m2e_rep(void)  
 { {
 }           Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
            "Monitor::run select event received events = %d, monitoring %d idle entries",
            events, _idleEntries);
            for ( int sindx = 0; sindx < socketEntryCount; sindx++)
            {
                // The Monitor should only look at entries in the table that are IDLE (i.e.,
                // owned by the Monitor).
                        indx = socketCountAssociator[sindx];
  
 m2e_rep::m2e_rep(const m2e_rep& r)               if ((entries[indx]._status.get() == _MonitorEntry::IDLE) &&
   : Base()                    (FD_ISSET(entries[indx].socket, &fdread)))
 { {
   if(this != &r){                   MessageQueue *q = MessageQueue::lookup(entries[indx].queueId);
     type = r.type;                   Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
     psock = r.psock;                                 "Monitor::run indx = %d, queueId =  %d, q = %p",
     accept_parm = r.accept_parm;                                 indx, entries[indx].queueId, q);
     dispatch_parm = r.dispatch_parm;  
     state = IDLE;  
   
   }  
 }  
  
                    PEGASUS_ASSERT(q !=0);
  
 m2e_rep& m2e_rep::operator =(const m2e_rep& r)                   try
 { {
   if(this != &r) {                       if (entries[indx]._type == Monitor::CONNECTION)
     type = r.type;                       {
     psock = r.psock;                           static_cast<HTTPConnection *>(q)->_entry_index = indx;
     accept_parm = r.accept_parm;  
     dispatch_parm = r.dispatch_parm;                                                   // Do not update the entry just yet. The entry gets updated once
     state = IDLE;                                                   // the request has been read.
   }                                                   //entries[indx]._status = _MonitorEntry::BUSY;
   return *this;  
 }  
  
 Boolean m2e_rep::operator ==(const m2e_rep& r)                                                   // If allocate_and_awaken failure, retry on next iteration
                                                    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[dst->_entry_index].queueId, dst);
                                                    try
 { {
   if(this == &r)                                                       dst->run(1);
     return true;  
   return false;  
 } }
                                                    catch (...)
 Boolean m2e_rep::operator ==(void* r)  
 { {
   if((void*)this == r)                                                       Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
     return true;                                                            "Monitor::_dispatch: exception received");
   return false;  
 } }
                            Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                               "Monitor::_dispatch: exited run() for index %d",
                                                       dst->_entry_index);
  
 m2e_rep::operator pegasus_socket() const                                          }
                                           else if (entries[indx]._type == Monitor::INTERNAL)
 { {
   return psock;                                                  // set ourself to BUSY,
                                                   // read the data
                                               // and set ourself back to IDLE
                                               static char buffer[2];
                                           Socket::disableBlocking(entries[indx].socket);
   
                                           Sint32 amt = Socket::read(entries[indx].socket,&buffer, 2);
                                                   Socket::enableBlocking(entries[indx].socket);
                                                   entries[indx]._status = _MonitorEntry::IDLE;
 } }
                                           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;
                                                   autoEntryMutex.unlock();
                                                   q->enqueue(msg);
                                                   autoEntryMutex.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
                                                   entries.reset(_entries);
                                                   entries[indx]._status = _MonitorEntry::IDLE;
                                                   handled_events = true;
                                                   delete [] hPipeList;
                                                   return handled_events;
  
 monitor_2_entry::monitor_2_entry(void)  
 {  
   _rep = new m2e_rep();  
 } }
   
 monitor_2_entry::monitor_2_entry(pegasus_socket& _psock,  
                                  monitor_2_entry_type _type,  
                                  void* _accept_parm, void* _dispatch_parm)  
 {  
   _rep = new m2e_rep(_type, _psock, _accept_parm, _dispatch_parm);  
 } }
                                   catch(...)
 monitor_2_entry::monitor_2_entry(const monitor_2_entry& e)  
 { {
   if(this != &e){  
     Inc(this->_rep = e._rep);  
   }   }
                                   handled_events = true;
 } }
   
 monitor_2_entry::~monitor_2_entry(void)  
 {  
   Dec(_rep);  
 } }
                   delete [] hPipeList;
                   return handled_events;
       }
   
  
 monitor_2_entry& monitor_2_entry::operator=(const monitor_2_entry& e)  #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
   
           //if no pipes are registered return immediately
   
           int pEvents = -1;
           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.
   
   
           // 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.
   
       Uint32 pipeProcessCount =0;
   
       for (int counter = 1; counter < maxIterations ; counter ++)
 { {
   if(this != &e){  
     Dec(_rep);  
     Inc(this->_rep = e._rep);  
   }  
   return *this;  
 }  
  
 Boolean monitor_2_entry::operator ==(const monitor_2_entry& me) const  
                   // pipeIndex is used to index into indexPipeCountAssociator to fetch
                   // index of the _MonitorEntry of Monitor
           for (int pipeIndex = 0; pipeIndex < pipeEntryCount; pipeIndex++)
 { {
   if(this == &me)              dwBytesAvail = 0;
     return true;                      bPeekPipe = ::PeekNamedPipe(hPipeList[pipeIndex],
   return false;                                                      NULL,
 }                                                                      NULL,
                                                                           NULL,
                                           &dwBytesAvail,
                                                                           NULL
                                                                          );
  
 Boolean monitor_2_entry::operator ==(void* k) const                          // If peek on NamedPipe was successfull and data is available
               if (bPeekPipe && dwBytesAvail)
 { {
   if((void *)this == k)  
     return true;  
   return false;  
 }  
  
                               Tracer::trace(TRC_HTTP,Tracer::LEVEL4," PIPE_PEEKING FOUND = %u BYTES", dwBytesAvail);
  
 monitor_2_entry_type monitor_2_entry::get_type(void) const                              pEvents = 1;
 {                      entries[indexPipeCountAssociator[pipeIndex]].pipeSet = true;
   return _rep->type;                              Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
 }                      "Monitor::run select event received events = %d, \
                                           monitoring %d idle entries",
                       pEvents,
                                           _idleEntries);
   
                                   int pIndx = indexPipeCountAssociator[pipeIndex];
  
 void monitor_2_entry::set_type(monitor_2_entry_type t)                                  if ((entries[pIndx]._status.get() == _MonitorEntry::IDLE) &&
                                            entries[pIndx].namedPipe.isConnected() &&
                                            (pEvents))
 { {
   _rep->type = t;  
 }  
  
                                   MessageQueue *q = 0;
  
 monitor_2_entry_state  monitor_2_entry::get_state(void) const                      try
 { {
   return (monitor_2_entry_state) _rep->state.value();  
 }  
  
 void monitor_2_entry::set_state(monitor_2_entry_state t)                                          q = MessageQueue::lookup (entries[pIndx].queueId);
                       }
                       catch (Exception e)
 { {
   _rep->state = t;                                          e.getMessage();
 } }
                       catch(...)
 void* monitor_2_entry::get_accept(void) const  
 { {
   return _rep->accept_parm;  
 } }
  
 void monitor_2_entry::set_accept(void* a)                                          Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                     "Monitor::run indx = %d, queueId =  %d,\
                                                                     q = %p",pIndx, entries[pIndx].queueId, q);
                       try
                       {
                                           if (entries[pIndx]._type == Monitor::CONNECTION)
 { {
   _rep->accept_parm = a;  
 }  
  
                                                       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 run() \
                                                                                     for indx  = %d, queueId = %d, \
                                                                                     q = %p",\
                                                                 dst->_entry_index,
                                                                                     dst->_monitor->_entries\
                                                                                     [dst->_entry_index].queueId, dst);
  
 void* monitor_2_entry::get_dispatch(void) const                                                  try
 { {
   return _rep->dispatch_parm;  
 }  
  
 void monitor_2_entry::set_dispatch(void* a)                                                          dst->run(1);
 {  
   _rep->dispatch_parm = a;  
 }  
  
 pegasus_socket monitor_2_entry::get_sock(void) const                                                          // Record that the requested data is read/Written
                                                           pipeProcessCount++;
   
                                                   }
                                                   catch (...)
 { {
   return _rep->psock;                                                          Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                                                                 "Monitor::_dispatch: \
                                                                                              exception received");
 } }
  
                                                   Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
                                                                 "Monitor::_dispatch: exited \
                                                                          \run() index %d",
                                                                                      dst->_entry_index);
  
 void monitor_2_entry::set_sock(pegasus_socket& s)  
 {  
   _rep->psock = s;  
  
 } }
                                           else
                                           {
                                                   /* The condition
                                                              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);
                                                   int events = 0;
                                                   Message *msg = 0;
   
                                                       pEvents |= NamedPipeMessage::READ;
                                                       msg = new NamedPipeMessage(entries[pIndx].namedPipe, pEvents);
                                       entries[pIndx]._status = _MonitorEntry::BUSY;
                                       autoEntryMutex.unlock();
                                               q->enqueue(msg);
                                                   autoEntryMutex.lock();
                                       entries.reset(_entries);
                                       entries[pIndx]._status = _MonitorEntry::IDLE;
                                                           delete [] hPipeList;
                                   return(handled_events);
  
 AsyncDQueue<HTTPConnection2> monitor_2::_connections(true, 0);                                          }
  
  
 monitor_2::monitor_2(void)                                  }
   : _session_dispatch(0), _accept_dispatch(0), _listeners(true, 0),                                  catch(...)
     _ready(true, 0), _die(0), _requestCount(0)  
 { {
   try {  
  
     bsd_socket_factory _factory;                          }
                       }
  
     // set up the listener/acceptor                  }
     pegasus_socket temp = pegasus_socket(&_factory);          }
  
     temp.socket(PF_INET, SOCK_STREAM, 0);                  //Check if all the pipes had recieved the data, If no then try again
     // initialize the address          if (pipeEntryCount == pipeProcessCount)
     memset(&_tickle_addr, 0, sizeof(_tickle_addr));                  {
 #ifdef PEGASUS_OS_ZOS                      break;
     _tickle_addr.sin_addr.s_addr = inet_addr_ebcdic("127.0.0.1");                  }
 #else  
     _tickle_addr.sin_addr.s_addr = inet_addr("127.0.0.1");  
 #endif  
     _tickle_addr.sin_family = PF_INET;  
     _tickle_addr.sin_port = 0;  
  
     PEGASUS_SOCKLEN_SIZE _addr_size = sizeof(_tickle_addr);  
  
     temp.bind((struct sockaddr *)&_tickle_addr, sizeof(_tickle_addr));      }
     temp.listen(3);  
     temp.getsockname((struct sockaddr*)&_tickle_addr, &_addr_size);  
  
     // set up the connector          delete [] hPipeList;
  
     pegasus_socket tickler = pegasus_socket(&_factory);  
     tickler.socket(PF_INET, SOCK_STREAM, 0);  
     struct sockaddr_in _addr;  
     memset(&_addr, 0, sizeof(_addr));  
 #ifdef PEGASUS_OS_ZOS  
     _addr.sin_addr.s_addr = inet_addr_ebcdic("127.0.0.1");  
 #else  
     _addr.sin_addr.s_addr = inet_addr("127.0.0.1");  
 #endif #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);  
     _tickler.set_type(INTERNAL);  
     _tickler.set_state(BUSY);  
   
     struct sockaddr_in peer;  
     memset(&peer, 0, sizeof(peer));  
     PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);  
   
     pegasus_socket accepted = temp.accept((struct sockaddr*)&peer, &peer_size);  
     monitor_2_entry* _tickle = new monitor_2_entry(accepted, INTERNAL, 0, 0);  
     _tickle->set_state(BUSY);  
   
     _listeners.insert_first(_tickle);  
  
       return(handled_events);
   }   }
   catch(...){  }  
   void Monitor::stopListeningForConnections(Boolean wait)
   {
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Entering: Monitor::stopListeningForConnections(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
 } }
   #endif
       PEG_METHOD_ENTER(TRC_HTTP, "Monitor::stopListeningForConnections()");
       // set boolean then tickle the server to recognize _stopConnections
       _stopConnections = 1;
       tickle();
  
 monitor_2::~monitor_2(void)      if (wait)
 { {
   try {        // Wait for the monitor to notice _stopConnections.  Otherwise the
     monitor_2_entry* temp = _listeners.remove_first();        // caller of this function may unbind the ports while the monitor
     while(temp){        // is still accepting connections on them.
       delete temp;        _stopConnectionsSem.wait();
       temp = _listeners.remove_first();  
     }     }
   
       PEG_METHOD_EXIT();
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Exiting:  Monitor::stopListeningForConnections(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
   }   }
   catch(...){  }  #endif
 } }
  
  
 void monitor_2::run(void)  int  Monitor::solicitSocketMessages(
       PEGASUS_SOCKET socket,
       Uint32 events,
       Uint32 queueId,
       int type)
 { {
   monitor_2_entry* temp;  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
   while(_die.value() == 0) {      {
           AutoMutex automut(Monitor::_cout_mut);
      struct timeval tv = {0, 0};          PEGASUS_STD(cout) << "Entering: Monitor::solicitSocketMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
   
     // place all sockets in the select set  
     FD_ZERO(&rd_fd_set);  
     try {  
       _listeners.lock(pegasus_thread_self());  
       temp = _listeners.next(0);  
       while(temp != 0 ){  
         if(temp->get_state() == CLOSED ){  
           monitor_2_entry* closed = temp;  
           temp = _listeners.next(closed);  
           _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();  #endif
      PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");
      AutoMutex autoMut(_entry_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
      _solicitSocketCount++;  // bump the count
      int size = (int)_entries.size();
      if((int)_solicitSocketCount >= (size-1)){
           for(int i = 0; i < ((int)_solicitSocketCount - (size-1)); i++){
                   _MonitorEntry entry(0, 0, 0);
                   _entries.append(entry);
     }     }
     catch(...){  
       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.  
  
     int events = select(FD_SETSIZE, &rd_fd_set, NULL, NULL, NULL);     int index;
     try {     for(index = 1; index < (int)_entries.size(); index++)
       _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           try
           {           {
              _ready.insert_first(ready);           if(_entries[index]._status.get() == _MonitorEntry::EMPTY)
           }  
           catch(...)  
           {           {
           }              _entries[index].socket = socket;
               _entries[index].queueId  = queueId;
               _entries[index]._type = type;
               _entries[index]._status = _MonitorEntry::IDLE;
  
           _requestCount++;  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
               {
                   AutoMutex automut(Monitor::_cout_mut);
                   PEGASUS_STD(cout) << "Exiting:  Monitor::solicitSocketMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
         }         }
         temp = _listeners.next(temp);  #endif
               return index;
       }       }
       _listeners.unlock();  
     }     }
     catch(...){        catch(...)
       return;        {
     }     }
     // now handle the sockets that are ready to read  
     _dispatch();  
   } // while alive  
 } }
      _solicitSocketCount--;  // decrease the count, if we are here we didnt do anything meaningful
 void* monitor_2::set_session_dispatch(void (*dp)(monitor_2_entry*))     PEG_METHOD_EXIT();
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
 { {
   void* old = (void *)_session_dispatch;         AutoMutex automut(Monitor::_cout_mut);
   _session_dispatch = dp;         PEGASUS_STD(cout) << "Exiting:  Monitor::solicitSocketMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
   return old;  
 } }
   #endif
 void* monitor_2::set_accept_dispatch(void (*dp)(monitor_2_entry*))     return -1;
 {  
   void* old = (void*)_accept_dispatch;  
   _accept_dispatch = dp;  
   return old;  
  
 } }
  
   void Monitor::unsolicitSocketMessages(PEGASUS_SOCKET socket)
 // 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.  
 void monitor_2::_dispatch(void)  
 { {
    monitor_2_entry* entry;  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
    if(_ready.count() == 0 )          AutoMutex automut(Monitor::_cout_mut);
       return;          PEGASUS_STD(cout) << "Entering: Monitor::unsolicitSocketMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
       }
   #endif
  
       PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitSocketMessages");
       AutoMutex autoMut(_entry_mut);
  
    try      /*
           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.size(); index++)
    {    {
          if(_entries[index].socket == socket)
          entry = _ready.remove_first();  
    }  
    catch(...)  
    {    {
             _entries[index]._status = _MonitorEntry::EMPTY;
             _entries[index].socket = PEGASUS_INVALID_SOCKET;
             _solicitSocketCount--;
             break;
          }
    }    }
  
   while(entry != 0 ) {      /*
     switch(entry->get_type()) {          Dynamic Contraction:
     case INTERNAL:          To remove excess entries we will start from the end of the _entries array
       static char buffer[2];          and remove all entries with EMPTY status until we find the first NON EMPTY.
       entry->get_sock().disableBlocking();          This prevents the positions, of the NON EMPTY entries, from being changed.
       entry->get_sock().read(&buffer, 2);      */
       entry->get_sock().enableBlocking();      index = _entries.size() - 1;
       break;      while(_entries[index]._status.get() == _MonitorEntry::EMPTY){
     case LISTEN:          if(_entries.size() > MAX_NUMBER_OF_MONITOR_ENTRIES)
                   _entries.remove(index);
           index--;
       }
       PEG_METHOD_EXIT();
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {       {
         static struct sockaddr peer;          AutoMutex automut(Monitor::_cout_mut);
         static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);          PEGASUS_STD(cout) << "Exiting:  Monitor::unsolicitSocketMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
         entry->get_sock().disableBlocking();  
         pegasus_socket connected = entry->get_sock().accept(&peer, &peer_size);  
         entry->get_sock().enableBlocking();  
         monitor_2_entry *temp = add_entry(connected, SESSION, entry->get_accept(), entry->get_dispatch());  
         if(temp && _accept_dispatch != 0)  
            _accept_dispatch(temp);  
       }       }
       break;  #endif
     case SESSION:  
       if(_session_dispatch != 0 )  
         _session_dispatch(entry);  
       else {  
         static char buffer[4096];  
         int bytes = entry->get_sock().read(&buffer, 4096);  
       }       }
  
       break;  // Note: this is no longer called with PEP 183.
     case UNTYPED:  PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)
     default:  {
       break;  #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
       {
           AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Entering: Monitor::_dispatch(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
     }     }
     _requestCount--;  #endif
     delete entry;     HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(parm);
      Tracer::trace(TRC_HTTP, Tracer::LEVEL4,
     if(_ready.count() == 0 )          "Monitor::_dispatch: entering run() for indx  = %d, queueId = %d, q = %p",
        break;          dst->_entry_index, dst->_monitor->_entries[dst->_entry_index].queueId, dst);
   
     try     try
     {     {
        entry = _ready.remove_first();        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);
  
   }     PEGASUS_ASSERT(dst->_monitor->_entries[dst->_entry_index]._status.get() == _MonitorEntry::BUSY);
 }  
  
 void monitor_2::stop(void)     // 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)
 { {
   _die = 1;        dst->_monitor->_entries[dst->_entry_index]._status = _MonitorEntry::DYING;
   tickle();  
   
   // shut down the listener list, free the list nodes  
   _tickler.get_sock().close();  
   _listeners.shutdown_queue();  
 } }
      else
 void monitor_2::tickle(void)  
 {  
   static char _buffer[] =  
     {     {
       '0','0'        dst->_monitor->_entries[dst->_entry_index]._status = _MonitorEntry::IDLE;
     };     }
      return 0;
   _tickler.get_sock().write(&_buffer, 2);  
 } }
  
   // Added for NamedPipe implementation for windows
 monitor_2_entry*  monitor_2::add_entry(pegasus_socket& ps,  #if defined PEGASUS_OS_TYPE_WINDOWS && !defined(PEGASUS_DISABLE_LOCAL_DOMAIN_SOCKET)
                                        monitor_2_entry_type type,  //This method is anlogus to solicitSocketMessages. It does the same thing for named Pipes
                                        void* accept_parm,  int  Monitor::solicitPipeMessages(
                                        void* dispatch_parm)      NamedPipe namedPipe,
       Uint32 events,  //not sure what has to change for this enum
       Uint32 queueId,
       int type)
 { {
   monitor_2_entry* m2e = new monitor_2_entry(ps, type, accept_parm, dispatch_parm);     PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitPipeMessages");
  
   try{     AutoMutex autoMut(_entry_mut);
     _listeners.insert_first(m2e);     // 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
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
   {
      AutoMutex automut(Monitor::_cout_mut);
      PEGASUS_STD(cout) << "In Monitor::solicitPipeMessages at the begining" << PEGASUS_STD(endl);
   }   }
   catch(...){  #endif
     delete m2e;  
     return 0;     _solicitSocketCount++;  // bump the count
      int size = (int)_entries.size();
      if((int)_solicitSocketCount >= (size-1)){
           for(int i = 0; i < ((int)_solicitSocketCount - (size-1)); i++){
                   _MonitorEntry entry(0, 0, 0);
                   _entries.append(entry);
   }   }
   tickle();  
   return m2e;  
 } }
  
 Boolean monitor_2::remove_entry(Sint32 s)     int index;
      for(index = 1; index < (int)_entries.size(); index++)
 { {
   monitor_2_entry* temp;        try
   try {        {
     _listeners.try_lock(pegasus_thread_self());           if(_entries[index]._status.get() == _MonitorEntry::EMPTY)
     temp = _listeners.next(0);           {
     while(temp != 0){              _entries[index].socket = NULL;
       if(s == (Sint32)temp->_rep->psock ){              _entries[index].namedPipe = namedPipe;
         temp = _listeners.remove_no_lock(temp);              _entries[index].namedPipeConnection = true;
         delete temp;              _entries[index].queueId  = queueId;
         _listeners.unlock();              _entries[index]._type = type;
         return true;              _entries[index]._status = _MonitorEntry::IDLE;
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
     {
               AutoMutex automut(Monitor::_cout_mut);
               PEGASUS_STD(cout) << "In Monitor::solicitPipeMessages after seting up  _entries[index] index = " << index << PEGASUS_STD(endl);
       }       }
       temp = _listeners.next(temp);  #endif
   
               return index;
     }     }
     _listeners.unlock();  
   }   }
   catch(...){        catch(...)
         {
   }   }
   return false;  
 } }
      _solicitSocketCount--;  // 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);
  
 Uint32 monitor_2::getOutstandingRequestCount(void)     PEG_METHOD_EXIT();
 {     return -1;
   return _requestCount.value();  
  
 } }
  
   //////////////////////////////////////////////////////////////////////////////
   // 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.
   ///////////////////////////////////////////////////////////////////////////////
  
 HTTPConnection2* monitor_2::remove_connection(Sint32 sock)  void Monitor::unsolicitPipeMessages(NamedPipe namedPipe)
 { {
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
    HTTPConnection2* temp;  
    try  
    {    {
       monitor_2::_connections.lock(pegasus_thread_self());          AutoMutex automut(Monitor::_cout_mut);
       temp = monitor_2::_connections.next(0);          PEGASUS_STD(cout) << "Entering: Monitor::unsolicitPipeMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
       while(temp != 0 )  
       {  
          if(sock == temp->getSocket())  
          {  
             temp = monitor_2::_connections.remove_no_lock(temp);  
             monitor_2::_connections.unlock();  
             return temp;  
          }  
          temp = monitor_2::_connections.next(temp);  
       }       }
       monitor_2::_connections.unlock();  #endif
    }  
    catch(...)      PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitPipeMessages");
       AutoMutex autoMut(_entry_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.size(); index++)
       {
           if (_entries[index].namedPipe.getPipe() == namedPipe.getPipe())
    {    {
               _entries[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[index].namedPipe.getPipe());
               // Must use CloseHandle to Close Pipe
                           ::CloseHandle(_entries[index].namedPipe.getPipe());
                       _entries[index].namedPipe.disconnect();
               _solicitSocketCount--;
               break;
    }    }
    return 0;  
 } }
  
 Boolean monitor_2::insert_connection(HTTPConnection2* connection)      /*
           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.size() - 1;
       while (_entries[index]._status.get() == _MonitorEntry::EMPTY)
 { {
    try          if ((_entries[index].namedPipe.getPipe() == namedPipe.getPipe()) ||
               (_entries.size() > MAX_NUMBER_OF_MONITOR_ENTRIES))
    {    {
       monitor_2::_connections.insert_first(connection);                      _entries.remove(index);
    }    }
    catch(...)          index--;
       }
       PEG_METHOD_EXIT();
   #ifdef PEGASUS_LOCALDOMAINSOCKET_DEBUG
    {    {
       return false;          AutoMutex automut(Monitor::_cout_mut);
           PEGASUS_STD(cout) << "Exiting:  Monitor::unsolicitPipeMessages(): (tid:" << Uint32(pegasus_thread_self()) << ")" << PEGASUS_STD(endl);
    }    }
    return true;  #endif
 } }
  
   #endif
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END


Legend:
Removed from v.1.50  
changed lines
  Added in v.1.103.10.27

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2