(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.3 and 1.88.2.6

version 1.3, 2002/01/19 01:53:22 version 1.88.2.6, 2005/08/23 22:34:37
Line 1 
Line 1 
 //%////-*-c++-*-////////////////////////////////////////////////////////////////  //%2005////////////////////////////////////////////////////////////////////////
 // //
 // 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.
 // //
 // 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 30 
 // 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
 // //
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
 #include "MessageQueueService.h" #include "MessageQueueService.h"
   #include <Pegasus/Common/Tracer.h>
   #include <Pegasus/Common/MessageLoader.h> //l10n
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
   
   cimom *MessageQueueService::_meta_dispatcher = 0;
   AtomicInt MessageQueueService::_service_count = 0;
   AtomicInt MessageQueueService::_xid(1);
   Mutex MessageQueueService::_meta_dispatcher_mutex;
   
   static struct timeval create_time = {0, 1};
   static struct timeval destroy_time = {300, 0};
   static struct timeval deadlock_time = {0, 0};
   
   ThreadPool *MessageQueueService::_thread_pool = 0;
   
   DQueue<MessageQueueService> MessageQueueService::_polling_list(true);
   
   Thread* MessageQueueService::_polling_thread = 0;
   
   ThreadPool *MessageQueueService::get_thread_pool(void)
   {
      return _thread_pool;
   }
   
   //
   // MAX_THREADS_PER_SVC_QUEUE_LIMIT
   //
   // JR Wunderlich Jun 6, 2005
   //
   
   #define MAX_THREADS_PER_SVC_QUEUE_LIMIT 5000
   #define MAX_THREADS_PER_SVC_QUEUE_DEFAULT 5
   
   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->kill_dead_threads();
         }
         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
   }
   
   
   void MessageQueueService::force_shutdown(Boolean destroy_flag)
   {
      return;
   
   #ifdef MESSAGEQUEUESERVICE_DEBUG
           //l10n
      MessageLoaderParms parms("Common.MessageQueueService.FORCING_SHUTDOWN",
                               "Forcing shutdown of CIMOM Message Router");
      PEGASUS_STD(cout) << MessageLoader::getMessage(parms) << PEGASUS_STD(endl);
   #endif
   
   
      MessageQueueService *svc;
      int counter = 0;
      _polling_list.lock();
      svc = _polling_list.next(0);
   
      while(svc != 0)
      {
   #ifdef MESSAGEQUEUESERVICE_DEBUG
                   //l10n - reuse same MessageLoaderParms to avoid multiple creates
           parms.msg_id = "Common.MessageQueueService.STOPPING_SERVICE";
                   parms.default_msg = "Stopping $0";
                   parms.arg0 = svc->getQueueName();
                   PEGASUS_STD(cout) << MessageLoader::getMessage(parms) << PEGASUS_STD(endl);
   #endif
   
         _polling_sem.signal();
         svc->_shutdown_incoming_queue();
         counter++;
         _polling_sem.signal();
         svc = _polling_list.next(svc);
      }
      _polling_list.unlock();
   
      _polling_sem.signal();
   
      MessageQueueService::_stop_polling = 1;
   
      if(destroy_flag == true)
      {
   
         svc = _polling_list.remove_last();
         while(svc)
         {
            delete svc;
            svc = _polling_list.remove_last();
         }
   
      }
   }
   
   
   PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::polling_routine(void *parm)
   {
      Thread *myself = reinterpret_cast<Thread *>(parm);
      DQueue<MessageQueueService> *list = reinterpret_cast<DQueue<MessageQueueService> *>(myself->get_parm());
      while ( _stop_polling.value()  == 0 )
      {
         _polling_sem.wait();
         if(_stop_polling.value() != 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->next(0);
         ThreadStatus rtn = PEGASUS_THREAD_OK;
         while (service != NULL)
         {
             if ((service->_incoming.count() > 0) &&
                 (service->_die.value() == 0) &&
                 (service->_threads < 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.value());
   
                    pegasus_yield();
                    service = NULL;
                 }
             }
             if (service != NULL)
             {
                service = list->next(service);
             }
         }
         list->unlock();
   
         if(_check_idle_flag.value() != 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, MessageQueueService::MessageQueueService(const char *name,
                                          Uint32 queueID,                                          Uint32 queueID,
                                          Uint32 capabilities,                                          Uint32 capabilities,
                                          Uint32 mask)                                          Uint32 mask)
    : Base(name, true,  queueID),    : Base(name, true,  queueID),
      _capabilities(capabilities),  
      _mask(mask),      _mask(mask),
      _die(0)       _die(0),
        _threads(0),
        _incoming(true, 0),
        _callback(true),
        _incoming_queue_shutdown(0),
        _callback_ready(0),
        _req_thread(_req_proc, this, false),
        _callback_thread(_callback_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 threads gt MAX_THREADS_PER_SVC_QUEUE_LIMIT
      // then set to MAX_THREADS_PER_SVC_QUEUE_LIMIT
   
      if (max_threads_per_svc_queue > MAX_THREADS_PER_SVC_QUEUE_LIMIT)
      {
         max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE_LIMIT;
      }
   
      // if requested threads eq 0 (unlimited)
      // then set to MAX_THREADS_PER_SVC_QUEUE_LIMIT
   
      if (max_threads_per_svc_queue == 0)
      {
         max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE_DEFAULT;
      }
   
      // cout << "MAX_THREADS_PER_SVC_QUEUE = " << MAX_THREADS_PER_SVC_QUEUE << endl;
      // cout << "max_threads_per_svc_queue set to = " << max_threads_per_svc_queue << endl;
   
      AutoMutex autoMut(_meta_dispatcher_mutex);
   
    if(_meta_dispatcher == 0 )    if(_meta_dispatcher == 0 )
      {
         _stop_polling = 0;
         PEGASUS_ASSERT( _service_count.value() == 0 );
         _meta_dispatcher = new cimom();
         if (_meta_dispatcher == NULL )
         {
       throw NullPointer();       throw NullPointer();
 } }
         _thread_pool = new ThreadPool(0, "MessageQueueService", 0, 0,
                                       create_time, destroy_time, deadlock_time);
   
         _polling_thread = new Thread(polling_routine,
                                      reinterpret_cast<void *>(&_polling_list),
                                      false);
         while (!_polling_thread->run())
         {
            pegasus_yield();
         }
      }
      _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);
      }
   
      _polling_list.insert_last(this);
   
   //   _meta_dispatcher_mutex.unlock();  //Bug#1090
   //   _callback_thread.run();
   
   //   _req_thread.run();
   }
   
  
 MessageQueueService::~MessageQueueService(void) MessageQueueService::~MessageQueueService(void)
 { {
    _die = 1;    _die = 1;
  
      // The polling_routine locks the _polling_list while
      // processing the incoming messages for services on the
      // list.  Deleting the service from the _polling_list
      // prior to processing, avoids synchronization issues
      // with the _polling_routine.
   
      _polling_list.remove(this);
   
      _callback_ready.signal();
   
      // ATTN: The code for closing the _incoming queue
      // is not working correctly. In OpenPegasus 2.4,
      // execution of the following code is very timing
      // dependent. This needs to be fix.
      // See Bug 4079 for details.
      if (_incoming_queue_shutdown.value() == 0)
      {
          _shutdown_incoming_queue();
 } }
  
      // Wait until all threads processing the messages
      // for this service have completed.
  
 AtomicInt MessageQueueService::_xid(1);     while (_threads.value() > 0)
      {
         pegasus_yield();
      }
  
 // mutex is UNLOCKED  
 void MessageQueueService::handleEnqueue(void)  
 { {
    Message *msg = dequeue();       AutoMutex autoMut(_meta_dispatcher_mutex);
    if( msg )       _service_count--;
        if (_service_count.value() == 0 )
    {    {
       if(msg->getMask() & message_mask::ha_async)  
         _stop_polling++;
         _polling_sem.signal();
         _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
       {       {
          _handle_async_msg(static_cast<AsyncMessage *>(msg));            delete _incoming.remove_first();
       }       }
       else         catch (const ListClosed &e)
          {
             // If the list is closed, there is nothing we can do.
             break;
          }
      }
   }
   
   void MessageQueueService::_shutdown_incoming_queue(void)
   {
   
   
      if (_incoming_queue_shutdown.value() > 0 )
         return ;
      AsyncIoctl *msg = new AsyncIoctl(get_next_xid(),
                                       0,
                                       _queueId,
                                       _queueId,
                                       true,
                                       AsyncIoctl::IO_CLOSE,
                                       0,
                                       0);
   
      msg->op = get_op();
      msg->op->_flags |= ASYNC_OPFLAGS_FIRE_AND_FORGET;
      msg->op->_flags &= ~(ASYNC_OPFLAGS_CALLBACK | ASYNC_OPFLAGS_SAFE_CALLBACK
                      | ASYNC_OPFLAGS_SIMPLE_STATUS);
      msg->op->_state &= ~ASYNC_OPSTATE_COMPLETE;
   
      msg->op->_op_dest = this;
      msg->op->_request.insert_first(msg);
   
      try
      {
          _incoming.insert_last_wait(msg->op);
          _polling_sem.signal();
      }
      catch (const ListClosed &)
      {
          // This means the queue has already been shut-down (happens  when there
          // are two AsyncIoctrl::IO_CLOSE messages generated and one got first
          // processed.
          delete msg;
      }
      catch (const Permission &)
      {
          delete msg;          delete msg;
    }    }
 } }
  
  
 void MessageQueueService::_enqueueAsyncResponse(AsyncRequest *request,  
                                                 AsyncReply *reply,  void MessageQueueService::enqueue(Message *msg)
                                                 Uint32 state,  
                                                 Uint32 flag)  
 { {
    PEGASUS_ASSERT(request != 0  && reply != 0 );     PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE, "MessageQueueService::enqueue()");
  
    AsyncOpNode *op = request->op;     Base::enqueue(msg);
    op->lock();  
 //   if (false == op->_response.exists(reply))     PEG_METHOD_EXIT();
 //      op->_response.insert_last(reply);  }
    op->_response = reply;  
   
    op->_state |= state ;  PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::_callback_proc(void *parm)
    op->_flags |= flag;  {
    gettimeofday(&(op->_updated), NULL);     Thread *myself = reinterpret_cast<Thread *>(parm);
    op->unlock();     MessageQueueService *service = reinterpret_cast<MessageQueueService *>(myself->get_parm());
      AsyncOpNode *operation = 0;
   
      while ( service->_die.value() == 0 )
      {
         service->_callback_ready.wait();
   
         service->_callback.lock();
         operation = service->_callback.next(0);
         while( operation != NULL)
         {
            if( ASYNC_OPSTATE_COMPLETE & operation->read_state())
            {
               operation = service->_callback.remove_no_lock(operation);
               PEGASUS_ASSERT(operation != NULL);
               operation->_thread_ptr = myself;
               operation->_service_ptr = service;
               service->_handle_async_callback(operation);
               break;
            }
            operation = service->_callback.next(operation);
         }
         service->_callback.unlock();
      }
      myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );
      return(0);
   }
   
   
   PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(void * parm)
   {
      MessageQueueService *service = reinterpret_cast<MessageQueueService *>(parm);
      // pull messages off the incoming queue and dispatch them. then
      // check pending messages that are non-blocking
      AsyncOpNode *operation = 0;
   
      if ( service->_die.value() == 0 )
       {
            try
            {
               operation = service->_incoming.remove_first();
            }
            catch(ListClosed & )
            {
               operation = 0;
               service->_threads--;
               return(0);
            }
            if( operation )
            {
               operation->_service_ptr = service;
               service->_handle_incoming_operation(operation);
            }
       }
      service->_threads--;
      return(0);
   }
   
   Uint32 MessageQueueService::get_pending_callback_count(void)
   {
      return _callback.count();
   }
   
   
   
   void MessageQueueService::_sendwait_callback(AsyncOpNode *op,
                                                MessageQueue *q,
                                                void *parm)
   {
    op->_client_sem.signal();    op->_client_sem.signal();
   }
   
  
   // callback function is responsible for cleaning up all resources
   // including op, op->_callback_node, and op->_callback_ptr
   void MessageQueueService::_handle_async_callback(AsyncOpNode *op)
   {
      if( op->_flags & ASYNC_OPFLAGS_SAFE_CALLBACK )
      {
   
         Message *msg = op->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;
 } }
  
 // may be overriden by derived classes        msg = op->get_response();
 void MessageQueueService::_handle_async_msg(AsyncMessage *msg)        if( msg && ( msg->getMask() & message_mask::ha_async))
 { {
    if( msg == 0 )           if(msg->getType() == async_messages::ASYNC_LEGACY_OP_RESULT )
       return;           {
               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);
      }
   }
  
    Uint32 mask = msg->getMask();  
    Uint32 type = msg->getType();  
  
    if (mask & message_mask::ha_async)  void MessageQueueService::_handle_incoming_operation(AsyncOpNode *operation)
   //                                                   Thread *thread,
   //                                                   MessageQueue *queue)
    {    {
       if (mask & message_mask::ha_request)     if ( operation != 0 )
          _handle_async_request(static_cast<AsyncRequest *>(msg));     {
       else  
          _handle_async_reply(static_cast<AsyncReply *>(msg));  // ATTN: optimization
   // << Tue Feb 19 14:10:38 2002 mdd >>
         operation->lock();
   
         Message *rq = operation->_request.next(0);
   
   // 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_first() ;
            operation->unlock();
            // delete the op node
            operation->release();
            return_op( operation);
   
            handleEnqueue(rq);
            return;
         }
   
         if ( (operation->_flags & ASYNC_OPFLAGS_CALLBACK ||
               operation->_flags & ASYNC_OPFLAGS_SAFE_CALLBACK) &&
              (operation->_state & ASYNC_OPSTATE_COMPLETE))
         {
   
            operation->unlock();
            _handle_async_callback(operation);
    }    }
    else    else
       delete msg;        {
            PEGASUS_ASSERT(rq != 0 );
            operation->unlock();
            _handle_async_request(static_cast<AsyncRequest *>(rq));
         }
      }
      return;
 } }
  
 void MessageQueueService::_handle_async_request(AsyncRequest *req) void MessageQueueService::_handle_async_request(AsyncRequest *req)
 { {
      if ( req != 0 )
      {
    req->op->processing();    req->op->processing();
  
    Uint32 type = req->getType();    Uint32 type = req->getType();
Line 136 
Line 688 
       // we don't handle this request message       // we don't handle this request message
       _make_response(req, async_results::CIM_NAK );       _make_response(req, async_results::CIM_NAK );
    }    }
      }
   }
   
  
   Boolean MessageQueueService::_enqueueResponse(
      Message* request,
      Message* response)
   
   {
      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
                       "MessageQueueService::_enqueueResponse");
   
      if( request->getMask() & message_mask::ha_async)
      {
         if (response->getMask() & message_mask::ha_async )
         {
            _completeAsyncResponse(static_cast<AsyncRequest *>(request),
                                   static_cast<AsyncReply *>(response),
                                   ASYNC_OPSTATE_COMPLETE, 0 );
            PEG_METHOD_EXIT();
            return true;
         }
 } }
  
 void MessageQueueService::_handle_async_reply(AsyncReply *rep)     if(request->_async != 0 )
 { {
         Uint32 mask = request->_async->getMask();
         PEGASUS_ASSERT(mask & (message_mask::ha_async | message_mask::ha_request ));
  
    if (rep->op != 0 )        AsyncRequest *async = static_cast<AsyncRequest *>(request->_async);
       rep->op->processing();        AsyncOpNode *op = async->op;
         request->_async = 0;
         // the legacy request is going to be deleted by its handler
         // remove it from the op node
  
    Uint32 type = rep->getType();        static_cast<AsyncLegacyOperationStart *>(async)->get_action();
  
    if ( type == async_messages::ASYNC_OP_RESULT )  
       handle_AsyncOperationResult(static_cast<AsyncOperationResult *>(rep));        AsyncLegacyOperationResult *async_result =
    else           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)
    {    {
       // we don't handle this reply     cimom::_make_response(req, code);
       ;  
    }    }
  
    if( rep->op != 0 )  
       rep->op->release();  void MessageQueueService::_completeAsyncResponse(AsyncRequest *request,
                                                   AsyncReply *reply,
                                                   Uint32 state,
                                                   Uint32 flag)
   {
      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
                       "MessageQueueService::_completeAsyncResponse");
   
      cimom::_completeAsyncResponse(request, reply, state, flag);
   
      PEG_METHOD_EXIT();
 } }
  
 void MessageQueueService::_make_response(AsyncRequest *req, Uint32 code)  
   void MessageQueueService::_complete_op_node(AsyncOpNode *op,
                                               Uint32 state,
                                               Uint32 flag,
                                               Uint32 code)
 { {
    AsyncReply *reply =     cimom::_complete_op_node(op, state, flag, code);
       new AsyncReply(async_messages::REPLY,  
                      req->getKey(),  
                      req->getRouting(),  
                      0,  
                      req->op,  
                      code,  
                      req->resp,  
                      false);  
    _enqueueAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );  
 } }
  
  
   Boolean MessageQueueService::accept_async(AsyncOpNode *op)
   {
      if (_incoming_queue_shutdown.value() > 0 )
         return true;
   
   // ATTN optimization remove the message checking altogether in the base
   // << Mon Feb 18 14:02:20 2002 mdd >>
      op->lock();
      Message *rq = op->_request.next(0);
      Message *rp = op->_response.next(0);
      op->unlock();
   
      if(  (rq != 0 && (true == messageOK(rq))) || (rp != 0 && ( true == messageOK(rp) )) &&
           _die.value() == 0  )
      {
         _incoming.insert_last_wait(op);
         _polling_sem.signal();
         return true;
      }
      return false;
   }
   
   Boolean MessageQueueService::messageOK(const Message *msg)
   {
      if (_incoming_queue_shutdown.value() > 0 )
         return false;
      return true;
   }
   
 void MessageQueueService::handle_heartbeat_request(AsyncRequest *req) void MessageQueueService::handle_heartbeat_request(AsyncRequest *req)
 { {
    // default action is to echo a heartbeat response    // default action is to echo a heartbeat response
Line 187 
Line 817 
                      async_results::OK,                      async_results::OK,
                      req->resp,                      req->resp,
                      false);                      false);
    _enqueueAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );     _completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );
   
 } }
  
  
