pegasus/src/Pegasus/Common/MessageQueueService.cpp - diff

Return to MessageQueueService.cpp CVS log

Up to [Pegasus] / pegasus / src / Pegasus / Common

Diff for /pegasus/src/Pegasus/Common/MessageQueueService.cpp between version 1.42 and 1.159

version 1.42, 2002/04/25 16:37:09

version 1.159, 2008/12/16 18:56:00

Line 1

//%////-*-c++-*-////////////////////////////////////////////////////////////////

//%LICENSE////////////////////////////////////////////////////////////////

// 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 <Pegasus/Common/Tracer.h>

#include <Pegasus/Common/MessageLoader.h>

PEGASUS_NAMESPACE_BEGIN

PEGASUS_USING_STD;

PEGASUS_NAMESPACE_BEGIN

cimom *MessageQueueService::_meta_dispatcher = 0;

AtomicInt MessageQueueService::_service_count = 0;

AtomicInt MessageQueueService::_service_count(0);

AtomicInt MessageQueueService::_xid(1);

Mutex MessageQueueService::_meta_dispatcher_mutex;

static struct timeval deallocateWait = {300, 0};

MessageQueueService::MessageQueueService(const char *name,

ThreadPool *MessageQueueService::_thread_pool = 0;

Uint32 queueID,

Uint32 capabilities,

Uint32 mask)

: Base(name, true, queueID),

_mask(mask),

MessageQueueService::PollingList* MessageQueueService::_polling_list;

_die(0),

Mutex MessageQueueService::_polling_list_mutex;

_incoming(true, 0),

_callback(true),

Thread* MessageQueueService::_polling_thread = 0;

_incoming_queue_shutdown(0),

_callback_ready(0),

ThreadPool *MessageQueueService::get_thread_pool()

_req_thread(_req_proc, this, false),

_callback_thread(_callback_proc, this, false)

{

_capabilities = (capabilities | module_capabilities::async);

return _thread_pool;

}

// MAX_THREADS_PER_SVC_QUEUE

// JR Wunderlich Jun 6, 2005

_default_op_timeout.tv_sec = 30;

#define MAX_THREADS_PER_SVC_QUEUE_LIMIT 5000

_default_op_timeout.tv_usec = 100;

#define MAX_THREADS_PER_SVC_QUEUE_DEFAULT 5

_meta_dispatcher_mutex.lock(pegasus_thread_self());

#ifndef MAX_THREADS_PER_SVC_QUEUE

# define MAX_THREADS_PER_SVC_QUEUE MAX_THREADS_PER_SVC_QUEUE_DEFAULT

#endif

if( _meta_dispatcher == 0 )

Uint32 max_threads_per_svc_queue;

{

PEGASUS_ASSERT( _service_count.value() == 0 );

ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::polling_routine(

_meta_dispatcher = new cimom();

void* parm)

if (_meta_dispatcher == NULL )

{

_meta_dispatcher_mutex.unlock();

Thread *myself = reinterpret_cast<Thread *>(parm);

MessageQueueService::PollingList *list =

reinterpret_cast<MessageQueueService::PollingList*>(myself->get_parm());

throw NullPointer();

try

}

{

while (_stop_polling.get() == 0)

{

_polling_sem.wait();

if (_stop_polling.get() != 0)

{

break;

}

_service_count++;

// 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).

_polling_list_mutex.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++;

rtn = _thread_pool->allocate_and_awaken(

service, _req_proc, &_polling_sem);

// 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()));

if( false == register_service(name, _capabilities, _mask) )

Threads::yield();

break;

}

service = list->next_of(service);

}

_polling_list_mutex.unlock();

}

catch(const Exception &e)

{

PEG_TRACE((TRC_MESSAGEQUEUESERVICE,Tracer::LEVEL1,

"Exception caught in MessageQueueService::polling_routine : %s",

(const char*)e.getMessage().getCString()));

}

catch(const exception &e)

