(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.10 and 1.138

version 1.10, 2002/02/04 21:03:55 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),
      _pending(true),        _threads(0),
      _incoming(true, 1000),        _incoming(),
      _incoming_queue_shutdown(0),        _incoming_queue_shutdown(0)
      _req_thread(_req_proc, this, false)  
 { {
       _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();      {
    _req_thread.run();          _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++;
   
       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(void)  MessageQueueService::~MessageQueueService()
 { {
    _die = 1;    _die = 1;
    if (_incoming_queue_shutdown.value() == 0 )  
        _incoming.shutdown_queue();  
  
    _req_thread.join();      // 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();
 } }
  
 AtomicInt MessageQueueService::_xid(1);      // Wait until all threads processing the messages
       // for this service have completed.
  
 void MessageQueueService::_shutdown_incoming_queue(void)      while (_threads.get() > 0)
 { {
           Threads::yield();
       }
  
    if (_incoming_queue_shutdown.value() > 0 )      {
           AutoMutex autoMut(_meta_dispatcher_mutex);
           _service_count--;
           if (_service_count.get() == 0)
           {
   
               _stop_polling++;
               _polling_sem.signal();
               if (_polling_thread)
               {
                   _polling_thread->join();
                   delete _polling_thread;
                   _polling_thread = 0;
               }
               _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 ;       return ;
  
    AsyncIoctl *msg = new AsyncIoctl(get_next_xid(),      AsyncIoctl *msg = new AsyncIoctl(
                                     0,                                     0,
                                     _queueId,                                     _queueId,
                                     _queueId,                                     _queueId,
Line 81 
Line 302 
                                     0);                                     0);
  
    msg->op = get_op();    msg->op = get_op();
    msg->op->_request.insert_first(msg);      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;
       }
   }
  
  
    _incoming.insert_last_wait(msg->op);  
    msg->op->_client_sem.wait();  
  
    msg->op->lock();  void MessageQueueService::enqueue(Message* msg)
    AsyncReply * reply = static_cast<AsyncReply *>(msg->op->_response.remove_first());  {
    reply->op = 0;      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE, "MessageQueueService::enqueue()");
    msg->op->unlock();  
    delete reply;  
  
    msg->op->_request.remove(msg);      Base::enqueue(msg);
    msg->op->_state |= ASYNC_OPSTATE_RELEASED;  
    return_op(msg->op);  
  
    msg->op = 0;      PEG_METHOD_EXIT();
    delete msg;  
 } }
  
  
 PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(void * parm)  ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(
       void* parm)
 { {
    Thread *myself = reinterpret_cast<Thread *>(parm);      MessageQueueService* service =
    MessageQueueService *service = reinterpret_cast<MessageQueueService *>(myself->get_parm());          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    // pull messages off the incoming queue and dispatch them. then
    // check pending messages that are non-blocking    // check pending messages that are non-blocking
    AsyncOpNode *operation = 0;    AsyncOpNode *operation = 0;
  
    while ( service->_die.value() == 0 )          // many operations may have been queued.
           do
    {    {
       try       try
       {       {
          operation = service->_incoming.remove_first_wait();                  operation = service->_incoming.dequeue();
       }       }
       catch(ListClosed & )       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;          break;
       }       }
   
       if( operation )       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;
   }
  
          service->_handle_incoming_operation(operation, myself, service);  
   void MessageQueueService::_sendwait_callback(
       AsyncOpNode* op,
       MessageQueue* q,
       void *parm)
   {
       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;
    }    }
  
    myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );          msg = op->removeResponse();
    return(0);          if (msg && (msg->getMask() & MessageMask::ha_async))
           {
               if (msg->getType() == ASYNC_ASYNC_LEGACY_OP_RESULT)
               {
                   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);
       }
 } }
  
  
 void MessageQueueService::_handle_incoming_operation(AsyncOpNode *operation,  void MessageQueueService::_handle_incoming_operation(AsyncOpNode* operation)
                                                      Thread *thread,  
                                                      MessageQueue *queue)  
 { {
    if ( operation != 0 )    if ( operation != 0 )
    {    {
   
   // ATTN: optimization
   // << Tue Feb 19 14:10:38 2002 mdd >>
       operation->lock();       operation->lock();
       Message *rq = operation->_request.next(0);  
           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();       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
           {
       PEGASUS_ASSERT(rq != 0 );       PEGASUS_ASSERT(rq != 0 );
       PEGASUS_ASSERT(rq->getMask() & message_mask::ha_async );              operation->unlock();
       PEGASUS_ASSERT(rq->getMask() & message_mask::ha_request);  
       static_cast<AsyncMessage *>(rq)->_myself = thread;  
       static_cast<AsyncMessage *>(rq)->_service = queue;  
       _handle_async_request(static_cast<AsyncRequest *>(rq));       _handle_async_request(static_cast<AsyncRequest *>(rq));
    }    }
       }
    return;    return;
   
 } }
  
 void MessageQueueService::_handle_async_request(AsyncRequest *req) void MessageQueueService::_handle_async_request(AsyncRequest *req)