Line 199 
Line 828 
  
 void MessageQueueService::handle_AsyncIoctl(AsyncIoctl *req) void MessageQueueService::handle_AsyncIoctl(AsyncIoctl *req)
 { {
   
      switch( req->ctl )
      {
         case AsyncIoctl::IO_CLOSE:
         {
   
            MessageQueueService *service = static_cast<MessageQueueService *>(req->op->_service_ptr);
   
   #ifdef MESSAGEQUEUESERVICE_DEBUG
            PEGASUS_STD(cout) << service->getQueueName() << " Received AsyncIoctl::IO_CLOSE " << PEGASUS_STD(endl);
   #endif
   
            // respond to this message. this is fire and forget, so we don't need to delete anything.
            // this takes care of two problems that were being found
            // << Thu Oct  9 10:52:48 2003 mdd >>
    _make_response(req, async_results::OK);    _make_response(req, async_results::OK);
            // ensure we do not accept any further messages
   
            // ensure we don't recurse on IO_CLOSE
            if( _incoming_queue_shutdown.value() > 0 )
               break;
   
            // set the closing flag
            service->_incoming_queue_shutdown = 1;
            // empty out the queue
            while( 1 )
            {
               AsyncOpNode *operation;
               try
               {
                  operation = service->_incoming.remove_first();
 } }
 void MessageQueueService::handle_CimServiceStart(CimServiceStart *req)              catch(IPCException & )
 { {
                  break;
               }
               if( operation )
               {
                  operation->_service_ptr = service;
                  service->_handle_incoming_operation(operation);
               }
               else
                  break;
            } // message processing loop
   
            // shutdown the AsyncDQueue
            service->_incoming.shutdown_queue();
            return;
         }
   
         default:
    _make_response(req, async_results::CIM_NAK);    _make_response(req, async_results::CIM_NAK);
 } }
   }
   
   void MessageQueueService::handle_CimServiceStart(CimServiceStart *req)
   {
   
   #ifdef MESSAGEQUEUESERVICE_DEBUG
      PEGASUS_STD(cout) << getQueueName() << "received START" << PEGASUS_STD(endl);
   #endif
   
      // clear the stoped bit and update
      _capabilities &= (~(module_capabilities::stopped));
      _make_response(req, async_results::OK);
      // now tell the meta dispatcher we are stopped
      update_service(_capabilities, _mask);
   
   }
 void MessageQueueService::handle_CimServiceStop(CimServiceStop *req) void MessageQueueService::handle_CimServiceStop(CimServiceStop *req)
 { {
    _make_response(req, async_results::CIM_NAK);  #ifdef MESSAGEQUEUESERVICE_DEBUG
      PEGASUS_STD(cout) << getQueueName() << "received STOP" << PEGASUS_STD(endl);
   #endif
      // set the stopeed bit and update
      _capabilities |= module_capabilities::stopped;
      _make_response(req, async_results::CIM_STOPPED);
      // now tell the meta dispatcher we are stopped
      update_service(_capabilities, _mask);
   
 } }
 void MessageQueueService::handle_CimServicePause(CimServicePause *req) void MessageQueueService::handle_CimServicePause(CimServicePause *req)
 { {
    _make_response(req, async_results::CIM_NAK);     // set the paused bit and update
      _capabilities |= module_capabilities::paused;
      update_service(_capabilities, _mask);
      _make_response(req, async_results::CIM_PAUSED);
      // now tell the meta dispatcher we are stopped
 } }
 void MessageQueueService::handle_CimServiceResume(CimServiceResume *req) void MessageQueueService::handle_CimServiceResume(CimServiceResume *req)
 { {
    _make_response(req, async_results::CIM_NAK);     // clear the paused  bit and update
      _capabilities &= (~(module_capabilities::paused));
      update_service(_capabilities, _mask);
      _make_response(req, async_results::OK);
      // now tell the meta dispatcher we are stopped
 } }
  
 void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req) void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req)
 { {
    _make_response(req, async_results::CIM_NAK);    _make_response(req, async_results::CIM_NAK);
   
 } }
  
 void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req) void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req)