{

_meta_dispatcher_mutex.unlock();

PEG_TRACE((TRC_MESSAGEQUEUESERVICE,Tracer::LEVEL1,

throw BindFailed("MessageQueueService Base Unable to register with Meta Dispatcher");

"Exception caught in MessageQueueService::polling_routine : %s",

e.what()));

}

catch(...)

{

PEG_TRACE_CSTRING(TRC_MESSAGEQUEUESERVICE,Tracer::LEVEL1,

"Unknown Exception caught in MessageQueueService::polling_routine");

}

_meta_dispatcher_mutex.unlock();

PEGASUS_ASSERT(_stop_polling.get());

// _callback_thread.run();

_req_thread.run();

return ThreadReturnType(0);

}

MessageQueueService::~MessageQueueService(void)

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)

{

_die = 1;

_isRunning = true;

if (_incoming_queue_shutdown.value() == 0 )

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))

{

_shutdown_incoming_queue();

max_threads_per_svc_queue = MAX_THREADS_PER_SVC_QUEUE_LIMIT;

_req_thread.join();

}

_callback_ready.signal();

_callback_thread.join();

_meta_dispatcher_mutex.lock(pegasus_thread_self());

PEG_TRACE((TRC_MESSAGEQUEUESERVICE, Tracer::LEVEL3,

_service_count--;

"max_threads_per_svc_queue set to %u.", max_threads_per_svc_queue));

if (_service_count.value() == 0 )

AutoMutex autoMut(_meta_dispatcher_mutex);

if (_meta_dispatcher == 0)

{

_meta_dispatcher->_shutdown_routed_queue();

_stop_polling = 0;

delete _meta_dispatcher;

PEGASUS_ASSERT(_service_count.get() == 0);

}

_meta_dispatcher = new cimom();

_meta_dispatcher_mutex.unlock();

// _thread_pool = new ThreadPool(initial_cnt, "MessageQueueService",

// minimum_cnt, maximum_cnt, deallocateWait);

_thread_pool =

new ThreadPool(0, "MessageQueueService", 0, 0, deallocateWait);

}

_service_count++;

// Add to the polling list

if (!_polling_list)

{

_polling_list = new PollingList;

}

_polling_list->insert_back(this);

_meta_dispatcher->registerCIMService(this);

}

void MessageQueueService::_shutdown_incoming_queue(void)

MessageQueueService::~MessageQueueService()

{

if (_incoming_queue_shutdown.value() > 0 )

// Close incoming queue.

return ;

if (_incoming_queue_shutdown.get() == 0)

AsyncIoctl *msg = new AsyncIoctl(get_next_xid(),

{

AsyncIoClose *msg = new AsyncIoClose(

_queueId,

true,

true);

AsyncIoctl::IO_CLOSE,

SendForget(msg);

// Wait until our queue has been shutdown.

0);

while (_incoming_queue_shutdown.get() == 0)

{

Threads::yield();

}

msg->op = get_op();

// die now.

msg->op->_flags |= ASYNC_OPFLAGS_FIRE_AND_FORGET;

_die = 1;

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;

_meta_dispatcher->deregisterCIMService(this);

msg->op->_request.insert_first(msg);

_incoming.insert_last_wait(msg->op);

// Wait until all threads processing the messages

// for this service have completed.

while (_threads.get() > 0)

{

Threads::yield();

}

_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.

_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;

}

// Clean up any extra stuff on the queue.

AsyncOpNode* op = 0;

while ((op = _incoming.dequeue()))

{

delete op;

}

void MessageQueueService::enqueue(Message *msg) throw(IPCException)

void MessageQueueService::enqueue(Message* msg)

{

PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE, "MessageQueueService::enqueue()");

Line 153

Line 297

}

PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL MessageQueueService::_callback_proc(void *parm)