Line 163 
Line 523 
    {    {
       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
       {       {
Line 186 
Line 546 
    }    }
 } }
  
 void MessageQueueService::_make_response(AsyncRequest *req, Uint32 code)  
   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());
   
       if (asyncRequest != 0)
 { {
    AsyncReply *reply =          PEGASUS_ASSERT(asyncRequest->getMask() &
       new AsyncReply(async_messages::REPLY,              (MessageMask::ha_async | MessageMask::ha_request));
                      req->getKey(),  
                      req->getRouting(),          AsyncOpNode* op = asyncRequest->op;
                      0,  
                      req->op,          // the legacy request is going to be deleted by its handler
                      code,          // remove it from the op node
                      req->resp,  
                      false);          static_cast<AsyncLegacyOperationStart *>(asyncRequest)->get_action();
    _completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );  
           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)
   {
       cimom::_make_response(req, code);
 } }
  
  
 void MessageQueueService::_completeAsyncResponse(AsyncRequest *request,  void MessageQueueService::_completeAsyncResponse(
       AsyncRequest* request,
                                                 AsyncReply *reply,                                                 AsyncReply *reply,
                                                 Uint32 state,                                                 Uint32 state,
                                                 Uint32 flag)                                                 Uint32 flag)
 { {
    PEGASUS_ASSERT(request != 0  && reply != 0 );      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
           "MessageQueueService::_completeAsyncResponse");
  
    AsyncOpNode *op = request->op;      cimom::_completeAsyncResponse(request, reply, state, flag);
    op->lock();  
    op->_state |= state ;  
    op->_flags |= flag;  
    gettimeofday(&(op->_updated), NULL);  
    if ( false == op->_response.exists(reinterpret_cast<void *>(reply)) )  
       op->_response.insert_last(reply);  
    op->unlock();  
  
    op->_client_sem.signal();      PEG_METHOD_EXIT();
   }
  
  
   void MessageQueueService::_complete_op_node(
       AsyncOpNode* op,
       Uint32 state,
       Uint32 flag,
       Uint32 code)
   {
       cimom::_complete_op_node(op, state, flag, code);
 } }
  
  
   
 Boolean MessageQueueService::accept_async(AsyncOpNode *op) Boolean MessageQueueService::accept_async(AsyncOpNode *op)
 { {
    if (_incoming_queue_shutdown.value() > 0 )      if (_incoming_queue_shutdown.get() > 0)
       return false;       return false;
       if (_polling_thread == NULL)
       {
           _polling_thread = new Thread(
               polling_routine,
               reinterpret_cast<void *>(_get_polling_list()),
               false);
           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();    op->lock();
    Message *rq = op->_request.next(0);      Message *rq = op->_request.get();
       Message *rp = op->_response.get();
    op->unlock();    op->unlock();
  
    if( true == messageOK(rq) &&  _die.value() == 0  )      if ((rq != 0 && (true == messageOK(rq))) ||
           (rp != 0 && (true == messageOK(rp))) && _die.get() == 0)
    {    {
       _incoming.insert_last_wait(op);          _incoming.enqueue_wait(op);
           _polling_sem.signal();
       return true;       return true;
    }    }
    return false;    return false;
Line 243 
Line 671 
  
 Boolean MessageQueueService::messageOK(const Message *msg) Boolean MessageQueueService::messageOK(const Message *msg)
 { {
    if (_incoming_queue_shutdown.value() > 0 )      if (_incoming_queue_shutdown.get() > 0)
       return false;       return false;
   
    if ( msg != 0 )  
    {  
       Uint32 mask = msg->getMask();  
       if ( mask & message_mask::ha_async)  
          if ( mask & message_mask::ha_request)  
             return true;             return true;
    }    }
    return false;  
 }  
   
   
 void MessageQueueService::handleEnqueue(void)  
 {  
    Message *msg = dequeue();  
    if( msg )  
    {  
       delete msg;  
    }  
 }  
  
 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,
Line 285 
Line 693 
  
 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 )    switch( req->ctl )
    {    {
       case AsyncIoctl::IO_CLOSE:       case AsyncIoctl::IO_CLOSE:
       {       {
          // save my bearings              MessageQueueService *service =
          Thread *myself = req->_myself;                  static_cast<MessageQueueService *>(req->op->_service_ptr);
          MessageQueueService *service = static_cast<MessageQueueService *>(req->_service);  
  
          // respond to this message.  #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 do not accept any further messages
  
          // ensure we don't recurse on IO_CLOSE          // ensure we don't recurse on IO_CLOSE
          if( _incoming_queue_shutdown.value() > 0 )              if (_incoming_queue_shutdown.get() > 0)
             break;             break;
  
          // set the closing flag          // set the closing flag
Line 315 
Line 728 
             AsyncOpNode *operation;             AsyncOpNode *operation;
             try             try
             {             {
                operation = service->_incoming.remove_first();                      operation = service->_incoming.dequeue();
             }             }
             catch(IPCException & )             catch(IPCException & )
             {             {
Line 323 
Line 736 
             }             }
             if( operation )             if( operation )
             {             {
                service->_handle_incoming_operation(operation, myself, service);                      operation->_service_ptr = service;
                       service->_handle_incoming_operation(operation);
             }             }
             else             else
                break;                break;
          } // message processing loop          } // message processing loop
  
          // shutdown the AsyncDQueue              // shutdown the AsyncQueue
          service->_incoming.shutdown_queue();              service->_incoming.close();
          // exit the thread !  
          myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );  
          return;          return;
       }       }
  
Line 343 
Line 755 
  
 void MessageQueueService::handle_CimServiceStart(CimServiceStart *req) 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    // clear the stoped bit and update
    _capabilities &= ~(module_capabilities::stopped);      _capabilities &= (~(module_capabilities::stopped));
    _make_response(req, async_results::OK);    _make_response(req, async_results::OK);
    // now tell the meta dispatcher we are stopped    // now tell the meta dispatcher we are stopped
    update_service(_capabilities, _mask);    update_service(_capabilities, _mask);
   
 } }
   
 void MessageQueueService::handle_CimServiceStop(CimServiceStop *req) void MessageQueueService::handle_CimServiceStop(CimServiceStop *req)
 { {
   #ifdef MESSAGEQUEUESERVICE_DEBUG
       PEGASUS_STD(cout) << getQueueName() << "received STOP" << PEGASUS_STD(endl);
   #endif
    // set the stopeed bit and update    // set the stopeed bit and update
    _capabilities |= module_capabilities::stopped;    _capabilities |= module_capabilities::stopped;
    _make_response(req, async_results::CIM_STOPPED);    _make_response(req, async_results::CIM_STOPPED);
    // now tell the meta dispatcher we are stopped    // now tell the meta dispatcher we are stopped
    update_service(_capabilities, _mask);    update_service(_capabilities, _mask);
   
 } }
   
 void MessageQueueService::handle_CimServicePause(CimServicePause *req) void MessageQueueService::handle_CimServicePause(CimServicePause *req)
 { {
    // set the paused bit and update    // set the paused bit and update
    _capabilities |= module_capabilities::stopped;      _capabilities |= module_capabilities::paused;
       update_service(_capabilities, _mask);
    _make_response(req, async_results::CIM_PAUSED);    _make_response(req, async_results::CIM_PAUSED);
    // now tell the meta dispatcher we are stopped    // now tell the meta dispatcher we are stopped
    update_service(_capabilities, _mask);  
 } }
   
 void MessageQueueService::handle_CimServiceResume(CimServiceResume *req) void MessageQueueService::handle_CimServiceResume(CimServiceResume *req)
 { {
    // clear the paused  bit and update    // clear the paused  bit and update
    _capabilities &= ~(module_capabilities::paused);      _capabilities &= (~(module_capabilities::paused));
       update_service(_capabilities, _mask);
    _make_response(req, async_results::OK);    _make_response(req, async_results::OK);
    // now tell the meta dispatcher we are stopped    // now tell the meta dispatcher we are stopped
    update_service(_capabilities, _mask);  
 } }
  
 void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req) void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req)
