(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.12 and 1.120

version 1.12, 2002/02/05 04:30:33 version 1.120, 2006/07/11 18:39:28
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 23 
Line 32 
 // Author: Mike Day (mdday@us.ibm.com) // Author: Mike Day (mdday@us.ibm.com)
 // //
 // Modified By: // Modified By:
   //              Amit K Arora, IBM (amita@in.ibm.com) for Bug#1090,#2657
   //              Josephine Eskaline Joyce, IBM (jojustin@in.ibm.com) for Bug#3259
   //              Jim Wunderlich (Jim_Wunderlich@prodigy.net)
 // //
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
   // #include <iostream.h>
 #include "MessageQueueService.h" #include "MessageQueueService.h"
   #include <Pegasus/Common/Tracer.h>
 PEGASUS_USING_STD;  #include <Pegasus/Common/MessageLoader.h> //l10n
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
 MessageQueueService::MessageQueueService(const char *name,  cimom *MessageQueueService::_meta_dispatcher = 0;
   AtomicInt MessageQueueService::_service_count(0);
   IDFactory MessageQueueService::_xidFactory(1);
   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;
   
   PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL
   MessageQueueService::kill_idle_threads(void *parm)
   {
   
      static struct timeval now, last = {0,0};
      gettimeofday(&now, NULL);
      int dead_threads = 0;
   
      if (now.tv_sec - last.tv_sec > 120)
      {
         gettimeofday(&last, NULL);
         try
         {
            dead_threads = MessageQueueService::_thread_pool->cleanupIdleThreads();
         }
         catch(...)
         {
   
         }
      }
   
   #ifdef PEGASUS_POINTER_64BIT
      return (PEGASUS_THREAD_RETURN)(Uint64)dead_threads;
   #elif PEGASUS_PLATFORM_AIX_RS_IBMCXX
      return (PEGASUS_THREAD_RETURN)(unsigned long)dead_threads;
   #else
      return (PEGASUS_THREAD_RETURN)(Uint32)dead_threads;
   #endif
   }
   
   PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::polling_routine(void *parm)
   {
      Thread *myself = reinterpret_cast<Thread *>(parm);
      List<MessageQueueService, RecursiveMutex> *list =
          reinterpret_cast<List<MessageQueueService, RecursiveMutex>*>(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_thread 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--;
                    Logger::put(Logger::STANDARD_LOG, System::CIMSERVER, Logger::TRACE,
                       "Not enough threads to process this request. Skipping.");
   
                    Tracer::trace(TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL2,
                       "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());
   
                    pegasus_yield();
                    service = NULL;
                 }
             }
             if (service != NULL)
             {
                service = list->next_of(service);
             }
         }
         list->unlock();
   
         if (_check_idle_flag.get() != 0)
         {
            _check_idle_flag = 0;
            // try to do idle thread clean up processing when system is not busy
            // if system is busy there may not be a thread available to allocate
            // so nothing will be done and that is OK.
   
            if ( _thread_pool->allocate_and_awaken(service, kill_idle_threads, &_polling_sem) != PEGASUS_THREAD_OK)
            {
                   Logger::put(Logger::STANDARD_LOG, System::CIMSERVER, Logger::TRACE,
                           "Not enough threads to kill idle threads. What an irony.");
   
                   Tracer::trace(TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL2,
                           "Could not allocate thread to kill idle threads." \
                           "Skipping. ");
            }
   
   
         }
      }
      myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );
      return(0);
   }
   
   
   Semaphore MessageQueueService::_polling_sem(0);
   AtomicInt MessageQueueService::_stop_polling(0);
   AtomicInt MessageQueueService::_check_idle_flag(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(0),
      _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;
      }
   
      Tracer::trace(TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL2,
         "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 )
      {
         _stop_polling = 0;
         PEGASUS_ASSERT(_service_count.get() == 0);
         _meta_dispatcher = new cimom();
         if (_meta_dispatcher == NULL)
         {
       throw NullPointer();       throw NullPointer();
    _req_thread.run();        }
         //  _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))
      {
         //l10n
         //throw BindFailedException("MessageQueueService Base Unable to register with  Meta Dispatcher");
         MessageLoaderParms parms("Common.MessageQueueService.UNABLE_TO_REGISTER",
            "MessageQueueService Base Unable to register with  Meta 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();
      }
   
      // Wait until all threads processing the messages
      // for this service have completed.
  
      while (_threads.get() > 0)
      {
         pegasus_yield();
 } }
  
 AtomicInt MessageQueueService::_xid(1);     {
        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;
  
 void MessageQueueService::_shutdown_incoming_queue(void)        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 &e)
       {
         // If the list is closed, there is nothing we can do.
         break;
       }
     }
   }
  
    if (_incoming_queue_shutdown.value() > 0 )  void MessageQueueService::_shutdown_incoming_queue()
   {
      if (_incoming_queue_shutdown.get() > 0)
       return ;       return ;
  
    AsyncIoctl *msg = new AsyncIoctl(get_next_xid(),     AsyncIoctl *msg = new AsyncIoctl(
         get_next_xid(),
                                     0,                                     0,
                                     _queueId,                                     _queueId,
                                     _queueId,                                     _queueId,
Line 83 
Line 369 
                                     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.insert_front(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)  PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(
       void * parm)
   {
       MessageQueueService* service =
               reinterpret_cast<MessageQueueService*>(parm);
       PEGASUS_ASSERT(service != 0);
       try
 { {
    Thread *myself = reinterpret_cast<Thread *>(parm);  
    MessageQueueService *service = reinterpret_cast<MessageQueueService *>(myself->get_parm());  
  
           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_STRING(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::LEVEL2,
               String("Caught exception: \"") + e.getMessage() +
                   "\".  Exiting _req_proc.");
       }
       catch (...)
       {
           PEG_TRACE_STRING(TRC_DISCARDED_DATA, Tracer::LEVEL2,
               "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->get_request();
         if (msg && (msg->getMask() & message_mask::ha_async))
         {
            if (msg->getType() == async_messages::ASYNC_LEGACY_OP_START)
            {
               AsyncLegacyOperationStart *wrapper =
                  static_cast<AsyncLegacyOperationStart *>(msg);
               msg = wrapper->get_action();
               delete wrapper;
            }
            else if (msg->getType() == async_messages::ASYNC_MODULE_OP_START)
            {
               AsyncModuleOperationStart *wrapper =
                  static_cast<AsyncModuleOperationStart *>(msg);
               msg = wrapper->get_action();
               delete wrapper;
            }
            else if (msg->getType() == async_messages::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->get_response();
    return(0);        if (msg && (msg->getMask() & message_mask::ha_async))
         {
            if (msg->getType() == async_messages::ASYNC_LEGACY_OP_RESULT)
            {
               AsyncLegacyOperationResult *wrapper =
                  static_cast<AsyncLegacyOperationResult *>(msg);
               msg = wrapper->get_result();
               delete wrapper;
            }
            else if (msg->getType() == async_messages::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.front();
   
   // 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() & message_mask::ha_async)))
         {
            rq = operation->_request.remove_front() ;
       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 188 
Line 612 
    }    }
 } }
  
 void MessageQueueService::_make_response(AsyncRequest *req, Uint32 code)  
   Boolean MessageQueueService::_enqueueResponse(
      Message* request,
      Message* response)
 { {
    AsyncReply *reply =  
       new AsyncReply(async_messages::REPLY,    STAT_COPYDISPATCHER
                      req->getKey(),  
                      req->getRouting(),     PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
                      0,                      "MessageQueueService::_enqueueResponse");
                      req->op,  
                      code,     if (request->getMask() & message_mask::ha_async)
                      req->resp,     {
                      false);        if (response->getMask() & message_mask::ha_async)
    _completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );        {
            _completeAsyncResponse(static_cast<AsyncRequest *>(request),
                                   static_cast<AsyncReply *>(response),
                                   ASYNC_OPSTATE_COMPLETE, 0);
            PEG_METHOD_EXIT();
            return true;
         }
 } }
  
      if (request->_async != 0)
      {
         Uint32 mask = request->_async->getMask();
         PEGASUS_ASSERT(mask & (message_mask::ha_async | message_mask::ha_request));
  
 void MessageQueueService::_completeAsyncResponse(AsyncRequest *request,        AsyncRequest *async = static_cast<AsyncRequest *>(request->_async);
         AsyncOpNode *op = async->op;
         request->_async = 0;
         // the legacy request is going to be deleted by its handler
         // remove it from the op node
   
         static_cast<AsyncLegacyOperationStart *>(async)->get_action();
   
         AsyncLegacyOperationResult *async_result =
            new AsyncLegacyOperationResult(
               async->getKey(),
               async->getRouting(),
               op,
               response);
         _completeAsyncResponse(
            async,
            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,
                                                 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)
              pegasus_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.front();
      Message *rp = op->_response.front();
    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 245 
Line 739 
  
 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_messages::HEARTBEAT,
                      req->getKey(),                      req->getKey(),
                      req->getRouting(),                      req->getRouting(),
                      0,                      0,
Line 287 
Line 763 
  
 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 = static_cast<MessageQueueService *>(req->op->_service_ptr);
          Thread *myself = req->_myself;  
          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 317 
Line 795 
             AsyncOpNode *operation;             AsyncOpNode *operation;
             try             try
             {             {
                operation = service->_incoming.remove_first();                 operation = service->_incoming.dequeue();
             }             }
             catch(IPCException & )             catch(IPCException & )
             {             {
Line 325 
Line 803 
             }             }
             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.shutdown_queue();
          // exit the thread !  
          myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );  
          return;          return;
       }       }
  
Line 345 
Line 822 
  
 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);
Line 354 
Line 836 
 } }
 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);    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
   
    cout << " service paused " << endl;  
   
 } }
   
 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);    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
   
   
    cout << " service resumed " << endl;  
 } }
  
 void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req) void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req)
