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

Diff for /pegasus/src/Pegasus/Common/MessageQueueService.cpp between version 1.2 and 1.138

version 1.2, 2002/01/18 19:27:48 version 1.138, 2008/06/19 17:57:01
Line 1 
Line 1 
 //%////-*-c++-*-////////////////////////////////////////////////////////////////  //%2006////////////////////////////////////////////////////////////////////////
 // //
 // Copyright (c) 2000, 2001 The Open group, BMC Software, Tivoli Systems, IBM  // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
   // 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 20 
Line 29 
 // //
 //============================================================================== //==============================================================================
 // //
 // Author: Mike Day (mdday@us.ibm.com)  
 //  
 // Modified By:  
 //  
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
 #include "MessageQueueService.h" #include "MessageQueueService.h"
   #include <Pegasus/Common/Tracer.h>
   #include <Pegasus/Common/MessageLoader.h>
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
 MessageQueueService::MessageQueueService(const char *name,  cimom *MessageQueueService::_meta_dispatcher = 0;
   AtomicInt MessageQueueService::_service_count(0);
   Mutex MessageQueueService::_meta_dispatcher_mutex;
   
   static struct timeval deallocateWait = {300, 0};
   
   ThreadPool *MessageQueueService::_thread_pool = 0;
   
   MessageQueueService::PollingList* MessageQueueService::_polling_list;
   Mutex MessageQueueService::_polling_list_mutex;
   
   Thread* MessageQueueService::_polling_thread = 0;
   
   ThreadPool *MessageQueueService::get_thread_pool()
   {
      return _thread_pool;
   }
   
   //
   // MAX_THREADS_PER_SVC_QUEUE
   //
   // JR Wunderlich Jun 6, 2005
   //
   
   #define MAX_THREADS_PER_SVC_QUEUE_LIMIT 5000
   #define MAX_THREADS_PER_SVC_QUEUE_DEFAULT 5
   
   #ifndef MAX_THREADS_PER_SVC_QUEUE
   # define MAX_THREADS_PER_SVC_QUEUE MAX_THREADS_PER_SVC_QUEUE_DEFAULT
   #endif
   
   Uint32 max_threads_per_svc_queue;
   
   ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::polling_routine(
       void* parm)
   {
       Thread *myself = reinterpret_cast<Thread *>(parm);
       List<MessageQueueService, Mutex> *list =
           reinterpret_cast<List<MessageQueueService, Mutex>*>(myself->get_parm());
   
       while (_stop_polling.get()  == 0)
       {
           _polling_sem.wait();
   
           if (_stop_polling.get() != 0)
           {
               break;
           }
   
           // The polling_routine thread must hold the lock on the
           // _polling_list while processing incoming messages.
           // This lock is used to give this thread ownership of
           // services on the _polling_routine list.
   
           // This is necessary to avoid confict with other threads
           // processing the _polling_list
           // (e.g., MessageQueueServer::~MessageQueueService).
   
           list->lock();
           MessageQueueService *service = list->front();
           ThreadStatus rtn = PEGASUS_THREAD_OK;
           while (service != NULL)
           {
               if ((service->_incoming.count() > 0) &&
                   (service->_die.get() == 0) &&
                   (service->_threads.get() < max_threads_per_svc_queue))
               {
                   // The _threads count is used to track the
                   // number of active threads that have been allocated
                   // to process messages for this service.
   
                   // The _threads count MUST be incremented while
                   // the polling_routine owns the _polling_thread
                   // lock and has ownership of the service object.
   
                   service->_threads++;
                   try
                   {
                       rtn = _thread_pool->allocate_and_awaken(
                           service, _req_proc, &_polling_sem);
                   }
                   catch (...)
                   {
                       service->_threads--;
   
                       // allocate_and_awaken should never generate an exception.
                       PEGASUS_ASSERT(0);
                   }
                   // if no more threads available, break from processing loop
                   if (rtn != PEGASUS_THREAD_OK )
                   {
                       service->_threads--;
                       PEG_TRACE((TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL1,
                           "Could not allocate thread for %s.  Queue has %d "
                               "messages waiting and %d threads servicing."
                               "Skipping the service for right now. ",
                           service->getQueueName(),
                           service->_incoming.count(),
                           service->_threads.get()));
   
                       Threads::yield();
                       service = NULL;
                   }
               }
               if (service != NULL)
               {
                   service = list->next_of(service);
               }
           }
           list->unlock();
       }
       return ThreadReturnType(0);
   }
   
   
   Semaphore MessageQueueService::_polling_sem(0);
   AtomicInt MessageQueueService::_stop_polling(0);
   
   
   MessageQueueService::MessageQueueService(
       const char* name,
                                          Uint32 queueID,                                          Uint32 queueID,
                                          Uint32 capabilities,                                          Uint32 capabilities,
                                          Uint32 mask)                                          Uint32 mask)
    : Base(name, false, queueID),      : Base(name, true,  queueID),
      _capabilities(capabilities),  
      _mask(mask),      _mask(mask),
      _die(0)        _die(0),
         _threads(0),
         _incoming(),
         _incoming_queue_shutdown(0)
 { {
       _capabilities = (capabilities | module_capabilities::async);
   
    _default_op_timeout.tv_sec = 30;    _default_op_timeout.tv_sec = 30;
    _default_op_timeout.tv_usec = 100;    _default_op_timeout.tv_usec = 100;
    _meta_dispatcher = static_cast<cimom *>(Base::lookup(CIMOM_Q_ID));  
       max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE;
   
       // if requested thread max is out of range, then set to
       // MAX_THREADS_PER_SVC_QUEUE_LIMIT
   
       if ((max_threads_per_svc_queue < 1) ||
           (max_threads_per_svc_queue > MAX_THREADS_PER_SVC_QUEUE_LIMIT))
       {
           max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE_LIMIT;
       }
   
       PEG_TRACE((TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL3,
          "max_threads_per_svc_queue set to %u.", max_threads_per_svc_queue));
   
       AutoMutex autoMut(_meta_dispatcher_mutex);
   
    if(_meta_dispatcher == 0 )    if(_meta_dispatcher == 0 )
       throw NullPointer();      {
           _stop_polling = 0;
           PEGASUS_ASSERT(_service_count.get() == 0);
           _meta_dispatcher = new cimom();
   
           //  _thread_pool = new ThreadPool(initial_cnt, "MessageQueueService",
           //   minimum_cnt, maximum_cnt, deallocateWait);
           //
           _thread_pool =
               new ThreadPool(0, "MessageQueueService", 0, 0, deallocateWait);
 } }
       _service_count++;
  
 MessageQueueService::~MessageQueueService(void)      if (false == register_service(name, _capabilities, _mask))
       {
           MessageLoaderParms parms(
               "Common.MessageQueueService.UNABLE_TO_REGISTER",
               "CIM base message queue service is unable to register with the "
                   "CIMOM dispatcher.");
           throw BindFailedException(parms);
       }
   
       _get_polling_list()->insert_back(this);
   }
   
   
   MessageQueueService::~MessageQueueService()
 { {
    _die = 1;    _die = 1;
  
       // The polling_routine locks the _polling_list while
       // processing the incoming messages for services on the
       // list.  Deleting the service from the _polling_list
       // prior to processing, avoids synchronization issues
       // with the _polling_routine.
   
       // ATTN: added to prevent assertion in List in which the list does not
       // contain this element.
   
       if (_get_polling_list()->contains(this))
           _get_polling_list()->remove(this);
   
       // ATTN: The code for closing the _incoming queue
       // is not working correctly. In OpenPegasus 2.5,
       // execution of the following code is very timing
       // dependent. This needs to be fix.
       // See Bug 4079 for details.
       if (_incoming_queue_shutdown.get() == 0)
       {
           _shutdown_incoming_queue();
 } }
  
       // Wait until all threads processing the messages
       // for this service have completed.
  
 AtomicInt MessageQueueService::_xid(1);      while (_threads.get() > 0)
       {
           Threads::yield();
       }
  
 // mutex is UNLOCKED  
 void MessageQueueService::handleEnqueue(void)  
 { {
    Message *msg = dequeue();          AutoMutex autoMut(_meta_dispatcher_mutex);
    if( msg )          _service_count--;
           if (_service_count.get() == 0)
    {    {
       if(msg->getMask() & message_mask::ha_async)  
               _stop_polling++;
               _polling_sem.signal();
               if (_polling_thread)
       {       {
          _handle_async_msg(static_cast<AsyncMessage *>(msg));                  _polling_thread->join();
                   delete _polling_thread;
                   _polling_thread = 0;
       }       }
       else              _meta_dispatcher->_shutdown_routed_queue();
               delete _meta_dispatcher;
               _meta_dispatcher = 0;
   
               delete _thread_pool;
               _thread_pool = 0;
           }
       } // mutex unlocks here
       // Clean up in case there are extra stuff on the queue.
       while (_incoming.count())
       {
           try
           {
               delete _incoming.dequeue();
           }
           catch (const ListClosed&)
           {
               // If the list is closed, there is nothing we can do.
               break;
           }
       }
   }
   
   void MessageQueueService::_shutdown_incoming_queue()
   {
       if (_incoming_queue_shutdown.get() > 0)
           return;
   
       AsyncIoctl *msg = new AsyncIoctl(
           0,
           _queueId,
           _queueId,
           true,
           AsyncIoctl::IO_CLOSE,
           0,
           0);
   
       msg->op = get_op();
       msg->op->_flags |= ASYNC_OPFLAGS_FIRE_AND_FORGET;
       msg->op->_flags &= ~(ASYNC_OPFLAGS_CALLBACK | ASYNC_OPFLAGS_SAFE_CALLBACK
           | ASYNC_OPFLAGS_SIMPLE_STATUS);
       msg->op->_state &= ~ASYNC_OPSTATE_COMPLETE;
   
       msg->op->_op_dest = this;
       msg->op->_request.reset(msg);
       try
       {
           _incoming.enqueue_wait(msg->op);
           _polling_sem.signal();
       }
       catch (const ListClosed&)
       {
           // This means the queue has already been shut-down (happens  when there
           // are two AsyncIoctrl::IO_CLOSE messages generated and one got first
           // processed.
           delete msg;
       }
       catch (const Permission&)
       {
          delete msg;          delete msg;
    }    }
 } }
  
  
 void MessageQueueService::_enqueueAsyncResponse(AsyncRequest *request,  
                                                 AsyncReply *reply,  void MessageQueueService::enqueue(Message* msg)
                                                 Uint32 state,  
                                                 Uint32 flag)  
 { {
    PEGASUS_ASSERT(request != 0  && reply != 0 );      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE, "MessageQueueService::enqueue()");
  
    AsyncOpNode *op = request->op;      Base::enqueue(msg);
    op->lock();  
 //   if (false == op->_response.exists(reply))      PEG_METHOD_EXIT();
 //      op->_response.insert_last(reply);  }
    op->_response = reply;  
   
    op->_state |= state ;  ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(
    op->_flags |= flag;      void* parm)
    gettimeofday(&(op->_updated), NULL);  {
    op->unlock();      MessageQueueService* service =
           reinterpret_cast<MessageQueueService*>(parm);
       PEGASUS_ASSERT(service != 0);
       try
       {
           if (service->_die.get() != 0)
           {
               service->_threads--;
               return 0;
           }
           // pull messages off the incoming queue and dispatch them. then
           // check pending messages that are non-blocking
           AsyncOpNode *operation = 0;
   
           // many operations may have been queued.
           do
           {
               try
               {
                   operation = service->_incoming.dequeue();
               }
               catch (ListClosed&)
               {
                   // ATTN: This appears to be a common loop exit path.
                   //PEG_TRACE_CSTRING(TRC_DISCARDED_DATA, Tracer::LEVEL2,
                   //    "Caught ListClosed exception.  Exiting _req_proc.");
                   break;
               }
   
               if (operation)
               {
                  operation->_service_ptr = service;
                  service->_handle_incoming_operation(operation);
               }
           } while (operation);
       }
       catch (const Exception& e)
       {
           PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL1,
               String("Caught exception: \"") + e.getMessage() +
                   "\".  Exiting _req_proc.");
       }
       catch (...)
       {
           PEG_TRACE_CSTRING(TRC_DISCARDED_DATA, Tracer::LEVEL1,
               "Caught unrecognized exception.  Exiting _req_proc.");
       }
       service->_threads--;
       return 0;
   }
   
   
   void MessageQueueService::_sendwait_callback(
       AsyncOpNode* op,
       MessageQueue* q,
       void *parm)
   {
    op->_client_sem.signal();    op->_client_sem.signal();
   }
   
  
   // callback function is responsible for cleaning up all resources
   // including op, op->_callback_node, and op->_callback_ptr
   void MessageQueueService::_handle_async_callback(AsyncOpNode* op)
   {
       if (op->_flags & ASYNC_OPFLAGS_SAFE_CALLBACK)
       {
           Message *msg = op->removeRequest();
           if (msg && (msg->getMask() & MessageMask::ha_async))
           {
               if (msg->getType() == ASYNC_ASYNC_LEGACY_OP_START)
               {
                   AsyncLegacyOperationStart *wrapper =
                       static_cast<AsyncLegacyOperationStart *>(msg);
                   msg = wrapper->get_action();
                   delete wrapper;
               }
               else if (msg->getType() == ASYNC_ASYNC_MODULE_OP_START)
               {
                   AsyncModuleOperationStart *wrapper =
                       static_cast<AsyncModuleOperationStart *>(msg);
                   msg = wrapper->get_action();
                   delete wrapper;
               }
               else if (msg->getType() == ASYNC_ASYNC_OP_START)
               {
                   AsyncOperationStart *wrapper =
                       static_cast<AsyncOperationStart *>(msg);
                   msg = wrapper->get_action();
                   delete wrapper;
               }
               delete msg;
 } }
  
 // may be overriden by derived classes          msg = op->removeResponse();
 void MessageQueueService::_handle_async_msg(AsyncMessage *msg)          if (msg && (msg->getMask() & MessageMask::ha_async))
 { {
    if( msg == 0 )              if (msg->getType() == ASYNC_ASYNC_LEGACY_OP_RESULT)
       return;              {
                   AsyncLegacyOperationResult *wrapper =
                       static_cast<AsyncLegacyOperationResult *>(msg);
                   msg = wrapper->get_result();
                   delete wrapper;
               }
               else if (msg->getType() == ASYNC_ASYNC_MODULE_OP_RESULT)
               {
                   AsyncModuleOperationResult *wrapper =
                       static_cast<AsyncModuleOperationResult *>(msg);
                   msg = wrapper->get_result();
                   delete wrapper;
               }
           }
           void (*callback)(Message *, void *, void *) = op->__async_callback;
           void *handle = op->_callback_handle;
           void *parm = op->_callback_parameter;
           op->release();
           return_op(op);
           callback(msg, handle, parm);
       }
       else if (op->_flags & ASYNC_OPFLAGS_CALLBACK)
       {
           // note that _callback_node may be different from op
           // op->_callback_response_q is a "this" pointer we can use for
           // static callback methods
           op->_async_callback(
               op->_callback_node, op->_callback_response_q, op->_callback_ptr);
       }
   }
  
    Uint32 mask = msg->getMask();  
    Uint32 type = msg->getType();  
  
    if (mask & message_mask::ha_async)  void MessageQueueService::_handle_incoming_operation(AsyncOpNode* operation)
    {    {
       if (mask & message_mask::ha_request)      if (operation != 0)
          _handle_async_request(static_cast<AsyncRequest *>(msg));      {
       else  
          _handle_async_reply(static_cast<AsyncReply *>(msg));  // ATTN: optimization
   // << Tue Feb 19 14:10:38 2002 mdd >>
           operation->lock();
   
           Message *rq = operation->_request.get();
   
   // optimization <<< Thu Mar  7 21:04:05 2002 mdd >>>
   // move this to the bottom of the loop when the majority of
   // messages become async messages.
   
           // divert legacy messages to handleEnqueue
           if ((rq != 0) && (!(rq->getMask() & MessageMask::ha_async)))
           {
               operation->_request.release();
               operation->unlock();
               // delete the op node
               operation->release();
               return_op(operation);
   
               handleEnqueue(rq);
               return;
           }
   
           if ((operation->_flags & ASYNC_OPFLAGS_CALLBACK ||
                operation->_flags & ASYNC_OPFLAGS_SAFE_CALLBACK) &&
               (operation->_state & ASYNC_OPSTATE_COMPLETE))
           {
               operation->unlock();
               _handle_async_callback(operation);
    }    }
    else    else
       delete msg;          {
               PEGASUS_ASSERT(rq != 0);
               operation->unlock();
               _handle_async_request(static_cast<AsyncRequest *>(rq));
           }
       }
       return;
 } }
  
 void MessageQueueService::_handle_async_request(AsyncRequest *req) void MessageQueueService::_handle_async_request(AsyncRequest *req)
 { {
       if (req != 0)
       {
    req->op->processing();    req->op->processing();
  
    Uint32 type = req->getType();          MessageType type = req->getType();
    if( type == async_messages::HEARTBEAT )          if (type == ASYNC_HEARTBEAT)
       handle_heartbeat_request(req);       handle_heartbeat_request(req);
    else if (type == async_messages::IOCTL)          else if (type == ASYNC_IOCTL)
       handle_AsyncIoctl(static_cast<AsyncIoctl *>(req));       handle_AsyncIoctl(static_cast<AsyncIoctl *>(req));
    else if (type == async_messages::CIMSERVICE_START)          else if (type == ASYNC_CIMSERVICE_START)
       handle_CimServiceStart(static_cast<CimServiceStart *>(req));       handle_CimServiceStart(static_cast<CimServiceStart *>(req));
    else if (type == async_messages::CIMSERVICE_STOP)          else if (type == ASYNC_CIMSERVICE_STOP)
       handle_CimServiceStop(static_cast<CimServiceStop *>(req));       handle_CimServiceStop(static_cast<CimServiceStop *>(req));
    else if (type == async_messages::CIMSERVICE_PAUSE)          else if (type == ASYNC_CIMSERVICE_PAUSE)
       handle_CimServicePause(static_cast<CimServicePause *>(req));       handle_CimServicePause(static_cast<CimServicePause *>(req));
    else if (type == async_messages::CIMSERVICE_RESUME)          else if (type == ASYNC_CIMSERVICE_RESUME)
       handle_CimServiceResume(static_cast<CimServiceResume *>(req));       handle_CimServiceResume(static_cast<CimServiceResume *>(req));
    else if ( type == async_messages::ASYNC_OP_START)          else if (type == ASYNC_ASYNC_OP_START)
       handle_AsyncOperationStart(static_cast<AsyncOperationStart *>(req));       handle_AsyncOperationStart(static_cast<AsyncOperationStart *>(req));
    else    else
    {    {
       // we don't handle this request message       // we don't handle this request message
       _make_response(req, async_results::CIM_NAK );       _make_response(req, async_results::CIM_NAK );
    }    }
       }
   }
   
  
   Boolean MessageQueueService::_enqueueResponse(
       Message* request,
       Message* response)
   {
       PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
           "MessageQueueService::_enqueueResponse");
   
       if (request->getMask() & MessageMask::ha_async)
       {
           if (response->getMask() & MessageMask::ha_async)
           {
               _completeAsyncResponse(
                   static_cast<AsyncRequest *>(request),
                   static_cast<AsyncReply *>(response),
                   ASYNC_OPSTATE_COMPLETE, 0);
               PEG_METHOD_EXIT();
               return true;
 } }
       }
   
       AsyncRequest* asyncRequest =
           static_cast<AsyncRequest*>(request->get_async());
  
 void MessageQueueService::_handle_async_reply(AsyncReply *rep)      if (asyncRequest != 0)
 { {
           PEGASUS_ASSERT(asyncRequest->getMask() &
               (MessageMask::ha_async | MessageMask::ha_request));
  
    if (rep->op != 0 )          AsyncOpNode* op = asyncRequest->op;
       rep->op->processing();  
  
    Uint32 type = rep->getType();          // the legacy request is going to be deleted by its handler
           // remove it from the op node
  
    if ( type == async_messages::ASYNC_OP_RESULT )          static_cast<AsyncLegacyOperationStart *>(asyncRequest)->get_action();
       handle_AsyncOperationResult(static_cast<AsyncOperationResult *>(rep));  
    else          AsyncLegacyOperationResult *async_result =
               new AsyncLegacyOperationResult(
                   op,
                   response);
           _completeAsyncResponse(
               asyncRequest,
               async_result,
               ASYNC_OPSTATE_COMPLETE,
               0);
           PEG_METHOD_EXIT();
           return true;
       }
   
       // ensure that the destination queue is in response->dest
       PEG_METHOD_EXIT();
       return SendForget(response);
   }
   
   void MessageQueueService::_make_response(Message* req, Uint32 code)
    {    {
       // we don't handle this reply      cimom::_make_response(req, code);
       ;  
    }    }
  
    if( rep->op != 0 )  
       rep->op->release();  void MessageQueueService::_completeAsyncResponse(
       AsyncRequest* request,
       AsyncReply* reply,
       Uint32 state,
       Uint32 flag)
   {
       PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
           "MessageQueueService::_completeAsyncResponse");
   
       cimom::_completeAsyncResponse(request, reply, state, flag);
   
       PEG_METHOD_EXIT();
 } }
  
 void MessageQueueService::_make_response(AsyncRequest *req, Uint32 code)  
   void MessageQueueService::_complete_op_node(
       AsyncOpNode* op,
       Uint32 state,
       Uint32 flag,
       Uint32 code)
 { {
    AsyncReply *reply =      cimom::_complete_op_node(op, state, flag, code);
       new AsyncReply(async_messages::REPLY,  }
                      req->getKey(),  
                      req->getRouting(),  
                      0,  Boolean MessageQueueService::accept_async(AsyncOpNode* op)
                      req->op,  {
                      code,      if (_incoming_queue_shutdown.get() > 0)
                      req->resp,          return false;
       if (_polling_thread == NULL)
       {
           _polling_thread = new Thread(
               polling_routine,
               reinterpret_cast<void *>(_get_polling_list()),
                      false);                      false);
    _enqueueAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );          ThreadStatus tr = PEGASUS_THREAD_OK;
           while ( (tr =_polling_thread->run()) != PEGASUS_THREAD_OK)
           {
               if (tr == PEGASUS_THREAD_INSUFFICIENT_RESOURCES)
                   Threads::yield();
               else
                   throw Exception(MessageLoaderParms(
                       "Common.MessageQueueService.NOT_ENOUGH_THREAD",
                       "Could not allocate thread for the polling thread."));
           }
       }
   // ATTN optimization remove the message checking altogether in the base
   // << Mon Feb 18 14:02:20 2002 mdd >>
       op->lock();
       Message *rq = op->_request.get();
       Message *rp = op->_response.get();
       op->unlock();
   
       if ((rq != 0 && (true == messageOK(rq))) ||
           (rp != 0 && (true == messageOK(rp))) && _die.get() == 0)
       {
           _incoming.enqueue_wait(op);
           _polling_sem.signal();
           return true;
       }
       return false;
 } }
  
   Boolean MessageQueueService::messageOK(const Message* msg)
   {
       if (_incoming_queue_shutdown.get() > 0)
           return false;
       return true;
   }
  
 void MessageQueueService::handle_heartbeat_request(AsyncRequest *req) void MessageQueueService::handle_heartbeat_request(AsyncRequest *req)
 { {
    // default action is to echo a heartbeat response    // default action is to echo a heartbeat response
  
    AsyncReply *reply =      AsyncReply *reply = new AsyncReply(
       new AsyncReply(async_messages::HEARTBEAT,          ASYNC_HEARTBEAT,
                      req->getKey(),  
                      req->getRouting(),  
                      0,                      0,
                      req->op,                      req->op,
                      async_results::OK,                      async_results::OK,
                      req->resp,                      req->resp,
                      false);                      false);
    _enqueueAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );      _completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0);
   
 } }
  
  
 void MessageQueueService::handle_heartbeat_reply(AsyncReply *rep) void MessageQueueService::handle_heartbeat_reply(AsyncReply *rep)
 { {
    ;  
 } }
  
 void MessageQueueService::handle_AsyncIoctl(AsyncIoctl *req) void MessageQueueService::handle_AsyncIoctl(AsyncIoctl *req)
 { {
       switch (req->ctl)
       {
           case AsyncIoctl::IO_CLOSE:
           {
               MessageQueueService *service =
                   static_cast<MessageQueueService *>(req->op->_service_ptr);
   
   #ifdef MESSAGEQUEUESERVICE_DEBUG
               PEGASUS_STD(cout) << service->getQueueName() <<
                   " Received AsyncIoctl::IO_CLOSE " << PEGASUS_STD(endl);
   #endif
   
               // respond to this message. this is fire and forget, so we
               // don't need to delete anything.
               // this takes care of two problems that were being found
               // << Thu Oct  9 10:52:48 2003 mdd >>
    _make_response(req, async_results::OK);    _make_response(req, async_results::OK);
               // ensure we do not accept any further messages
   
               // ensure we don't recurse on IO_CLOSE
               if (_incoming_queue_shutdown.get() > 0)
                   break;
   
               // set the closing flag
               service->_incoming_queue_shutdown = 1;
               // empty out the queue
               while (1)
               {
                   AsyncOpNode *operation;
                   try
                   {
                       operation = service->_incoming.dequeue();
 } }
 void MessageQueueService::handle_CimServiceStart(CimServiceStart *req)                  catch (IPCException&)
                   {
                       break;
                   }
                   if (operation)
 { {
                       operation->_service_ptr = service;
                       service->_handle_incoming_operation(operation);
                   }
                   else
                       break;
               } // message processing loop
   
               // shutdown the AsyncQueue
               service->_incoming.close();
               return;
           }
   
           default:
    _make_response(req, async_results::CIM_NAK);    _make_response(req, async_results::CIM_NAK);
 } }
   }
   
   void MessageQueueService::handle_CimServiceStart(CimServiceStart* req)
   {
   #ifdef MESSAGEQUEUESERVICE_DEBUG
       PEGASUS_STD(cout) << getQueueName() << "received START" <<
           PEGASUS_STD(endl);
   #endif
   
       // clear the stoped bit and update
       _capabilities &= (~(module_capabilities::stopped));
       _make_response(req, async_results::OK);
       // now tell the meta dispatcher we are stopped
       update_service(_capabilities, _mask);
   }
   
 void MessageQueueService::handle_CimServiceStop(CimServiceStop *req) void MessageQueueService::handle_CimServiceStop(CimServiceStop *req)
 { {
    _make_response(req, async_results::CIM_NAK);  #ifdef MESSAGEQUEUESERVICE_DEBUG
       PEGASUS_STD(cout) << getQueueName() << "received STOP" << PEGASUS_STD(endl);
   #endif
       // set the stopeed bit and update
       _capabilities |= module_capabilities::stopped;
       _make_response(req, async_results::CIM_STOPPED);
       // now tell the meta dispatcher we are stopped
       update_service(_capabilities, _mask);
 } }
   
 void MessageQueueService::handle_CimServicePause(CimServicePause *req) void MessageQueueService::handle_CimServicePause(CimServicePause *req)
 { {
    _make_response(req, async_results::CIM_NAK);      // set the paused bit and update
       _capabilities |= module_capabilities::paused;
       update_service(_capabilities, _mask);
       _make_response(req, async_results::CIM_PAUSED);
       // now tell the meta dispatcher we are stopped
 } }
   
 void MessageQueueService::handle_CimServiceResume(CimServiceResume *req) void MessageQueueService::handle_CimServiceResume(CimServiceResume *req)
 { {
    _make_response(req, async_results::CIM_NAK);      // clear the paused  bit and update
       _capabilities &= (~(module_capabilities::paused));
       update_service(_capabilities, _mask);
       _make_response(req, async_results::OK);
       // now tell the meta dispatcher we are stopped
 } }
  
 void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req) void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req)
 { {
    _make_response(req, async_results::CIM_NAK);    _make_response(req, async_results::CIM_NAK);
   
 } }
  
 void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req) void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req)
 { {
    ;  
 } }
  
 AsyncOpNode *MessageQueueService::get_op(void)  
 {  
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();  
    if(op == 0 )  
       throw NullPointer();  
   
    op->write_state(ASYNC_OPSTATE_UNKNOWN);  
    op->write_flags(ASYNC_OPFLAGS_SINGLE |  
                    ASYNC_OPFLAGS_NORMAL |  
                    ASYNC_OPFLAGS_META_DISPATCHER);  
    return op;  
 }  
  
 void MessageQueueService::return_op(AsyncOpNode *op)  void MessageQueueService::handle_AsyncLegacyOperationStart(
       AsyncLegacyOperationStart* req)
 { {
    PEGASUS_ASSERT(op->read_state() & ASYNC_OPSTATE_RELEASED );      // remove the legacy message from the request and enqueue it to its
       // destination
       Uint32 result = async_results::CIM_NAK;
  
    if(op->read_state() & ASYNC_OPFLAGS_META_DISPATCHER )      Message* legacy = req->_act;
       if (legacy != 0)
       {
           MessageQueue* queue = MessageQueue::lookup(req->_legacy_destination);
           if (queue != 0)
    {    {
       _meta_dispatcher->cache_op(op);              if (queue->isAsync() == true)
               {
                   (static_cast<MessageQueueService *>(queue))->handleEnqueue(
                       legacy);
    }    }
    else    else
       delete op;  
 }  
   
 AsyncMessage *MessageQueueService::SendWait(AsyncRequest *request)  
 { {
    if (request == 0 )                  // Enqueue the response:
       throw NullPointer();                  queue->enqueue(req->get_action());
    AsyncMessage *ret_msg = 0;              }
  
    AsyncOpNode *op = request->op;              result = async_results::OK;
           }
       }
       _make_response(req, result);
   }
  
    if(op == 0 )  void MessageQueueService::handle_AsyncLegacyOperationResult(
       return 0;      AsyncLegacyOperationResult* rep)
    //     ATTN: debugging  
    op->put_response(0);  
    if(true == _meta_dispatcher->accept_async(static_cast<Message *>(request)))  
    {    {
       op->_client_sem.wait();  }
       ret_msg = static_cast<AsyncMessage *>(op->_response);  
       op->_response = 0;  
  
   AsyncOpNode* MessageQueueService::get_op()
   {
      AsyncOpNode* op = new AsyncOpNode();
  
 //      op->lock();     op->_state = ASYNC_OPSTATE_UNKNOWN;
 //       while( op->_response.count() )     op->_flags = ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;
 //       {  
 //       AsyncMessage *rply = static_cast<AsyncMessage *>(op->_response.remove_last());  
 //       if (rply != 0 )  
 //       {  
 //          rply->op = 0;  
 //      reply_list->insert_first( static_cast<AsyncMessage *>(op->_response) );  
 //       }  
 //       }  
       // release the opnode, the meta-dispatcher will recycle it for us  
 //      op->_state |= ASYNC_OPSTATE_RELEASED ;  
 //      op->unlock();  
    }  
    return ret_msg;  
  
      return op;
 } }
  
   void MessageQueueService::return_op(AsyncOpNode* op)
 void MessageQueueService::SendWait(AsyncRequest *request, unlocked_dq<AsyncMessage> *reply_list)  
 { {
    if (request == 0 || reply_list == 0 )      PEGASUS_ASSERT(op->_state & ASYNC_OPSTATE_RELEASED);
       throw NullPointer();      delete op;
   }
  
    AsyncOpNode *op = request->op;  
  
    if(op == 0 )  Boolean MessageQueueService::SendAsync(
       return;      AsyncOpNode* op,
    //     ATTN: debugging      Uint32 destination,
    op->put_response(0);      void (*callback)(AsyncOpNode*, MessageQueue*, void*),
    if(true == _meta_dispatcher->accept_async(static_cast<Message *>(request)))      MessageQueue* callback_response_q,
       void* callback_ptr)
    {    {
       PEGASUS_ASSERT(op != 0 && callback != 0);
  
       // get the queue handle for the destination
  
       op->_client_sem.wait();  
       op->lock();       op->lock();
       // destination of this message
       op->_op_dest = MessageQueue::lookup(destination);
       op->_flags |= ASYNC_OPFLAGS_CALLBACK;
       op->_flags &= ~(ASYNC_OPFLAGS_FIRE_AND_FORGET);
       // initialize the callback data
       // callback function to be executed by recpt. of response
       op->_async_callback = callback;
       // the op node
       op->_callback_node = op;
       // the queue that will receive the response
       op->_callback_response_q = callback_response_q;
       // user data for callback
       op->_callback_ptr = callback_ptr;
       // I am the originator of this request
       op->_callback_request_q = this;
  
       AsyncMessage *response = static_cast<AsyncMessage *>(op->_response);  
       reply_list->insert_first(response);  
       op->unlock();       op->unlock();
       if (op->_op_dest == 0)
           return false;
   
       return  _meta_dispatcher->route_async(op);
   }
  
   
   Boolean MessageQueueService::SendAsync(
       Message* msg,
       Uint32 destination,
       void (*callback)(Message* response, void* handle, void* parameter),
       void* handle,
       void* parameter)
   {
       if (msg == NULL)
           return false;
       if (callback == NULL)
           return SendForget(msg);
       AsyncOpNode *op = get_op();
       msg->dest = destination;
       if (NULL == (op->_op_dest = MessageQueue::lookup(msg->dest)))
       {
       op->release();       op->release();
           return_op(op);
           return false;
       }
       op->_flags |= ASYNC_OPFLAGS_SAFE_CALLBACK;
       op->_flags &= ~(ASYNC_OPFLAGS_FIRE_AND_FORGET);
       op->_state &= ~ASYNC_OPSTATE_COMPLETE;
       op->__async_callback = callback;
       op->_callback_node = op;
       op->_callback_handle = handle;
       op->_callback_parameter = parameter;
       op->_callback_response_q = this;
  
 //      op->lock();      if (!(msg->getMask() & MessageMask::ha_async))
 //       while( op->_response.count() )      {
 //       {          AsyncLegacyOperationStart *wrapper = new AsyncLegacyOperationStart(
 //       AsyncMessage *rply = static_cast<AsyncMessage *>(op->_response.remove_last());              op,
 //       if (rply != 0 )              destination,
 //       {              msg,
 //          rply->op = 0;              destination);
 //      reply_list->insert_first( static_cast<AsyncMessage *>(op->_response) );  
 //       }  
 //       }  
       // release the opnode, the meta-dispatcher will recycle it for us  
 //      op->_state |= ASYNC_OPSTATE_RELEASED ;  
 //      op->unlock();  
    }    }
    else    else
    {    {
       // manually free the opnode and message          op->_request.reset(msg);
           (static_cast<AsyncMessage *>(msg))->op = op;
       }
       return _meta_dispatcher->route_async(op);
   }
   
   
   Boolean MessageQueueService::SendForget(Message* msg)
   {
       AsyncOpNode* op = 0;
       Uint32 mask = msg->getMask();
   
       if (mask & MessageMask::ha_async)
       {
           op = (static_cast<AsyncMessage *>(msg))->op;
       }
   
       if (op == 0)
       {
           op = get_op();
           op->_request.reset(msg);
           if (mask & MessageMask::ha_async)
           {
               (static_cast<AsyncMessage *>(msg))->op = op;
           }
       }
       op->_op_dest = MessageQueue::lookup(msg->dest);
       op->_flags |= ASYNC_OPFLAGS_FIRE_AND_FORGET;
       op->_flags &= ~(ASYNC_OPFLAGS_CALLBACK | ASYNC_OPFLAGS_SAFE_CALLBACK
           | ASYNC_OPFLAGS_SIMPLE_STATUS);
       op->_state &= ~ASYNC_OPSTATE_COMPLETE;
       if (op->_op_dest == 0)
       {
       op->release();       op->release();
       return_op(op);       return_op(op);
           return false;
    }    }
   
       // now see if the meta dispatcher will take it
       return  _meta_dispatcher->route_async(op);
 } }
  
 // Boolean MessageQueueService::SendAsync(AsyncMessage *msg)  
 // {  
 //    return _meta_dispatcher->accept_async(static_cast<Message *>(msg));  
 // }  
  
   AsyncReply *MessageQueueService::SendWait(AsyncRequest* request)
   {
       if (request == 0)
           return 0;
  
 Boolean MessageQueueService::register_service(String name,      Boolean destroy_op = false;
                                               Uint32 capabilities,  
                                               Uint32 mask)  
  
       if (request->op == 0)
 { {
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();          request->op = get_op();
           request->op->_request.reset(request);
           destroy_op = true;
       }
  
    op->_state |= ASYNC_OPSTATE_UNKNOWN;      request->block = false;
    op->_flags |= ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;      request->op->_flags |= ASYNC_OPFLAGS_PSEUDO_CALLBACK;
       SendAsync(
           request->op,
           request->dest,
           _sendwait_callback,
           this,
           (void *)0);
  
    RegisterCimService *msg = new RegisterCimService(get_next_xid(),      request->op->_client_sem.wait();
                                                     op,  
       AsyncReply* rpl = static_cast<AsyncReply *>(request->op->removeResponse());
       rpl->op = 0;
   
       if (destroy_op == true)
       {
           request->op->lock();
           request->op->_request.release();
           request->op->_state |= ASYNC_OPSTATE_RELEASED;
           request->op->unlock();
           return_op(request->op);
           request->op = 0;
       }
       return rpl;
   }
   
   
   Boolean MessageQueueService::register_service(
       String name,
       Uint32 capabilities,
       Uint32 mask)
   {
       RegisterCimService *msg = new RegisterCimService(
           0,
                                                     true,                                                     true,
                                                     name,                                                     name,
                                                     capabilities,                                                     capabilities,
                                                     mask,                                                     mask,
                                                     _queueId);                                                     _queueId);
       msg->dest = CIMOM_Q_ID;
   
    Boolean registered = false;    Boolean registered = false;
    AsyncMessage *reply = SendWait( msg );      AsyncReply *reply = static_cast<AsyncReply *>(SendWait(msg));
  
    if ( reply != 0 )    if ( reply != 0 )
    {    {
       if(reply->getMask() & message_mask:: ha_async)          if (reply->getMask() & MessageMask::ha_async)
           {
               if (reply->getMask() & MessageMask::ha_reply)
       {       {
          if(reply->getMask() & message_mask::ha_reply)                  if (reply->result == async_results::OK ||
                       reply->result == async_results::MODULE_ALREADY_REGISTERED)
          {          {
             if((static_cast<AsyncReply *>(reply))->result == async_results::OK)  
                registered = true;                registered = true;
             cout << " service registered " << _queueId << endl;                  }
   
          }          }
       }       }
  
       delete reply;       delete reply;
    }    }
       delete msg;
    return registered;    return registered;
 } }
  
 Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask) Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask)
 { {
       UpdateCimService *msg = new UpdateCimService(
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();          0,
    op->_state |= ASYNC_OPSTATE_UNKNOWN;  
    op->_flags |= ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;  
   
    UpdateCimService *msg = new UpdateCimService(get_next_xid(),  
                                                 op,  
                                                 true,                                                 true,
                                                 _queueId,                                                 _queueId,
                                                 _capabilities,                                                 _capabilities,
                                                 _mask);                                                 _mask);
    Boolean registered = false;    Boolean registered = false;
  
   
    AsyncMessage *reply = SendWait(msg);    AsyncMessage *reply = SendWait(msg);
    if (reply)    if (reply)
    {    {
       if(reply->getMask() & message_mask:: ha_async)          if (reply->getMask() & MessageMask::ha_async)
           {
               if (reply->getMask() & MessageMask::ha_reply)
       {       {
          if(reply->getMask() & message_mask::ha_reply)                  if (static_cast<AsyncReply *>(reply)->result ==
                           async_results::OK)
          {          {
             if(static_cast<AsyncReply *>(reply)->result == async_results::OK)  
                registered = true;                registered = true;
          }          }
       }       }
           }
       delete reply;       delete reply;
    }    }
       delete msg;
    return registered;    return registered;
 } }
  
  
 Boolean MessageQueueService::deregister_service(void)  Boolean MessageQueueService::deregister_service()
 { {
       _meta_dispatcher->deregister_module(_queueId);
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();      return true;
    op->_state |= ASYNC_OPSTATE_UNKNOWN;  
    op->_flags |= ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;  
   
    DeRegisterCimService *msg = new DeRegisterCimService(get_next_xid(),  
                                                         op,  
                                                         true,  
                                                         _queueId);  
    Boolean deregistered = false;  
   
   
   
    return _meta_dispatcher->accept_async(static_cast<Message *>(msg));  
 } }
  
  
 void MessageQueueService::find_services(String name,  void MessageQueueService::find_services(
       String name,
                                         Uint32 capabilities,                                         Uint32 capabilities,
                                         Uint32 mask,                                         Uint32 mask,
                                         Array<Uint32> *results)                                         Array<Uint32> *results)
 { {
   
    if( results == 0 )    if( results == 0 )
       {
       throw NullPointer();       throw NullPointer();
       }
  
    AsyncOpNode *op = get_op();  
    results->clear();    results->clear();
  
    FindServiceQueue *req =      FindServiceQueue *req = new FindServiceQueue(
       new FindServiceQueue(get_next_xid(),          0,
                            op,  
                            _queueId,                            _queueId,
                            true,                            true,
                            name,                            name,
                            capabilities,                            capabilities,
                            mask);                            mask);
  
       req->dest = CIMOM_Q_ID;
   
    AsyncMessage *reply = SendWait(req);    AsyncMessage *reply = SendWait(req);
    if(reply)    if(reply)
    {    {
       if( reply->getMask() & message_mask::ha_async)          if (reply->getMask() & MessageMask::ha_async)
       {       {
          if(reply->getMask() & message_mask::ha_reply)              if (reply->getMask() & MessageMask::ha_reply)
          {          {
             if(reply->getType() == async_messages::FIND_SERVICE_Q_RESULT)                  if (reply->getType() == ASYNC_FIND_SERVICE_Q_RESULT)
             {             {
                if( (static_cast<FindServiceQueueResult *>(reply))->result == async_results::OK )                      if ((static_cast<FindServiceQueueResult*>(reply))->result ==
                   *results = (static_cast<FindServiceQueueResult *>(reply))->qids;                              async_results::OK)
                           *results =
                               (static_cast<FindServiceQueueResult*>(reply))->qids;
             }             }
          }          }
       }       }
       delete reply;       delete reply;
    }    }
    return ;      delete req;
 } }
  
 void MessageQueueService::enumerate_service(Uint32 queue, message_module *result)  void MessageQueueService::enumerate_service(
       Uint32 queue,
       message_module* result)
 { {
    if(result == 0)    if(result == 0)
       {
       throw NullPointer();       throw NullPointer();
       }
  
    AsyncOpNode *op = get_op();      EnumerateService *req = new EnumerateService(
           0,
    EnumerateService *req  
       = new EnumerateService(get_next_xid(),  
                              op,  
                              _queueId,                              _queueId,
                              true,                              true,
                              queue);                              queue);
Line 494 
Line 1157 
    {    {
       Boolean found = false;       Boolean found = false;
  
       if( reply->getMask() & message_mask::ha_async)          if (reply->getMask() & MessageMask::ha_async)
       {       {
          if(reply->getMask() & message_mask::ha_reply)              if (reply->getMask() & MessageMask::ha_reply)
          {          {
             if(reply->getType() == async_messages::ENUMERATE_SERVICE_RESULT)                  if (reply->getType() == ASYNC_ENUMERATE_SERVICE_RESULT)
             {             {
                if( (static_cast<EnumerateServiceResponse *>(reply))->result == async_results::OK )                      if ((static_cast<EnumerateServiceResponse*>(reply))->
                               result == async_results::OK)
                {                {
                   if( found == false)                   if( found == false)
                   {                   {
                      found = true;                      found = true;
  
                      result->put_name( (static_cast<EnumerateServiceResponse *>(reply))->name);                              result->put_name((static_cast<
                      result->put_capabilities((static_cast<EnumerateServiceResponse *>(reply))->capabilities);                                  EnumerateServiceResponse*>(reply))->name);
                      result->put_mask((static_cast<EnumerateServiceResponse *>(reply))->mask);                              result->put_capabilities((static_cast<
                      result->put_queue((static_cast<EnumerateServiceResponse *>(reply))->qid);                                  EnumerateServiceResponse*>(reply))->
                                       capabilities);
                               result->put_mask((static_cast<
                                   EnumerateServiceResponse*>(reply))->mask);
                               result->put_queue((static_cast<
                                   EnumerateServiceResponse*>(reply))->qid);
                   }                   }
                }                }
             }             }
Line 517 
Line 1186 
       }       }
       delete reply;       delete reply;
    }    }
    return;      delete req;
 } }
  
 Uint32 MessageQueueService::get_next_xid(void)  MessageQueueService::PollingList* MessageQueueService::_get_polling_list()
 { {
    _xid++;      _polling_list_mutex.lock();
    return _xid.value();  
       if (!_polling_list)
           _polling_list = new PollingList;
   
       _polling_list_mutex.unlock();
   
       return _polling_list;
 } }
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END

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