Line 383 
Line 804 
  
 void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req) void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req)
 { {
   }
   
   
   void MessageQueueService::handle_AsyncLegacyOperationStart(
       AsyncLegacyOperationStart* req)
   {
       // remove the legacy message from the request and enqueue it to its
       // destination
       Uint32 result = async_results::CIM_NAK;
  
       Message* legacy = req->_act;
       if (legacy != 0)
       {
           MessageQueue* queue = MessageQueue::lookup(req->_legacy_destination);
           if (queue != 0)
           {
               if (queue->isAsync() == true)
               {
                   (static_cast<MessageQueueService *>(queue))->handleEnqueue(
                       legacy);
               }
               else
               {
                   // Enqueue the response:
                   queue->enqueue(req->get_action());
 } }
  
 AsyncOpNode *MessageQueueService::get_op(void)              result = async_results::OK;
           }
       }
       _make_response(req, result);
   }
   
   void MessageQueueService::handle_AsyncLegacyOperationResult(
       AsyncLegacyOperationResult* rep)
   {
   }
   
   AsyncOpNode* MessageQueueService::get_op()
 { {
    AsyncOpNode *op = new AsyncOpNode();    AsyncOpNode *op = new AsyncOpNode();
  
Line 398 
Line 854 
  
 void MessageQueueService::return_op(AsyncOpNode *op) void MessageQueueService::return_op(AsyncOpNode *op)
 { {
    PEGASUS_ASSERT(op->read_state() & ASYNC_OPSTATE_RELEASED );      PEGASUS_ASSERT(op->_state & ASYNC_OPSTATE_RELEASED);
    delete op;    delete op;
 } }
  
  
   Boolean MessageQueueService::SendAsync(
       AsyncOpNode* op,
       Uint32 destination,
       void (*callback)(AsyncOpNode*, MessageQueue*, void*),
       MessageQueue* callback_response_q,
       void* callback_ptr)
   {
       PEGASUS_ASSERT(op != 0 && callback != 0);
   
       // get the queue handle for the destination
   
       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;
   
       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();
           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;
   
       if (!(msg->getMask() & MessageMask::ha_async))
       {
           AsyncLegacyOperationStart *wrapper = new AsyncLegacyOperationStart(
               op,
               destination,
               msg,
               destination);
       }
       else
       {
           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();
           return_op(op);
           return false;
       }
   
       // now see if the meta dispatcher will take it
       return  _meta_dispatcher->route_async(op);
   }
   
  
 AsyncReply *MessageQueueService::SendWait(AsyncRequest *request) AsyncReply *MessageQueueService::SendWait(AsyncRequest *request)
 { {
Line 411 
Line 983 
  
    Boolean destroy_op = false;    Boolean destroy_op = false;
  
    if (request->op == false)      if (request->op == 0)
    {    {
       request->op = get_op();       request->op = get_op();
       request->op->_request.insert_first(request);          request->op->_request.reset(request);
       destroy_op = true;       destroy_op = true;
    }    }
  
    request->block = true;      request->block = false;
    request->op->_state &= ~ASYNC_OPSTATE_COMPLETE;      request->op->_flags |= ASYNC_OPFLAGS_PSEUDO_CALLBACK;
    request->op->put_response(0);      SendAsync(
           request->op,
    // first link it on our pending list          request->dest,
    // _pending.insert_last_wait(request->op);          _sendwait_callback,
           this,
           (void *)0);
  
    // now see if the meta dispatcher will take it  
   
    if (true == _meta_dispatcher->route_async(request->op))  
    {  
       request->op->_client_sem.wait();       request->op->_client_sem.wait();
       PEGASUS_ASSERT(request->op->_state & ASYNC_OPSTATE_COMPLETE);  
  
    }      AsyncReply* rpl = static_cast<AsyncReply *>(request->op->removeResponse());
   
    request->op->lock();  
    AsyncReply * rpl = static_cast<AsyncReply *>(request->op->_response.remove_first());  
    rpl->op = 0;    rpl->op = 0;
    request->op->unlock();  
  
    if( destroy_op == true)    if( destroy_op == true)
    {    {
       request->op->lock();       request->op->lock();
       request->op->_request.remove(request);          request->op->_request.release();
       request->op->_state |= ASYNC_OPSTATE_RELEASED;       request->op->_state |= ASYNC_OPSTATE_RELEASED;
       request->op->unlock();       request->op->unlock();
   
       return_op(request->op);       return_op(request->op);
       request->op = 0;       request->op = 0;
    }    }
   
    return rpl;    return rpl;
 } }
  
  
 Boolean MessageQueueService::register_service(String name,  Boolean MessageQueueService::register_service(
       String name,
                                               Uint32 capabilities,                                               Uint32 capabilities,
                                               Uint32 mask)                                               Uint32 mask)
   
 { {
    RegisterCimService *msg = new RegisterCimService(get_next_xid(),      RegisterCimService *msg = new RegisterCimService(
                                                     0,                                                     0,
                                                     true,                                                     true,
                                                     name,                                                     name,
                                                     capabilities,                                                     capabilities,
                                                     mask,                                                     mask,
                                                     _queueId);                                                     _queueId);
       msg->dest = CIMOM_Q_ID;
   
    Boolean registered = false;    Boolean registered = false;
    AsyncReply *reply = static_cast<AsyncReply *>(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(reply->result == async_results::OK)  
                registered = true;                registered = true;
          }          }
       }       }
           }
  
       delete reply;       delete reply;
    }    }
