(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.39 and 1.45

version 1.39, 2003/05/06 16:36:44 version 1.45, 2003/08/22 18:58:18
Line 28 
Line 28 
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
 #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 331 
Line 332 
  
  
  
   ////************************* monitor 2 *****************************////
   ////************************* monitor 2 *****************************////
   ////************************* monitor 2 *****************************////
   ////************************* monitor 2 *****************************////
   ////************************* monitor 2 *****************************////
   ////************************* monitor 2 *****************************////
   ////************************* monitor 2 *****************************////
   
   
   m2e_rep::m2e_rep(void)
     :Base(), state(IDLE)
   
   {
   }
   
   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)
   {
   
   }
   
   m2e_rep::~m2e_rep(void)
   {
   }
   
   m2e_rep::m2e_rep(const m2e_rep& r)
     : Base()
   {
     if(this != &r){
       type = r.type;
       psock = r.psock;
       accept_parm = r.accept_parm;
       dispatch_parm = r.dispatch_parm;
       state = IDLE;
   
     }
   }
   
   
   m2e_rep& m2e_rep::operator =(const m2e_rep& r)
   {
     if(this != &r) {
       type = r.type;
       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(this == &r)
       return true;
     return false;
   }
   
   Boolean m2e_rep::operator ==(void* r)
   {
     if((void*)this == r)
       return true;
     return false;
   }
   
   m2e_rep::operator pegasus_socket() const
   {
     return psock;
   }
   
   
   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);
   }
   
   monitor_2_entry::monitor_2_entry(const monitor_2_entry& e)
   {
     if(this != &e){
       Inc(this->_rep = e._rep);
     }
   }
   
   monitor_2_entry::~monitor_2_entry(void)
   {
     Dec(_rep);
   }
   
   monitor_2_entry& monitor_2_entry::operator=(const monitor_2_entry& e)
   {
     if(this != &e){
       Dec(_rep);
       Inc(this->_rep = e._rep);
     }
     return *this;
   }
   
   Boolean monitor_2_entry::operator ==(const monitor_2_entry& me) const
   {
     if(this == &me)
       return true;
     return false;
   }
   
   Boolean monitor_2_entry::operator ==(void* k) const
   {
     if((void *)this == k)
       return true;
     return false;
   }
   
   
   monitor_2_entry_type monitor_2_entry::get_type(void) const
   {
     return _rep->type;
   }
   
   void monitor_2_entry::set_type(monitor_2_entry_type t)
   {
     _rep->type = t;
   }
   
   
   monitor_2_entry_state  monitor_2_entry::get_state(void) const
   {
     return (monitor_2_entry_state) _rep->state.value();
   }
   
   void monitor_2_entry::set_state(monitor_2_entry_state t)
   {
     _rep->state = t;
   }
   
   void* monitor_2_entry::get_accept(void) const
   {
     return _rep->accept_parm;
   }
   
   void monitor_2_entry::set_accept(void* a)
   {
     _rep->accept_parm = a;
   }
   
   
   void* monitor_2_entry::get_dispatch(void) const
   {
     return _rep->dispatch_parm;
   }
   
   void monitor_2_entry::set_dispatch(void* a)
   {
     _rep->dispatch_parm = a;
   }
   
   pegasus_socket monitor_2_entry::get_sock(void) const
   {
     return _rep->psock;
   }
   
   
   void monitor_2_entry::set_sock(pegasus_socket& s)
   {
     _rep->psock = s;
   
   }
   
   
   monitor_2::monitor_2(void)
     : _session_dispatch(0), _accept_dispatch(0), _listeners(true, 0),
       _ready(true),  _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);
       // initialize the address
       memset(&_tickle_addr, 0, sizeof(_tickle_addr));
       _tickle_addr.sin_addr.s_addr = inet_addr("127.0.0.1");
       _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
   
       pegasus_socket tickler = pegasus_socket(&_factory);
       tickler.socket(PF_INET, SOCK_STREAM, 0);
       struct sockaddr_in _addr;
       memset(&_addr, 0, sizeof(_addr));
       _addr.sin_addr.s_addr = inet_addr("127.0.0.1");
       _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);
   
     }
     catch(...){  }
   }
   
   monitor_2::~monitor_2(void)
   {
     try {
       monitor_2_entry* temp = _listeners.remove_first();
       while(temp){
         delete temp;
         temp = _listeners.remove_first();
       }
     }
     catch(...){  }
   }
   
   
   void monitor_2::run(void)
   {
     monitor_2_entry* temp;
     while(_die.value() == 0) {
        struct timeval tv = {0, 0};
   
       // 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);
             delete closed;
           }
           if(temp == 0)
              break;
           FD_SET((Sint32) temp->get_sock()  , &rd_fd_set);
           temp = _listeners.next(temp);
         }
         _listeners.unlock();
       }
       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);
       try {
         _listeners.lock(pegasus_thread_self());
         temp = _listeners.next(0);
         while(temp != 0 ){
           Sint32 fd = (Sint32) temp->get_sock();
   
           if(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);
             _ready.insert_first((void*)ready);
             _requestCount++;
           }
           temp = _listeners.next(temp);
         }
         _listeners.unlock();
       }
       catch(...){
         return;
       }
       // now handle the sockets that are ready to read
       _dispatch();
     } // while alive
   }
   
   void* monitor_2::set_session_dispatch(void (*dp)(monitor_2_entry*))
   {
     void* old = (void *)_session_dispatch;
     _session_dispatch = dp;
     return old;
   }
   
   void* monitor_2::set_accept_dispatch(void (*dp)(monitor_2_entry*))
   {
     void* old = (void*)_accept_dispatch;
     _accept_dispatch = dp;
     return old;
   
   }
   
   
   // 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 = (monitor_2_entry*) _ready.remove_first();
     while(entry != 0 ){
       switch(entry->get_type()) {
       case INTERNAL:
         static char buffer[2];
         entry->get_sock().read(&buffer, 2);
         break;
       case LISTEN:
         {
           static struct sockaddr peer;
           static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);
           pegasus_socket connected = entry->get_sock().accept(&peer, &peer_size);
           monitor_2_entry *temp = add_entry(connected, SESSION, entry->get_accept(), entry->get_dispatch());
           if(temp && _accept_dispatch != 0)
             _accept_dispatch(temp);
         }
         break;
       case SESSION:
         if(_session_dispatch != 0 )
           _session_dispatch(entry);
         else {
           static char buffer[4096];
           int bytes = entry->get_sock().read(&buffer, 4096);
         }
   
         break;
       case UNTYPED:
       default:
         break;
       }
       _requestCount--;
       delete entry;
       entry = (monitor_2_entry*) _ready.remove_first();
     }
   }
   
   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)
   {
     static char _buffer[] =
       {
         '0','0'
       };
   
     _tickler.get_sock().write(&_buffer, 2);
   }
   
   
   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{
       _listeners.insert_first(m2e);
     }
     catch(...){
       delete m2e;
       return 0;
     }
     tickle();
     return m2e;
   }
   
   Boolean monitor_2::remove_entry(Sint32 s)
   {
     monitor_2_entry* temp;
     try {
       _listeners.try_lock(pegasus_thread_self());
       temp = _listeners.next(0);
       while(temp != 0){
         if(s == (Sint32)temp->_rep->psock ){
           temp = _listeners.remove_no_lock(temp);
           delete temp;
           _listeners.unlock();
           return true;
         }
         temp = _listeners.next(temp);
       }
       _listeners.unlock();
     }
     catch(...){
     }
     return false;
   }
   
   Uint32 monitor_2::getOutstandingRequestCount(void)
   {
     return _requestCount.value();
   
   }
   
   
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END

Legend:
Removed from v.1.39  
changed lines
  Added in v.1.45
No CVS admin address has been configured
 Powered by
ViewCVS 0.9.2