Line 391 
Line 871 
  
 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());
            }
  
            result = async_results::OK;
         }
      }
      _make_response(req, result);
 } }
  
 AsyncOpNode *MessageQueueService::get_op(void)  void MessageQueueService::handle_AsyncLegacyOperationResult(AsyncLegacyOperationResult *rep)
   {
      ;
   }
   
   AsyncOpNode *MessageQueueService::get_op()
 { {
    AsyncOpNode *op = new AsyncOpNode();    AsyncOpNode *op = new AsyncOpNode();
  
Line 411 
Line 924 
 } }
  
  
   Boolean MessageQueueService::ForwardOp(
       AsyncOpNode *op,
       Uint32 destination)
   {
      PEGASUS_ASSERT(op != 0);
      op->lock();
      op->_op_dest = MessageQueue::lookup(destination);
      op->_flags |= (ASYNC_OPFLAGS_FIRE_AND_FORGET | ASYNC_OPFLAGS_FORWARD);
      op->_flags &= ~(ASYNC_OPFLAGS_CALLBACK);
      op->unlock();
      if (op->_op_dest == 0)
         return false;
   
      return  _meta_dispatcher->route_async(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();
      op->_op_dest = MessageQueue::lookup(destination); // destination of this message
      op->_flags |= ASYNC_OPFLAGS_CALLBACK;
      op->_flags &= ~(ASYNC_OPFLAGS_FIRE_AND_FORGET);
      // initialize the callback data
      op->_async_callback = callback;   // callback function to be executed by recpt. of response
      op->_callback_node = op;          // the op node
      op->_callback_response_q = callback_response_q;  // the queue that will receive the response
      op->_callback_ptr = callback_ptr;   // user data for callback
      op->_callback_request_q = this;     // I am the originator of this request
   
      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() & message_mask::ha_async))
      {
         AsyncLegacyOperationStart *wrapper = new AsyncLegacyOperationStart(
            get_next_xid(),
            op,
            destination,
            msg,
            destination);
      }
      else
      {
         op->_request.insert_front(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 & message_mask::ha_async)
      {
         op = (static_cast<AsyncMessage *>(msg))->op ;
      }
   
      if (op == 0)
      {
         op = get_op();
         op->_request.insert_front(msg);
         if (mask & message_mask::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 419 
Line 1060 
  
    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.insert_front(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,
    // now see if the meta dispatcher will take it        (void *)0);
  
    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);  
   
    }  
  
    request->op->lock();    request->op->lock();
    AsyncReply * rpl = static_cast<AsyncReply *>(request->op->_response.remove_first());     AsyncReply * rpl = static_cast<AsyncReply *>(request->op->_response.remove_front());
    rpl->op = 0;    rpl->op = 0;
    request->op->unlock();    request->op->unlock();
  
Line 453 
Line 1089 
       request->op->_request.remove(request);       request->op->_request.remove(request);
       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(
         get_next_xid(),
                                                     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 ));
  
Line 483 
Line 1120 
       {       {
          if(reply->getMask() & message_mask::ha_reply)          if(reply->getMask() & message_mask::ha_reply)
          {          {
             if(reply->result == async_results::OK)              if (reply->result == async_results::OK ||
                   reply->result == async_results::MODULE_ALREADY_REGISTERED)
               {
                registered = true;                registered = true;
          }          }
       }       }
         }
  
       delete reply;       delete reply;
    }    }