Line 488 
Line 1056 
  
 Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask) Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask)
 { {
       UpdateCimService *msg = new UpdateCimService(
   
    UpdateCimService *msg = new UpdateCimService(get_next_xid(),  
                                                 0,                                                 0,
                                                 true,                                                 true,
                                                 _queueId,                                                 _queueId,
Line 501 
Line 1067 
    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() & message_mask::ha_reply)              if (reply->getMask() & MessageMask::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;    delete msg;
Line 516 
Line 1085 
 } }
  
  
 Boolean MessageQueueService::deregister_service(void)  Boolean MessageQueueService::deregister_service()
 { {
   
    _meta_dispatcher->deregister_module(_queueId);    _meta_dispatcher->deregister_module(_queueId);
    return true;    return true;
 } }
  
  
 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();
       }
  
    results->clear();    results->clear();
  
    FindServiceQueue *req =      FindServiceQueue *req = new FindServiceQueue(
       new FindServiceQueue(get_next_xid(),  
                            0,                            0,
                            _queueId,                            _queueId,
                            true,                            true,
Line 544 
Line 1113 
                            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;
    }    }
    delete req;    delete req;
    return ;  
 } }
  
 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();
       }
  
    EnumerateService *req      EnumerateService *req = new EnumerateService(
       = new EnumerateService(get_next_xid(),  
                              0,                              0,
                              _queueId,                              _queueId,
                              true,                              true,
Line 582 
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 606 
Line 1187 
       delete reply;       delete reply;
    }    }
    delete req;    delete req;
   
    return;  
 } }
  
 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.10  
changed lines
  Added in v.1.138
No CVS admin address has been configured
 Powered by
ViewCVS 0.9.2