Line 229 
Line 936 
    ;    ;
 } }
  
 AsyncOpNode *MessageQueueService::get_op(void)  
 {  
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();  
    if(op == 0 )  
       throw NullPointer();  
  
    op->write_state(ASYNC_OPSTATE_UNKNOWN);  void MessageQueueService::handle_AsyncLegacyOperationStart(AsyncLegacyOperationStart *req)
    op->write_flags(ASYNC_OPFLAGS_SINGLE |  
                    ASYNC_OPFLAGS_NORMAL |  
                    ASYNC_OPFLAGS_META_DISPATCHER);  
    return op;  
 }  
   
 void MessageQueueService::return_op(AsyncOpNode *op)  
 { {
    PEGASUS_ASSERT(op->read_state() & ASYNC_OPSTATE_RELEASED );     // remove the legacy message from the request and enqueue it to its destination
      Uint32 result = async_results::CIM_NAK;
  
    if(op->read_state() & ASYNC_OPFLAGS_META_DISPATCHER )     Message *legacy = req->_act;
      if ( legacy != 0 )
      {
         MessageQueue* queue = MessageQueue::lookup(req->_legacy_destination);
         if( queue != 0 )
    {    {
       _meta_dispatcher->cache_op(op);           if(queue->isAsync() == true )
            {
               (static_cast<MessageQueueService *>(queue))->handleEnqueue(legacy);
    }    }
    else    else
       delete op;           {
               // Enqueue the response:
               queue->enqueue(req->get_action());
 } }
  
 AsyncMessage *MessageQueueService::SendWait(AsyncRequest *request)           result = async_results::OK;
 {        }
    if (request == 0 )     }
       throw NullPointer();     _make_response(req, result);
    AsyncMessage *ret_msg = 0;  }
  
    AsyncOpNode *op = request->op;  void MessageQueueService::handle_AsyncLegacyOperationResult(AsyncLegacyOperationResult *rep)
   {
      ;
   }
  
    if(op == 0 )  AsyncOpNode *MessageQueueService::get_op(void)
       return 0;  
    //     ATTN: debugging  
    op->put_response(0);  
    if(true == _meta_dispatcher->accept_async(static_cast<Message *>(request)))  
    {    {
       op->_client_sem.wait();     AsyncOpNode *op = new AsyncOpNode();
       ret_msg = static_cast<AsyncMessage *>(op->_response);  
       op->_response = 0;  
  
      op->_state = ASYNC_OPSTATE_UNKNOWN;
      op->_flags = ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;
  
 //      op->lock();     return op;
 //       while( op->_response.count() )  
 //       {  
 //       AsyncMessage *rply = static_cast<AsyncMessage *>(op->_response.remove_last());  
 //       if (rply != 0 )  
 //       {  
 //          rply->op = 0;  
 //      reply_list->insert_first( static_cast<AsyncMessage *>(op->_response) );  
 //       }  
 //       }  
       // release the opnode, the meta-dispatcher will recycle it for us  
 //      op->_state |= ASYNC_OPSTATE_RELEASED ;  
 //      op->unlock();  
    }    }
    return ret_msg;  
  
   void MessageQueueService::return_op(AsyncOpNode *op)
   {
      PEGASUS_ASSERT(op->read_state() & ASYNC_OPSTATE_RELEASED );
      delete op;
 } }
  
  
 void MessageQueueService::SendWait(AsyncRequest *request, unlocked_dq<AsyncMessage> *reply_list)  Boolean MessageQueueService::ForwardOp(AsyncOpNode *op,
                                          Uint32 destination)
 { {
    if (request == 0 || reply_list == 0 )     PEGASUS_ASSERT(op != 0 );
       throw NullPointer();     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;
  
    AsyncOpNode *op = request->op;     return  _meta_dispatcher->route_async(op);
   }
  
    if(op == 0 )  
       return;  Boolean MessageQueueService::SendAsync(AsyncOpNode *op,
    //     ATTN: debugging                                         Uint32 destination,
    op->put_response(0);                                         void (*callback)(AsyncOpNode *,
    if(true == _meta_dispatcher->accept_async(static_cast<Message *>(request)))                                                          MessageQueue *,
                                                           void *),
                                          MessageQueue *callback_response_q,
                                          void *callback_ptr)
    {    {
      PEGASUS_ASSERT(op != 0 && callback != 0 );
  
      // get the queue handle for the destination
  
       op->_client_sem.wait();  
       op->lock();       op->lock();
      op->_op_dest = MessageQueue::lookup(destination); // destination of this message
      op->_flags |= ASYNC_OPFLAGS_CALLBACK;
      op->_flags &= ~(ASYNC_OPFLAGS_FIRE_AND_FORGET);
      op->_state &= ~ASYNC_OPSTATE_COMPLETE;
      // 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
  
       AsyncMessage *response = static_cast<AsyncMessage *>(op->_response);  
       reply_list->insert_first(response);  
       op->unlock();       op->unlock();
      if(op->_op_dest == 0)
         return false;
   
      return  _meta_dispatcher->route_async(op);
   }
  
   
   Boolean MessageQueueService::SendAsync(Message *msg,
                                          Uint32 destination,
                                          void (*callback)(Message *response,
                                                           void *handle,
                                                           void *parameter),
                                          void *handle,
                                          void *parameter)
   {
      if(msg == NULL)
         return false;
      if(callback == NULL)
         return SendForget(msg);
      AsyncOpNode *op = get_op();
      msg->dest = destination;
      if( NULL == (op->_op_dest = MessageQueue::lookup(msg->dest)))
      {
       op->release();       op->release();
         return_op(op);
         return false;
      }
      op->_flags |= ASYNC_OPFLAGS_SAFE_CALLBACK;
      op->_flags &= ~(ASYNC_OPFLAGS_FIRE_AND_FORGET);
      op->_state &= ~ASYNC_OPSTATE_COMPLETE;
      op->__async_callback = callback;
      op->_callback_node = op;
      op->_callback_handle = handle;
      op->_callback_parameter = parameter;
      op->_callback_response_q = this;
   
  
 //      op->lock();     if( ! (msg->getMask() & message_mask::ha_async) )
 //       while( op->_response.count() )     {
 //       {        AsyncLegacyOperationStart *wrapper =
 //       AsyncMessage *rply = static_cast<AsyncMessage *>(op->_response.remove_last());           new AsyncLegacyOperationStart(get_next_xid(),
 //       if (rply != 0 )                                         op,
 //       {                                         destination,
 //          rply->op = 0;                                         msg,
 //      reply_list->insert_first( static_cast<AsyncMessage *>(op->_response) );                                         destination);
 //       }  
 //       }  
       // release the opnode, the meta-dispatcher will recycle it for us  
 //      op->_state |= ASYNC_OPSTATE_RELEASED ;  
 //      op->unlock();  
    }    }
    else    else
    {    {
       // manually free the opnode and message        op->_request.insert_first(msg);
         (static_cast<AsyncMessage *>(msg))->op = op;
      }
   
      _callback.insert_last(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_first(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();       op->release();
       return_op(op);       return_op(op);
         return false;
    }    }
   
      // now see if the meta dispatcher will take it
      return  _meta_dispatcher->route_async(op);
 } }
  
 // Boolean MessageQueueService::SendAsync(AsyncMessage *msg)  
 // {  AsyncReply *MessageQueueService::SendWait(AsyncRequest *request)
 //    return _meta_dispatcher->accept_async(static_cast<Message *>(msg));  {
 // }     if ( request == 0 )
         return 0 ;
   
      Boolean destroy_op = false;
   
      if (request->op == 0)
      {
         request->op = get_op();
         request->op->_request.insert_first(request);
         destroy_op = true;
      }
   
      request->block = false;
      request->op->_flags |= ASYNC_OPFLAGS_PSEUDO_CALLBACK;
      SendAsync(request->op,
                request->dest,
                _sendwait_callback,
                this,
                (void *)0);
   
      request->op->_client_sem.wait();
      request->op->lock();
      AsyncReply * rpl = static_cast<AsyncReply *>(request->op->_response.remove_first());
      rpl->op = 0;
      request->op->unlock();
   
      if( destroy_op == true)
      {
         request->op->lock();
         request->op->_request.remove(request);
         request->op->_state |= ASYNC_OPSTATE_RELEASED;
         request->op->unlock();
         return_op(request->op);
         request->op = 0;
      }
      return rpl;
   }
  
  
 Boolean MessageQueueService::register_service(String name, Boolean MessageQueueService::register_service(String name,
Line 349 
Line 1166 
                                               Uint32 mask)                                               Uint32 mask)
  
 { {
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();  
   
    op->_state |= ASYNC_OPSTATE_UNKNOWN;  
    op->_flags |= ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;  
   
    RegisterCimService *msg = new RegisterCimService(get_next_xid(),    RegisterCimService *msg = new RegisterCimService(get_next_xid(),
                                                     op,                                                      0,
                                                     true,                                                     true,
                                                     name,                                                     name,
                                                     capabilities,                                                     capabilities,
                                                     mask,                                                     mask,
                                                     _queueId);                                                     _queueId);
      msg->dest = CIMOM_Q_ID;
   
    Boolean registered = false;    Boolean registered = false;
    AsyncMessage *reply = SendWait( msg );     AsyncReply *reply = static_cast<AsyncReply *>(SendWait( msg ));
  
    if ( reply != 0 )    if ( reply != 0 )
    {    {
Line 370 
Line 1184 
       {       {
          if(reply->getMask() & message_mask::ha_reply)          if(reply->getMask() & message_mask::ha_reply)
          {          {
             if((static_cast<AsyncReply *>(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;
    }    }
      delete msg;
    return registered;    return registered;
 } }
  
 Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask) Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask)
 { {
  
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();  
    op->_state |= ASYNC_OPSTATE_UNKNOWN;  
    op->_flags |= ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;  
  
    UpdateCimService *msg = new UpdateCimService(get_next_xid(),    UpdateCimService *msg = new UpdateCimService(get_next_xid(),
                                                 op,                                                  0,
                                                 true,                                                 true,
                                                 _queueId,                                                 _queueId,
                                                 _capabilities,                                                 _capabilities,
                                                 _mask);                                                 _mask);
    Boolean registered = false;    Boolean registered = false;
  
   
    AsyncMessage *reply = SendWait(msg);    AsyncMessage *reply = SendWait(msg);
    if (reply)    if (reply)
    {    {
Line 410 
Line 1221 
       }       }
       delete reply;       delete reply;
    }    }
      delete msg;
    return registered;    return registered;
 } }
  
Line 417 
Line 1229 
 Boolean MessageQueueService::deregister_service(void) Boolean MessageQueueService::deregister_service(void)
 { {
  
 //   _meta_dispatcher->deregister_module(_queueId);     _meta_dispatcher->deregister_module(_queueId);
 //   return true;     return true;
   
   
    AsyncOpNode *op = _meta_dispatcher->get_cached_op();  
    op->_state |= ASYNC_OPSTATE_UNKNOWN;  
    op->_flags |= ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;  
   
    DeRegisterCimService *msg = new DeRegisterCimService(get_next_xid(),  
                                                         op,  
                                                         true,  
                                                         _queueId);  
    Boolean deregistered = false;  
   
   
   
    return _meta_dispatcher->accept_async(static_cast<Message *>(msg));  
 } }
  
  
Line 446 
Line 1243 
    if( results == 0 )    if( results == 0 )
       throw NullPointer();       throw NullPointer();
  
    AsyncOpNode *op = get_op();  
    results->clear();    results->clear();
  
    FindServiceQueue *req =    FindServiceQueue *req =
       new FindServiceQueue(get_next_xid(),       new FindServiceQueue(get_next_xid(),
                            op,                             0,
                            _queueId,                            _queueId,
                            true,                            true,
                            name,                            name,
                            capabilities,                            capabilities,
                            mask);                            mask);
  
      req->dest = CIMOM_Q_ID;
   
    AsyncMessage *reply = SendWait(req);    AsyncMessage *reply = SendWait(req);
    if(reply)    if(reply)
    {    {
Line 474 
Line 1272 
       }       }
       delete reply;       delete reply;
    }    }
      delete req;
    return ;    return ;
 } }
  
Line 482 
Line 1281 
    if(result == 0)    if(result == 0)
       throw NullPointer();       throw NullPointer();
  
    AsyncOpNode *op = get_op();  
   
    EnumerateService *req    EnumerateService *req
       = new EnumerateService(get_next_xid(),       = new EnumerateService(get_next_xid(),
                              op,                               0,
                              _queueId,                              _queueId,
                              true,                              true,
                              queue);                              queue);
Line 520 
Line 1317 
       }       }
       delete reply;       delete reply;
    }    }
      delete req;
   
    return;    return;
 } }
  
 Uint32 MessageQueueService::get_next_xid(void) Uint32 MessageQueueService::get_next_xid(void)
 { {
      static Mutex _monitor;
      Uint32 value;
      AutoMutex autoMut(_monitor);
    _xid++;    _xid++;
    return _xid.value();     value =  _xid.value();
      return value;
   
 } }
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END

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