(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.13 and 1.154

version 1.13, 2002/02/06 15:15:35 version 1.154, 2008/12/02 09:00:48
Line 1 
Line 1 
 //%////-*-c++-*-////////////////////////////////////////////////////////////////  //%LICENSE////////////////////////////////////////////////////////////////
 // //
 // Copyright (c) 2000, 2001 The Open group, BMC Software, Tivoli Systems, IBM  // Licensed to The Open Group (TOG) under one or more contributor license
   // agreements.  Refer to the OpenPegasusNOTICE.txt file distributed with
   // this work for additional information regarding copyright ownership.
   // Each contributor licenses this file to you under the OpenPegasus Open
   // Source License; you may not use this file except in compliance with the
   // License.
 // //
 // 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
 // of this software and associated documentation files (the "Software"), to  // copy of this software and associated documentation files (the "Software"),
 // deal in the Software without restriction, including without limitation the  // to deal in the Software without restriction, including without limitation
 // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or  // the rights to use, copy, modify, merge, publish, distribute, sublicense,
 // sell copies of the Software, and to permit persons to whom the Software is  // and/or sell copies of the Software, and to permit persons to whom the
 // furnished to do so, subject to the following conditions:  // Software is furnished to do so, subject to the following conditions:
 // //
 // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN  // The above copyright notice and this permission notice shall be included
 // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED  // in all copies or substantial portions of the Software.
 // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT  
 // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR  
 // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT  
 // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN  
 // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION  
 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.  
 // //
 //==============================================================================  // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
   // OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
   // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
   // IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
   // CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
   // TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
   // SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 // //
 // Author: Mike Day (mdday@us.ibm.com)  //////////////////////////////////////////////////////////////////////////
 //  
 // Modified By:  
 // //
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
 #include "MessageQueueService.h" #include "MessageQueueService.h"
   #include <Pegasus/Common/Tracer.h>
 PEGASUS_USING_STD;  #include <Pegasus/Common/MessageLoader.h>
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
 MessageQueueService::MessageQueueService(const char *name,  cimom *MessageQueueService::_meta_dispatcher = 0;
                                          Uint32 queueID,  AtomicInt MessageQueueService::_service_count(0);
                                          Uint32 capabilities,  Mutex MessageQueueService::_meta_dispatcher_mutex;
                                          Uint32 mask)  
    : Base(name, false,  queueID),  static struct timeval deallocateWait = {300, 0};
      _capabilities(capabilities),  
      _mask(mask),  
      _die(0),  
      _pending(true),  
      _incoming(true, 1000),  
      _incoming_queue_shutdown(0),  
      _req_thread(_req_proc, this, false)  
 {  
    _default_op_timeout.tv_sec = 30;  
    _default_op_timeout.tv_usec = 100;  
    _meta_dispatcher = static_cast<cimom *>(Base::lookup(CIMOM_Q_ID));  
    if(_meta_dispatcher == 0 )  
       throw NullPointer();  
    _req_thread.run();  
  
   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
  
 MessageQueueService::~MessageQueueService(void)  Uint32 max_threads_per_svc_queue;
   
   ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::polling_routine(
       void* parm)
 { {
    _die = 1;      Thread *myself = reinterpret_cast<Thread *>(parm);
    if (_incoming_queue_shutdown.value() == 0 )      List<MessageQueueService, Mutex> *list =
        _incoming.shutdown_queue();          reinterpret_cast<List<MessageQueueService, Mutex>*>(myself->get_parm());
  
    _req_thread.join();      while (_stop_polling.get()  == 0)
       {
           _polling_sem.wait();
  
           if (_stop_polling.get() != 0)
           {
               break;
 } }
  
 AtomicInt MessageQueueService::_xid(1);          // The polling_routine thread must hold the lock on the
           // _polling_list while processing incoming messages.
           // This lock is used to give this thread ownership of
           // services on the _polling_routine list.
   
           // This is necessary to avoid confict with other threads
           // processing the _polling_list
           // (e.g., MessageQueueServer::~MessageQueueService).
   
           list->lock();
           MessageQueueService *service = list->front();
           ThreadStatus rtn = PEGASUS_THREAD_OK;
           while (service != NULL)
           {
               if ((service->_incoming.count() > 0) &&
                   (service->_die.get() == 0) &&
                   (service->_threads.get() < max_threads_per_svc_queue))
               {
                   // The _threads count is used to track the
                   // number of active threads that have been allocated
                   // to process messages for this service.
   
                   // The _threads count MUST be incremented while
                   // the polling_routine owns the _polling_thread
                   // lock and has ownership of the service object.
  
 void MessageQueueService::_shutdown_incoming_queue(void)                  service->_threads++;
                   try
                   {
                       rtn = _thread_pool->allocate_and_awaken(
                           service, _req_proc, &_polling_sem);
                   }
                   catch (...)
 { {
                       service->_threads--;
   
                       // allocate_and_awaken should never generate an exception.
                       PEGASUS_ASSERT(0);
                   }
                   // if no more threads available, break from processing loop
                   if (rtn != PEGASUS_THREAD_OK )
                   {
                       service->_threads--;
                       PEG_TRACE((TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL1,
                           "Could not allocate thread for %s.  Queue has %d "
                               "messages waiting and %d threads servicing."
                               "Skipping the service for right now. ",
                           service->getQueueName(),
                           service->_incoming.count(),
                           service->_threads.get()));
   
                       Threads::yield();
                       service = NULL;
                   }
               }
               if (service != NULL)
               {
                   service = list->next_of(service);
               }
           }
           list->unlock();
       }
       return ThreadReturnType(0);
   }
  
    if (_incoming_queue_shutdown.value() > 0 )  
       return ;  
  
    AsyncIoctl *msg = new AsyncIoctl(get_next_xid(),  Semaphore MessageQueueService::_polling_sem(0);
   AtomicInt MessageQueueService::_stop_polling(0);
   
   
   MessageQueueService::MessageQueueService(
       const char* name,
       Uint32 queueID)
       : Base(name, true,  queueID),
         _die(0),
         _threads(0),
         _incoming(),
         _incoming_queue_shutdown(0)
   {
       _isRunning = true;
   
       max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE;
   
       // if requested thread max is out of range, then set to
       // MAX_THREADS_PER_SVC_QUEUE_LIMIT
   
       if ((max_threads_per_svc_queue < 1) ||
           (max_threads_per_svc_queue > MAX_THREADS_PER_SVC_QUEUE_LIMIT))
       {
           max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE_LIMIT;
       }
   
       PEG_TRACE((TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL3,
          "max_threads_per_svc_queue set to %u.", max_threads_per_svc_queue));
   
       AutoMutex autoMut(_meta_dispatcher_mutex);
   
       if (_meta_dispatcher == 0)
       {
           _stop_polling = 0;
           PEGASUS_ASSERT(_service_count.get() == 0);
           _meta_dispatcher = new cimom();
   
           //  _thread_pool = new ThreadPool(initial_cnt, "MessageQueueService",
           //   minimum_cnt, maximum_cnt, deallocateWait);
           //
           _thread_pool =
               new ThreadPool(0, "MessageQueueService", 0, 0, deallocateWait);
       }
       _service_count++;
   
       _get_polling_list()->insert_back(this);
   }
   
   
   MessageQueueService::~MessageQueueService()
   {
       // Close incoming queue.
       if (_incoming_queue_shutdown.get() == 0)
       {
           AsyncIoClose *msg = new AsyncIoClose(
                                     0,                                     0,
                                     _queueId,                                     _queueId,
                                     _queueId,                                     _queueId,
                                     true,              true);
                                     AsyncIoctl::IO_CLOSE,          SendForget(msg);
                                     0,          // Wait until our queue has been shutdown.
                                     0);          while (_incoming_queue_shutdown.get() == 0)
           {
               Threads::yield();
           }
       }
   
       // die now.
       _die = 1;
   
       // Wait until all threads processing the messages
       // for this service have completed.
       while (_threads.get() > 0)
       {
           Threads::yield();
       }
  
    msg->op = get_op();      // The polling_routine locks the _polling_list while
    msg->op->_request.insert_first(msg);      // 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.
       _removeFromPollingList(this);
  
       {
           AutoMutex autoMut(_meta_dispatcher_mutex);
           _service_count--;
           // If we are last service to die, delete metadispatcher.
           if (_service_count.get() == 0)
           {
               _stop_polling++;
               _polling_sem.signal();
               if (_polling_thread)
               {
                   _polling_thread->join();
                   delete _polling_thread;
                   _polling_thread = 0;
               }
               delete _meta_dispatcher;
               _meta_dispatcher = 0;
  
               delete _thread_pool;
               _thread_pool = 0;
           }
       } // mutex unlocks here
  
    _incoming.insert_last_wait(msg->op);      // Clean up any extra stuff on the queue.
    msg->op->_client_sem.wait();      AsyncOpNode* op = 0;
       while ((op = _incoming.dequeue()))
       {
           delete op;
       }
   }
  
    msg->op->lock();  void MessageQueueService::enqueue(Message* msg)
    AsyncReply * reply = static_cast<AsyncReply *>(msg->op->_response.remove_first());  {
    reply->op = 0;      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE, "MessageQueueService::enqueue()");
    msg->op->unlock();  
    delete reply;  
  
    msg->op->_request.remove(msg);      Base::enqueue(msg);
    msg->op->_state |= ASYNC_OPSTATE_RELEASED;  
    return_op(msg->op);  
  
    msg->op = 0;      PEG_METHOD_EXIT();
    delete msg;  
 } }
  
  
 PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(void * parm)  ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(
       void* parm)
 { {
    Thread *myself = reinterpret_cast<Thread *>(parm);      MessageQueueService* service =
    MessageQueueService *service = reinterpret_cast<MessageQueueService *>(myself->get_parm());          reinterpret_cast<MessageQueueService*>(parm);
       PEGASUS_ASSERT(service != 0);
       try
       {
           if (service->_die.get() != 0)
           {
               service->_threads--;
               return 0;
           }
    // pull messages off the incoming queue and dispatch them. then    // pull messages off the incoming queue and dispatch them. then
    // check pending messages that are non-blocking    // check pending messages that are non-blocking
    AsyncOpNode *operation = 0;    AsyncOpNode *operation = 0;
  
    while ( service->_die.value() == 0 )          // many operations may have been queued.
           do
    {    {
       try              operation = service->_incoming.dequeue();
   
               if (operation)
       {       {
          operation = service->_incoming.remove_first_wait();                 operation->_service_ptr = service;
                  service->_handle_incoming_operation(operation);
       }       }
       catch(ListClosed & )          } while (operation);
       }
       catch (const Exception& e)
       {       {
          break;          PEG_TRACE((TRC_DISCARDED_DATA, Tracer::LEVEL1,
               "Caught exception: \"%s\".  Exiting _req_proc.",
               (const char*)e.getMessage().getCString()));
       }       }
       if( operation )      catch (...)
       {       {
           PEG_TRACE_CSTRING(TRC_DISCARDED_DATA, Tracer::LEVEL1,
          service->_handle_incoming_operation(operation, myself, service);              "Caught unrecognized exception.  Exiting _req_proc.");
       }       }
       service->_threads--;
       return 0;
    }    }
  
    myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );  
    return(0);  void MessageQueueService::_sendwait_callback(
       AsyncOpNode* op,
       MessageQueue* q,
       void *parm)
   {
       op->_client_sem.signal();
 } }
  
  
 void MessageQueueService::_handle_incoming_operation(AsyncOpNode *operation,  // callback function is responsible for cleaning up all resources
                                                      Thread *thread,  // including op, op->_callback_node, and op->_callback_ptr
                                                      MessageQueue *queue)  void MessageQueueService::_handle_async_callback(AsyncOpNode* op)
   {
       PEGASUS_ASSERT(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)
 { {
    if ( operation != 0 )    if ( operation != 0 )
    {    {
       operation->lock();          Message *rq = operation->_request.get();
       Message *rq = operation->_request.next(0);  
       operation->unlock();  // optimization <<< Thu Mar  7 21:04:05 2002 mdd >>>
   // move this to the bottom of the loop when the majority of
   // messages become async messages.
   
           // divert legacy messages to handleEnqueue
           if ((rq != 0) && (!(rq->getMask() & MessageMask::ha_async)))
           {
               operation->_request.release();
               // delete the op node
               return_op(operation);
               handleEnqueue(rq);
               return;
           }
  
           if ((operation->_flags & ASYNC_OPFLAGS_CALLBACK) &&
               (operation->_state & ASYNC_OPSTATE_COMPLETE))
           {
               _handle_async_callback(operation);
           }
           else
           {
       PEGASUS_ASSERT(rq != 0 );       PEGASUS_ASSERT(rq != 0 );
       PEGASUS_ASSERT(rq->getMask() & message_mask::ha_async );  
       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)
 { {
    if ( req != 0 )      MessageType type = req->getType();
       if (type == ASYNC_IOCLOSE)
       {
           handle_AsyncIoClose(static_cast<AsyncIoClose*>(req));
       }
       else if (type == ASYNC_CIMSERVICE_START)
    {    {
       req->op->processing();  
   
       Uint32 type = req->getType();  
       if( type == async_messages::HEARTBEAT )  
          handle_heartbeat_request(req);  
       else if (type == async_messages::IOCTL)  
          handle_AsyncIoctl(static_cast<AsyncIoctl *>(req));  
       else if (type == async_messages::CIMSERVICE_START)  
          handle_CimServiceStart(static_cast<CimServiceStart *>(req));          handle_CimServiceStart(static_cast<CimServiceStart *>(req));
       else if (type == async_messages::CIMSERVICE_STOP)      }
          handle_CimServiceStop(static_cast<CimServiceStop *>(req));      else if (type == ASYNC_CIMSERVICE_STOP)
       else if (type == async_messages::CIMSERVICE_PAUSE)  
       {       {
          handle_CimServicePause(static_cast<CimServicePause *>(req));          handle_CimServiceStop(static_cast<CimServiceStop *>(req));
       }       }
   
       else if (type == async_messages::CIMSERVICE_RESUME)  
          handle_CimServiceResume(static_cast<CimServiceResume *>(req));  
       else if ( type == async_messages::ASYNC_OP_START)  
          handle_AsyncOperationStart(static_cast<AsyncOperationStart *>(req));  
       else       else
       {       {
          // we don't handle this request message          // we don't handle this request message
          _make_response(req, async_results::CIM_NAK );          _make_response(req, async_results::CIM_NAK );
       }       }
    }    }
 }  
  
 void MessageQueueService::_make_response(AsyncRequest *req, Uint32 code)  Boolean MessageQueueService::_enqueueResponse(
       Message* request,
       Message* response)
 { {
    AsyncReply *reply =      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
       new AsyncReply(async_messages::REPLY,          "MessageQueueService::_enqueueResponse");
                      req->getKey(),  
                      req->getRouting(),  
                      0,  
                      req->op,  
                      code,  
                      req->resp,  
                      false);  
    _completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );  
 }  
   
  
 void MessageQueueService::_completeAsyncResponse(AsyncRequest *request,      if (request->getMask() & MessageMask::ha_async)
                                                 AsyncReply *reply,  
                                                 Uint32 state,  
                                                 Uint32 flag)  
 { {
    PEGASUS_ASSERT(request != 0  && reply != 0 );          if (response->getMask() & MessageMask::ha_async)
           {
    AsyncOpNode *op = request->op;              _completeAsyncResponse(
    op->lock();                  static_cast<AsyncRequest *>(request),
    op->_state |= state ;                  static_cast<AsyncReply *>(response));
    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();
               return true;
           }
 } }
  
       AsyncRequest* asyncRequest =
           static_cast<AsyncRequest*>(request->get_async());
  
       if (asyncRequest != 0)
 Boolean MessageQueueService::accept_async(AsyncOpNode *op)  
 { {
    if (_incoming_queue_shutdown.value() > 0 )          PEGASUS_ASSERT(asyncRequest->getMask() &
       return false;              (MessageMask::ha_async | MessageMask::ha_request));
  
    op->lock();          AsyncOpNode* op = asyncRequest->op;
    Message *rq = op->_request.next(0);  
    op->unlock();  
  
    if( true == messageOK(rq) &&  _die.value() == 0  )          // the legacy request is going to be deleted by its handler
    {          // remove it from the op node
       _incoming.insert_last_wait(op);  
       return true;  
    }  
    return false;  
 }  
  
 Boolean MessageQueueService::messageOK(const Message *msg)          static_cast<AsyncLegacyOperationStart *>(asyncRequest)->get_action();
 {  
    if (_incoming_queue_shutdown.value() > 0 )  
       return false;  
  
    if ( msg != 0 )          AsyncLegacyOperationResult *async_result =
    {              new AsyncLegacyOperationResult(
       Uint32 mask = msg->getMask();                  op,
       if ( mask & message_mask::ha_async)                  response);
          if ( mask & message_mask::ha_request)          _completeAsyncResponse(
               asyncRequest,
               async_result);
   
           PEG_METHOD_EXIT();
             return true;             return true;
    }    }
    return false;  
 }  
  
       // ensure that the destination queue is in response->dest
       PEG_METHOD_EXIT();
       return SendForget(response);
   }
  
 void MessageQueueService::handleEnqueue(void)  void MessageQueueService::_make_response(Message* req, Uint32 code)
 {  
    Message *msg = dequeue();  
    if( msg )  
    {    {
       delete msg;      cimom::_make_response(req, code);
    }  
 } }
  
 void MessageQueueService::handle_heartbeat_request(AsyncRequest *req)  void MessageQueueService::_completeAsyncResponse(
       AsyncRequest* request,
       AsyncReply* reply)
 { {
    // default action is to echo a heartbeat response      PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,
           "MessageQueueService::_completeAsyncResponse");
  
    AsyncReply *reply =      cimom::_completeAsyncResponse(request, reply);
       new AsyncReply(async_messages::HEARTBEAT,  
                      req->getKey(),      PEG_METHOD_EXIT();
                      req->getRouting(),  
                      0,  
                      req->op,  
                      async_results::OK,  
                      req->resp,  
                      false);  
    _completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );  
 } }
  
  
 void MessageQueueService::handle_heartbeat_reply(AsyncReply *rep)  void MessageQueueService::_complete_op_node(
       AsyncOpNode* op)
 { {
    ;      cimom::_complete_op_node(op);
 } }
  
 void MessageQueueService::handle_AsyncIoctl(AsyncIoctl *req)  
 {  
  
    switch( req->ctl )  Boolean MessageQueueService::accept_async(AsyncOpNode* op)
    {  
       case AsyncIoctl::IO_CLOSE:  
       {       {
          // save my bearings      if (_incoming_queue_shutdown.get() > 0)
          Thread *myself = req->_myself;          return false;
          MessageQueueService *service = static_cast<MessageQueueService *>(req->_service);      if (_polling_thread == NULL)
   
          // respond to this message.  
          _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;          _polling_thread = new Thread(
             try              polling_routine,
               reinterpret_cast<void *>(_get_polling_list()),
               false);
           ThreadStatus tr = PEGASUS_THREAD_OK;
           while ( (tr =_polling_thread->run()) != PEGASUS_THREAD_OK)
             {             {
                operation = service->_incoming.remove_first();              if (tr == PEGASUS_THREAD_INSUFFICIENT_RESOURCES)
                   Threads::yield();
               else
                   throw Exception(MessageLoaderParms(
                       "Common.MessageQueueService.NOT_ENOUGH_THREAD",
                       "Could not allocate thread for the polling thread."));
             }             }
             catch(IPCException & )  
             {  
                break;  
             }             }
             if( operation )      if (_die.get() == 0)
             {             {
                service->_handle_incoming_operation(operation, myself, service);          if (_incoming.enqueue(op))
           {
               _polling_sem.signal();
               return true;
             }             }
             else  
                break;  
          } // message processing loop  
   
          // shutdown the AsyncDQueue  
          service->_incoming.shutdown_queue();  
          // exit the thread !  
          myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );  
          return;  
       }  
   
       default:  
          _make_response(req, async_results::CIM_NAK);  
    }    }
       return false;
 } }
  
 void MessageQueueService::handle_CimServiceStart(CimServiceStart *req)  void MessageQueueService::handle_AsyncIoClose(AsyncIoClose *req)
 { {
    // clear the stoped bit and update      MessageQueueService *service =
    _capabilities &= (~(module_capabilities::stopped));          static_cast<MessageQueueService*>(req->op->_op_dest);
    _make_response(req, async_results::OK);  
    // now tell the meta dispatcher we are stopped  
    update_service(_capabilities, _mask);  
  
 }  #ifdef MESSAGEQUEUESERVICE_DEBUG
 void MessageQueueService::handle_CimServiceStop(CimServiceStop *req)      PEGASUS_STD(cout) << service->getQueueName() <<
 {          " Received AsyncIoClose " << PEGASUS_STD(endl);
    // set the stopeed bit and update  #endif
    _capabilities |= module_capabilities::stopped;      // set the closing flag, don't accept any more messages
    _make_response(req, async_results::CIM_STOPPED);      service->_incoming_queue_shutdown = 1;
    // now tell the meta dispatcher we are stopped  
    update_service(_capabilities, _mask);      // 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
 void MessageQueueService::handle_CimServicePause(CimServicePause *req)      // << Thu Oct  9 10:52:48 2003 mdd >>
 {  
    // 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)  
 {  
    // clear the paused  bit and update  
    _capabilities &= (~(module_capabilities::paused));  
    update_service(_capabilities, _mask);  
    _make_response(req, async_results::OK);    _make_response(req, async_results::OK);
    // now tell the meta dispatcher we are stopped  
 } }
  
 void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req)  void MessageQueueService::handle_CimServiceStart(CimServiceStart* req)
 { {
    _make_response(req, async_results::CIM_NAK);  #ifdef MESSAGEQUEUESERVICE_DEBUG
       PEGASUS_STD(cout) << getQueueName() << "received START" <<
           PEGASUS_STD(endl);
   #endif
       PEGASUS_ASSERT(!_isRunning);
       _isRunning = true;
       _make_response(req, async_results::OK);
 } }
  
 void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req)  void MessageQueueService::handle_CimServiceStop(CimServiceStop* req)
 { {
   #ifdef MESSAGEQUEUESERVICE_DEBUG
       PEGASUS_STD(cout) << getQueueName() << "received STOP" << PEGASUS_STD(endl);
   #endif
       PEGASUS_ASSERT(_isRunning);
       _isRunning = false;
       _make_response(req, async_results::CIM_SERVICE_STOPPED);
 } }
  
 AsyncOpNode *MessageQueueService::get_op(void)  AsyncOpNode* MessageQueueService::get_op()
 { {
    AsyncOpNode *op = new AsyncOpNode();    AsyncOpNode *op = new AsyncOpNode();
  
    op->_state = ASYNC_OPSTATE_UNKNOWN;    op->_state = ASYNC_OPSTATE_UNKNOWN;
    op->_flags = ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;     op->_flags = ASYNC_OPFLAGS_UNKNOWN;
  
    return op;    return op;
 } }
  
 void MessageQueueService::return_op(AsyncOpNode *op) void MessageQueueService::return_op(AsyncOpNode *op)
 { {
    PEGASUS_ASSERT(op->read_state() & ASYNC_OPSTATE_RELEASED );  
    delete op;    delete op;
 } }
  
  
   Boolean MessageQueueService::SendAsync(
 AsyncReply *MessageQueueService::SendWait(AsyncRequest *request)      AsyncOpNode* op,
 {      Uint32 destination,
    if ( request == 0 )      void (*callback)(AsyncOpNode*, MessageQueue*, void*),
       return 0 ;      MessageQueue* callback_response_q,
       void* callback_ptr)
    Boolean destroy_op = false;  {
       return _sendAsync(
    if (request->op == false)          op,
    {          destination,
       request->op = get_op();          callback,
       request->op->_request.insert_first(request);          callback_response_q,
       destroy_op = true;          callback_ptr,
    }          ASYNC_OPFLAGS_CALLBACK);
   
    request->block = true;  
    request->op->_state &= ~ASYNC_OPSTATE_COMPLETE;  
    request->op->put_response(0);  
   
    // first link it on our pending list  
    // _pending.insert_last_wait(request->op);  
   
    // now see if the meta dispatcher will take it  
   
    if (true == _meta_dispatcher->route_async(request->op))  
    {  
       request->op->_client_sem.wait();  
       PEGASUS_ASSERT(request->op->_state & ASYNC_OPSTATE_COMPLETE);  
  
    }    }
  
    request->op->lock();  Boolean MessageQueueService::_sendAsync(
    AsyncReply * rpl = static_cast<AsyncReply *>(request->op->_response.remove_first());      AsyncOpNode* op,
    rpl->op = 0;      Uint32 destination,
    request->op->unlock();      void (*callback)(AsyncOpNode*, MessageQueue*, void*),
       MessageQueue* callback_response_q,
    if( destroy_op == true)      void* callback_ptr,
       Uint32 flags)
   {
       PEGASUS_ASSERT(op != 0 && callback != 0);
   
       // destination of this message
       op->_op_dest = MessageQueue::lookup(destination);
       if (op->_op_dest == 0)
    {    {
       request->op->lock();          return false;
       request->op->_request.remove(request);  
       request->op->_state |= ASYNC_OPSTATE_RELEASED;  
       request->op->unlock();  
   
       return_op(request->op);  
       request->op = 0;  
    }    }
       op->_flags = flags;
       // initialize the callback data
       // callback function to be executed by recpt. of response
       op->_async_callback = callback;
       // the op node
       op->_callback_node = op;
       // the queue that will receive the response
       op->_callback_response_q = callback_response_q;
       // user data for callback
       op->_callback_ptr = callback_ptr;
       // I am the originator of this request
       op->_callback_request_q = this;
  
    return rpl;      return  _meta_dispatcher->route_async(op);
 } }
  
   Boolean MessageQueueService::SendForget(Message* msg)
 Boolean MessageQueueService::register_service(String name,  
                                               Uint32 capabilities,  
                                               Uint32 mask)  
   
 { {
    RegisterCimService *msg = new RegisterCimService(get_next_xid(),      AsyncOpNode* op = 0;
                                                     0,      Uint32 mask = msg->getMask();
                                                     true,  
                                                     name,  
                                                     capabilities,  
                                                     mask,  
                                                     _queueId);  
    Boolean registered = false;  
    AsyncReply *reply = static_cast<AsyncReply *>(SendWait( msg ));  
  
    if ( reply != 0 )      if (mask & MessageMask::ha_async)
    {    {
       if(reply->getMask() & message_mask:: ha_async)          op = (static_cast<AsyncMessage *>(msg))->op;
       }
   
       if (op == 0)
       {       {
          if(reply->getMask() & message_mask::ha_reply)          op = get_op();
           op->_request.reset(msg);
           if (mask & MessageMask::ha_async)
          {          {
             if(reply->result == async_results::OK)              (static_cast<AsyncMessage *>(msg))->op = op;
                registered = true;  
          }          }
       }       }
  
       delete reply;      PEGASUS_ASSERT(op->_flags == ASYNC_OPFLAGS_UNKNOWN);
    }      PEGASUS_ASSERT(op->_state == ASYNC_OPSTATE_UNKNOWN);
    delete msg;      op->_op_dest = MessageQueue::lookup(msg->dest);
    return registered;      if (op->_op_dest == 0)
       {
           return_op(op);
           return false;
 } }
  
 Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask)      op->_flags = ASYNC_OPFLAGS_FIRE_AND_FORGET;
 {  
  
       // now see if the meta dispatcher will take it
       return  _meta_dispatcher->route_async(op);
   }
  
    UpdateCimService *msg = new UpdateCimService(get_next_xid(),  
                                                 0,  
                                                 true,  
                                                 _queueId,  
                                                 _capabilities,  
                                                 _mask);  
    Boolean registered = false;  
  
    AsyncMessage *reply = SendWait(msg);  AsyncReply *MessageQueueService::SendWait(AsyncRequest* request)
    if (reply)  
    {  
       if(reply->getMask() & message_mask:: ha_async)  
       {  
          if(reply->getMask() & message_mask::ha_reply)  
          {          {
             if(static_cast<AsyncReply *>(reply)->result == async_results::OK)      if (request == 0)
                registered = true;          return 0;
          }  
       }  
       delete reply;  
    }  
    delete msg;  
    return registered;  
 }  
  
       Boolean destroy_op = false;
  
 Boolean MessageQueueService::deregister_service(void)      if (request->op == 0)
 { {
           request->op = get_op();
    _meta_dispatcher->deregister_module(_queueId);          request->op->_request.reset(request);
    return true;          destroy_op = true;
 } }
  
       PEGASUS_ASSERT(request->op->_flags == ASYNC_OPFLAGS_UNKNOWN);
       PEGASUS_ASSERT(request->op->_state == ASYNC_OPSTATE_UNKNOWN);
  
 void MessageQueueService::find_services(String name,      request->block = false;
                                         Uint32 capabilities,      _sendAsync(
                                         Uint32 mask,          request->op,
                                         Array<Uint32> *results)          request->dest,
 {          _sendwait_callback,
           this,
    if( results == 0 )          (void *)0,
       throw NullPointer();          ASYNC_OPFLAGS_PSEUDO_CALLBACK);
  
    results->clear();      request->op->_client_sem.wait();
  
    FindServiceQueue *req =      AsyncReply* rpl = static_cast<AsyncReply *>(request->op->removeResponse());
       new FindServiceQueue(get_next_xid(),      rpl->op = 0;
                            0,  
                            _queueId,  
                            true,  
                            name,  
                            capabilities,  
                            mask);  
  
    AsyncMessage *reply = SendWait(req);      if (destroy_op == true)
    if(reply)  
    {  
       if( reply->getMask() & message_mask::ha_async)  
       {  
          if(reply->getMask() & message_mask::ha_reply)  
          {  
             if(reply->getType() == async_messages::FIND_SERVICE_Q_RESULT)  
             {             {
                if( (static_cast<FindServiceQueueResult *>(reply))->result == async_results::OK )          request->op->_request.release();
                   *results = (static_cast<FindServiceQueueResult *>(reply))->qids;          return_op(request->op);
             }          request->op = 0;
          }  
       }  
       delete reply;  
    }    }
    delete req;      return rpl;
    return ;  
 } }
  
 void MessageQueueService::enumerate_service(Uint32 queue, message_module *result)  Uint32 MessageQueueService::find_service_qid(const String &name)
 { {
    if(result == 0)      MessageQueue *queue = MessageQueue::lookup((const char*)name.getCString());
       throw NullPointer();      PEGASUS_ASSERT(queue);
       return queue->getQueueId();
    EnumerateService *req  }
       = new EnumerateService(get_next_xid(),  
                              0,  
                              _queueId,  
                              true,  
                              queue);  
   
    AsyncMessage *reply = SendWait(req);  
  
    if (reply)  MessageQueueService::PollingList* MessageQueueService::_get_polling_list()
    {    {
       Boolean found = false;      _polling_list_mutex.lock();
  
       if( reply->getMask() & message_mask::ha_async)      if (!_polling_list)
       {          _polling_list = new PollingList;
          if(reply->getMask() & message_mask::ha_reply)  
          {  
             if(reply->getType() == async_messages::ENUMERATE_SERVICE_RESULT)  
             {  
                if( (static_cast<EnumerateServiceResponse *>(reply))->result == async_results::OK )  
                {  
                   if( found == false)  
                   {  
                      found = true;  
  
                      result->put_name( (static_cast<EnumerateServiceResponse *>(reply))->name);      _polling_list_mutex.unlock();
                      result->put_capabilities((static_cast<EnumerateServiceResponse *>(reply))->capabilities);  
                      result->put_mask((static_cast<EnumerateServiceResponse *>(reply))->mask);  
                      result->put_queue((static_cast<EnumerateServiceResponse *>(reply))->qid);  
                   }  
                }  
             }  
          }  
       }  
       delete reply;  
    }  
    delete req;  
  
    return;      return _polling_list;
 } }
  
 Uint32 MessageQueueService::get_next_xid(void)  void MessageQueueService::_removeFromPollingList(MessageQueueService *service)
 { {
    _xid++;      _polling_list_mutex.lock();
    return _xid.value();      _polling_list->remove(service);
       _polling_list_mutex.unlock();
 } }
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END


Legend:
Removed from v.1.13  
changed lines
  Added in v.1.154

No CVS admin address has been configured
Powered by
ViewCVS 0.9.2