Line 496 
Line 1136 
  
 Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask) Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask)
 { {
      UpdateCimService *msg = new UpdateCimService(
         get_next_xid(),
    UpdateCimService *msg = new UpdateCimService(get_next_xid(),  
                                                 0,                                                 0,
                                                 true,                                                 true,
                                                 _queueId,                                                 _queueId,
Line 514 
Line 1153 
          if(reply->getMask() & message_mask::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;    delete msg;
Line 524 
Line 1165 
 } }
  
  
 Boolean MessageQueueService::deregister_service(void)  Boolean MessageQueueService::deregister_service()
 { {
  
    _meta_dispatcher->deregister_module(_queueId);    _meta_dispatcher->deregister_module(_queueId);
Line 532 
Line 1173 
 } }
  
  
 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(),        get_next_xid(),
                            0,                            0,
                            _queueId,                            _queueId,
                            true,                            true,
Line 552 
Line 1195 
                            capabilities,                            capabilities,
                            mask);                            mask);
  
      req->dest = CIMOM_Q_ID;
   
    AsyncMessage *reply = SendWait(req);    AsyncMessage *reply = SendWait(req);
    if(reply)    if(reply)
    {    {
Line 575 
Line 1220 
 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(),        get_next_xid(),
                              0,                              0,
                              _queueId,                              _queueId,
                              true,                              true,
Line 618 
Line 1265 
    return;    return;
 } }
  
 Uint32 MessageQueueService::get_next_xid(void)  Uint32 MessageQueueService::get_next_xid()
   {
       return _xidFactory.getID();
   }
   
   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.12  
changed lines
  Added in v.1.120
No CVS admin address has been configured
 Powered by
ViewCVS 0.9.2