ThreadReturnType PEGASUS_THREAD_CDECL MessageQueueService::_req_proc(

{

void* parm)

Thread *myself = reinterpret_cast<Thread *>(parm);

MessageQueueService *service = reinterpret_cast<MessageQueueService *>(myself->get_parm());

AsyncOpNode *operation = 0;

while ( service->_die.value() == 0 )

{

service->_callback_ready.wait();

MessageQueueService* service =

reinterpret_cast<MessageQueueService*>(parm);

service->_callback.lock();

PEGASUS_ASSERT(service != 0);

operation = service->_callback.next(0);

try

while( operation != NULL)

{

if( ASYNC_OPSTATE_COMPLETE & operation->read_state())

if (service->_die.get() != 0)

{

operation = service->_callback.remove_no_lock(operation);

service->_threads--;

PEGASUS_ASSERT(operation != NULL);

return 0;

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)

{

Thread *myself = reinterpret_cast<Thread *>(parm);

MessageQueueService *service = reinterpret_cast<MessageQueueService *>(myself->get_parm());

// pull messages off the incoming queue and dispatch them. then

// check pending messages that are non-blocking

AsyncOpNode *operation = 0;

while ( service->_die.value() == 0 )

// many operations may have been queued.

{

if(service->_incoming.count() > 0 )

{

try

{

operation = service->_incoming.remove_first();

operation = service->_incoming.dequeue();

}

catch(ListClosed & )

{

break;

}

if( operation )

{

operation->_thread_ptr = myself;

operation->_service_ptr = service;

service->_handle_incoming_operation(operation);

}

} while (operation);

}

if( service->_callback.count() > 0 )

catch (const Exception& e)

{

service->_callback.lock();

PEG_TRACE((TRC_DISCARDED_DATA, Tracer::LEVEL1,

operation = service->_callback.next(0);

"Caught exception: \"%s\". Exiting _req_proc.",

while( operation != NULL )

(const char*)e.getMessage().getCString()));

{

if( ASYNC_OPSTATE_COMPLETE & operation->read_state())

{

operation = service->_callback.remove_no_lock(operation);

service->_callback.unlock();

PEGASUS_ASSERT(operation != NULL);

operation->_thread_ptr = myself;

operation->_service_ptr = service;

service->_handle_async_callback(operation);

service->_callback.lock();

operation = service->_callback.next(operation);

continue;

}

pegasus_yield();

catch (...)

operation = service->_callback.next(operation);

{

}

PEG_TRACE_CSTRING(TRC_DISCARDED_DATA, Tracer::LEVEL1,

service->_callback.unlock();

"Caught unrecognized exception. Exiting _req_proc.");

}

if( (service->_incoming.count() == 0) && (service->_callback.count() == 0 ) )

service->_threads--;

myself->sleep(1);

return 0;

else

myself->thread_switch();

}

myself->exit_self( (PEGASUS_THREAD_RETURN) 1 );

return(0);

}

void MessageQueueService::_sendwait_callback(AsyncOpNode *op,

void MessageQueueService::_sendwait_callback(

AsyncOpNode* op,

MessageQueue *q,

void *parm)

{

Line 258

Line 355

// including op, op->_callback_node, and op->_callback_ptr

void MessageQueueService::_handle_async_callback(AsyncOpNode *op)

{

if( op->_flags & ASYNC_OPFLAGS_SAFE_CALLBACK )

PEGASUS_ASSERT(op->_flags == ASYNC_OPFLAGS_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_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;

}

msg = op->get_response();

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);

op->_async_callback(

}

op->_callback_node, op->_callback_response_q, op->_callback_ptr);

}

void MessageQueueService::_handle_incoming_operation(AsyncOpNode *operation)

// Thread *thread,

// MessageQueue *queue)

{

if ( operation != 0 )

{

Message *rq = operation->_request.get();

// 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)))

if ((rq != 0) && (!(rq->getMask() & MessageMask::ha_async)))

{

rq = operation->_request.remove_first() ;

operation->_request.release();

operation->unlock();

// delete the op node

operation->release();

return_op( operation);

handleEnqueue(rq);

return;

}

if ( (operation->_flags & ASYNC_OPFLAGS_CALLBACK ||

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 );

// ATTN: optimization

// << Wed Mar 6 15:00:39 2002 mdd >>

// put thread and queue into the asyncopnode structure.

// (static_cast<AsyncMessage *>(rq))->_myself = operation->_thread_ptr;

// (static_cast<AsyncMessage *>(rq))->_service = operation->_service_ptr;

// done << Tue Mar 12 14:49:07 2002 mdd >>

operation->unlock();

_handle_async_request(static_cast<AsyncRequest *>(rq));

}

Line 385

Line 400

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));

else if (type == async_messages::CIMSERVICE_STOP)

}

else if (type == ASYNC_CIMSERVICE_STOP)

{

handle_CimServiceStop(static_cast<CimServiceStop *>(req));

else if (type == async_messages::CIMSERVICE_PAUSE)

}

handle_CimServicePause(static_cast<CimServicePause *>(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

{

// we don't handle this request message

_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 (request->getMask() & MessageMask::ha_async)

{

if (response->getMask() & message_mask::ha_async )

if (response->getMask() & MessageMask::ha_async)

{

_completeAsyncResponse(static_cast<AsyncRequest *>(request),

_completeAsyncResponse(

static_cast<AsyncReply *>(response),

static_cast<AsyncRequest *>(request),

ASYNC_OPSTATE_COMPLETE, 0 );

static_cast<AsyncReply *>(response));

PEG_METHOD_EXIT();

return true;

}

if(request->_async != 0 )

AsyncRequest* asyncRequest =

static_cast<AsyncRequest*>(request->get_async());

if (asyncRequest != 0)

{

Uint32 mask = request->_async->getMask();

PEGASUS_ASSERT(asyncRequest->getMask() &

PEGASUS_ASSERT(mask & (message_mask::ha_async | message_mask::ha_request ));

(MessageMask::ha_async | MessageMask::ha_request));

AsyncOpNode* op = asyncRequest->op;

AsyncRequest *async = static_cast<AsyncRequest *>(request->_async);

// the legacy request is going to be deleted by its handler

AsyncOpNode *op = async->op;

request->_async = 0;

// this request is probably going to be deleted !!

// remove it from the op node

op->_request.remove(request);

static_cast<AsyncLegacyOperationStart *>(asyncRequest)->get_action();

AsyncLegacyOperationResult *async_result =

new AsyncLegacyOperationResult(

async->getKey(),

async->getRouting(),

op,

response);

_completeAsyncResponse(async,

_completeAsyncResponse(

async_result,

asyncRequest,

ASYNC_OPSTATE_COMPLETE,

async_result);

0);

PEG_METHOD_EXIT();

return true;

}

Line 462

Line 470

// ensure that the destination queue is in response->dest

PEG_METHOD_EXIT();

return SendForget(response);

}

void MessageQueueService::_make_response(Message *req, Uint32 code)

Line 470

Line 477

cimom::_make_response(req, code);

}

void MessageQueueService::_completeAsyncResponse(

void MessageQueueService::_completeAsyncResponse(AsyncRequest *request,

AsyncRequest* request,

AsyncReply *reply,

AsyncReply* reply)

Uint32 state,

Uint32 flag)

{

PEG_METHOD_ENTER(TRC_MESSAGEQUEUESERVICE,

"MessageQueueService::_completeAsyncResponse");

cimom::_completeAsyncResponse(request, reply, state, flag);

cimom::_completeAsyncResponse(request, reply);

PEG_METHOD_EXIT();

}

void MessageQueueService::_complete_op_node(AsyncOpNode *op,

void MessageQueueService::_complete_op_node(

Uint32 state,

AsyncOpNode* op)

Uint32 flag,

Uint32 code)

{

cimom::_complete_op_node(op, state, flag, code);

cimom::_complete_op_node(op);

}

Boolean MessageQueueService::accept_async(AsyncOpNode *op)

{

if (_incoming_queue_shutdown.value() > 0 )

if (!_isRunning)

return false;

// 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);

// Don't accept any messages other than start.

return true;

if (op->_request.get()->getType() != ASYNC_CIMSERVICE_START)

}

// else

// {

// if( (rq != 0 && (true == MessageQueueService::messageOK(rq))) ||

// (rp != 0 && ( true == MessageQueueService::messageOK(rp) )) &&

// _die.value() == 0)

// {

// MessageQueueService::_incoming.insert_last_wait(op);

// return true;

// }

return false;

}

Boolean MessageQueueService::messageOK(const Message *msg)

{

if (_incoming_queue_shutdown.value() > 0 )

return false;

return true;

}

// made pure virtual

// << Wed Mar 6 15:11:31 2002 mdd >>

// void MessageQueueService::handleEnqueue(Message *msg)

// {

// if ( msg )

// delete msg;

// }

// made pure virtual

// << Wed Mar 6 15:11:56 2002 mdd >>

// void MessageQueueService::handleEnqueue(void)

// {

// Message *msg = dequeue();

// handleEnqueue(msg);

// }

void MessageQueueService::handle_heartbeat_request(AsyncRequest *req)

{

// default action is to echo a heartbeat response

AsyncReply *reply =

new AsyncReply(async_messages::HEARTBEAT,

req->getKey(),

req->getRouting(),

req->op,

async_results::OK,

req->resp,

false);

_completeAsyncResponse(req, reply, ASYNC_OPSTATE_COMPLETE, 0 );

}

void MessageQueueService::handle_heartbeat_reply(AsyncReply *rep)

{

;

}

void MessageQueueService::handle_AsyncIoctl(AsyncIoctl *req)

if (_incoming_queue_shutdown.get() > 0)

{

return false;

switch( req->ctl )

{

case AsyncIoctl::IO_CLOSE:

{

// save my bearings

Thread *myself = req->op->_thread_ptr;

MessageQueueService *service = static_cast<MessageQueueService *>(req->op->_service_ptr);

// 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

if (_polling_thread == NULL)

service->_incoming_queue_shutdown = 1;

// empty out the queue

while( 1 )

{

AsyncOpNode *operation;

PEGASUS_ASSERT(_polling_list);

try

_polling_thread = new Thread(

{

polling_routine,

operation = service->_incoming.remove_first();

reinterpret_cast<void *>(_polling_list),

}

false);

catch(IPCException & )

ThreadStatus tr = PEGASUS_THREAD_OK;

{

while ( (tr =_polling_thread->run()) != PEGASUS_THREAD_OK)

break;

}

if( operation )

{

operation->_thread_ptr = myself;

if (tr == PEGASUS_THREAD_INSUFFICIENT_RESOURCES)

operation->_service_ptr = service;

Threads::yield();

service->_handle_incoming_operation(operation);

}

else

break;

throw Exception(MessageLoaderParms(

} // message processing loop

"Common.MessageQueueService.NOT_ENOUGH_THREAD",

"Could not allocate thread for the polling thread."));

// 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);

}

if (_die.get() == 0)

void MessageQueueService::handle_CimServiceStart(CimServiceStart *req)

{

// clear the stoped bit and update

if (_incoming.enqueue(op))

_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)

{

// set the stopeed bit and update

_polling_sem.signal();

_capabilities |= module_capabilities::stopped;

return true;

_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)

{

// 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);

// now tell the meta dispatcher we are stopped

}

void MessageQueueService::handle_AsyncOperationStart(AsyncOperationStart *req)

{

_make_response(req, async_results::CIM_NAK);

}

return false;

void MessageQueueService::handle_AsyncOperationResult(AsyncOperationResult *req)

{

;

}

void MessageQueueService::handle_AsyncIoClose(AsyncIoClose *req)

void MessageQueueService::handle_AsyncLegacyOperationStart(AsyncLegacyOperationStart *req)

{

// remove the legacy message from the request and enqueue it to its destination

MessageQueueService *service =

Uint32 result = async_results::CIM_NAK;

static_cast<MessageQueueService*>(req->op->_op_dest);

Message *legacy = req->_act;

#ifdef MESSAGEQUEUESERVICE_DEBUG

if ( legacy != 0 )

PEGASUS_STD(cout) << service->getQueueName() <<

{

" Received AsyncIoClose " << PEGASUS_STD(endl);

MessageQueue* queue = MessageQueue::lookup(req->_legacy_destination);

#endif

if( queue != 0 )

// set the closing flag, don't accept any more messages

{

service->_incoming_queue_shutdown = 1;

if(queue->isAsync() == true )

{

(static_cast<MessageQueueService *>(queue))->handleEnqueue(legacy);

}

else

{

// Enqueue the response:

queue->enqueue(req->get_action());

}

result = async_results::OK;

// 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, result);

void MessageQueueService::handle_CimServiceStart(CimServiceStart* req)

{

#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_AsyncLegacyOperationResult(AsyncLegacyOperationResult *rep)

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();

op->_state = ASYNC_OPSTATE_UNKNOWN;

op->_flags = ASYNC_OPFLAGS_SINGLE | ASYNC_OPFLAGS_NORMAL;

op->_flags = ASYNC_OPFLAGS_UNKNOWN;

return op;

}

void MessageQueueService::return_op(AsyncOpNode *op)

{

PEGASUS_ASSERT(op->read_state() & ASYNC_OPSTATE_RELEASED );

delete op;

}

Boolean MessageQueueService::ForwardOp(AsyncOpNode *op,

Boolean MessageQueueService::SendAsync(

Uint32 destination)

AsyncOpNode* op,

Uint32 destination,

void (*callback)(AsyncOpNode*, MessageQueue*, void*),

MessageQueue* callback_response_q,

void* callback_ptr)

{

PEGASUS_ASSERT(op != 0 );

return _sendAsync(

op->lock();

op,

op->_op_dest = MessageQueue::lookup(destination);

destination,

op->_flags |= (ASYNC_OPFLAGS_FIRE_AND_FORGET | ASYNC_OPFLAGS_FORWARD);

callback,

op->_flags &= ~(ASYNC_OPFLAGS_CALLBACK);

callback_response_q,

op->unlock();

callback_ptr,

if ( op->_op_dest == 0 )

ASYNC_OPFLAGS_CALLBACK);

return false;

return _meta_dispatcher->route_async(op);

}

Boolean MessageQueueService::_sendAsync(

Boolean MessageQueueService::SendAsync(AsyncOpNode *op,

AsyncOpNode* op,

Uint32 destination,

void (*callback)(AsyncOpNode *,

void (*callback)(AsyncOpNode*, MessageQueue*, void*),

MessageQueue *,

void *),

MessageQueue *callback_response_q,

void *callback_ptr)

void* callback_ptr,

Uint32 flags)

{

PEGASUS_ASSERT(op != 0 && callback != 0 );

// get the queue handle for the destination

// destination of this message

op->_op_dest = MessageQueue::lookup(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);

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

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();

if( NULL == (op->_op_dest = MessageQueue::lookup(msg->dest)))

{

op->release();

return_op(op);

return false;

}

op->_flags |= ASYNC_OPFLAGS_SAFE_CALLBACK;

op->_flags = flags;

op->_flags &= ~(ASYNC_OPFLAGS_FIRE_AND_FORGET);

// initialize the callback data

op->_state &= ~ASYNC_OPSTATE_COMPLETE;

// callback function to be executed by recpt. of response

op->__async_callback = callback;

op->_async_callback = callback;

// the op node

op->_callback_node = op;

op->_callback_handle = handle;

// the queue that will receive the response

op->_callback_parameter = parameter;

op->_callback_response_q = callback_response_q;

op->_callback_response_q = this;

// user data for callback

op->_callback_ptr = callback_ptr;

// I am the originator of this request

if( ! (msg->getMask() & message_mask::ha_async) )

op->_callback_request_q = this;

{

AsyncLegacyOperationStart *wrapper =

new AsyncLegacyOperationStart(get_next_xid(),

op,

destination,

msg,

destination);

msg = static_cast<Message *>(wrapper);

}

else

{

op->_request.insert_first(msg);

(static_cast<AsyncMessage *>(msg))->op = op;

}

op->_callback_notify = _incoming.get_node_cond();

_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)

if (mask & MessageMask::ha_async)

{

op = (static_cast<AsyncMessage *>(msg))->op ;

}

Line 836

Line 658

if( op == 0 )

{

op = get_op();

op->_request.insert_first(msg);

op->_request.reset(msg);

if (mask & message_mask::ha_async)

if (mask & MessageMask::ha_async)

{

(static_cast<AsyncMessage *>(msg))->op = op;

}

PEGASUS_ASSERT(op->_flags == ASYNC_OPFLAGS_UNKNOWN);

PEGASUS_ASSERT(op->_state == ASYNC_OPSTATE_UNKNOWN);

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;

}

op->_flags = ASYNC_OPFLAGS_FIRE_AND_FORGET;

// now see if the meta dispatcher will take it

return _meta_dispatcher->route_async(op);

}

Line 864

Line 688

Boolean destroy_op = false;

if (request->op == false)

if (request->op == 0)

{

request->op = get_op();

request->op->_request.insert_first(request);

request->op->_request.reset(request);

destroy_op = true;

}

PEGASUS_ASSERT(request->op->_flags == ASYNC_OPFLAGS_UNKNOWN);

PEGASUS_ASSERT(request->op->_state == ASYNC_OPSTATE_UNKNOWN);

request->block = false;

request->op->_flags |= ASYNC_OPFLAGS_PSEUDO_CALLBACK;

_sendAsync(

SendAsync(request->op,

request->op,

request->dest,

_sendwait_callback,

this,

(void *)0);

(void *)0,

ASYNC_OPFLAGS_PSEUDO_CALLBACK);

request->op->_client_sem.wait();

request->op->lock();

AsyncReply * rpl = static_cast<AsyncReply *>(request->op->_response.remove_first());

AsyncReply* rpl = static_cast<AsyncReply *>(request->op->removeResponse());

rpl->op = 0;

request->op->unlock();

if( destroy_op == true)

{

request->op->lock();

request->op->_request.release();

request->op->_request.remove(request);

request->op->_state |= ASYNC_OPSTATE_RELEASED;

request->op->unlock();

return_op(request->op);

request->op = 0;

}

return rpl;

}

Uint32 MessageQueueService::find_service_qid(const String &name)

Boolean MessageQueueService::register_service(String name,

Uint32 capabilities,

Uint32 mask)

{

RegisterCimService *msg = new RegisterCimService(get_next_xid(),

true,

name,

capabilities,

mask,

_queueId);

Boolean registered = false;

AsyncReply *reply = static_cast<AsyncReply *>(SendWait( msg ));

if ( reply != 0 )

{

if(reply->getMask() & message_mask:: ha_async)

{

if(reply->getMask() & message_mask::ha_reply)

{

if(reply->result == async_results::OK ||

reply->result == async_results::MODULE_ALREADY_REGISTERED )

registered = true;

}

delete reply;

}

delete msg;

return registered;

}

Boolean MessageQueueService::update_service(Uint32 capabilities, Uint32 mask)

{

UpdateCimService *msg = new UpdateCimService(get_next_xid(),

true,

_queueId,

_capabilities,

_mask);

Boolean registered = false;

AsyncMessage *reply = SendWait(msg);

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)

registered = true;

}

delete reply;

}

delete msg;

return registered;

}

Boolean MessageQueueService::deregister_service(void)

{

_meta_dispatcher->deregister_module(_queueId);

return true;

}

void MessageQueueService::find_services(String name,

Uint32 capabilities,

Uint32 mask,

Array<Uint32> *results)

{

if( results == 0 )

throw NullPointer();

results->clear();

FindServiceQueue *req =

new FindServiceQueue(get_next_xid(),

_queueId,

true,

name,

capabilities,

mask);

AsyncMessage *reply = SendWait(req);

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 )

*results = (static_cast<FindServiceQueueResult *>(reply))->qids;

}

delete reply;

}

delete req;

return ;

}

void MessageQueueService::enumerate_service(Uint32 queue, message_module *result)

{

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(),

_queueId,

true,

queue);

AsyncMessage *reply = SendWait(req);

if (reply)

{

Boolean found = false;

if( reply->getMask() & message_mask::ha_async)

{

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);

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;

}

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

Legend:

Removed from v.1.42
changed lines
	Added in v.1.159

No CVS admin address has been configured