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

Return to Monitor.cpp CVS log

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

Diff for /pegasus/src/Pegasus/Common/Monitor.cpp between version 1.48 and 1.121.4.5

version 1.48, 2003/09/22 17:39:39

version 1.121.4.5, 2008/03/26 19:21:44

Line 1

//%/////////////////////////////////////////////////////////////////////////////

//%2006////////////////////////////////////////////////////////////////////////

// The Open Group, Tivoli Systems

// Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.

// IBM Corp.; EMC Corporation, The Open Group.

// IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.

// EMC Corporation; VERITAS Software Corporation; The Open Group.

// EMC Corporation; Symantec Corporation; The Open Group.

// Permission is hereby granted, free of charge, to any person obtaining a copy

// of this software and associated documentation files (the "Software"), to

Line 21

Line 29

//==============================================================================

// Author: Mike Brasher (mbrasher@bmc.com)

// Modified By:

//%/////////////////////////////////////////////////////////////////////////////

#include "Network.h"

#include <Pegasus/Common/Config.h>

#include <cstring>

#include "Monitor.h"

#include "MessageQueue.h"

#include "Socket.h"

#include <Pegasus/Common/Tracer.h>

#include <Pegasus/Common/HTTPConnection.h>

#include <Pegasus/Common/MessageQueueService.h>

#ifdef PEGASUS_OS_TYPE_WINDOWS

#include <Pegasus/Common/Exception.h>

# if defined(FD_SETSIZE) && FD_SETSIZE != 1024

#include "ArrayIterator.h"

# error "FD_SETSIZE was not set to 1024 prior to the last inclusion \

#include "HostAddress.h"

of <winsock.h>. It may have been indirectly included (e.g., by including \

#include <errno.h>

<windows.h>). Finthe inclusion of that header which is visible to this \

compilation unit and #define FD_SETZIE to 1024 prior to that inclusion; \

otherwise, less than 64 clients (the default) will be able to connect to the \

CIMOM. PLEASE DO NOT SUPPRESS THIS WARNING; PLEASE FIX THE PROBLEM."

# endif

# define FD_SETSIZE 1024

# include <windows.h>

#else

# include <sys/types.h>

# include <sys/socket.h>

# include <sys/time.h>

# include <netinet/in.h>

# include <netdb.h>

# include <arpa/inet.h>

#endif

PEGASUS_USING_STD;

PEGASUS_NAMESPACE_BEGIN

static AtomicInt _connections = 0;

static struct timeval create_time = {0, 1};

static struct timeval destroy_time = {300, 0};

static struct timeval deadlock_time = {0, 0};

////////////////////////////////////////////////////////////////////////////////

// MonitorRep

// Tickler

////////////////////////////////////////////////////////////////////////////////

struct MonitorRep

Tickler::Tickler()

: _listenSocket(PEGASUS_INVALID_SOCKET),

_clientSocket(PEGASUS_INVALID_SOCKET),

_serverSocket(PEGASUS_INVALID_SOCKET)

{

fd_set rd_fd_set;

try

fd_set wr_fd_set;

fd_set ex_fd_set;

fd_set active_rd_fd_set;

fd_set active_wr_fd_set;

fd_set active_ex_fd_set;

};

////////////////////////////////////////////////////////////////////////////////

// Monitor

////////////////////////////////////////////////////////////////////////////////

Monitor::Monitor()

: _module_handle(0), _controller(0), _async(false), _stopConnections(0)

{

Socket::initializeInterface();

_initialize();

_rep = 0;

}

_entries.reserveCapacity(32);

catch (...)

for( int i = 0; i < 32; i++ )

{

_MonitorEntry entry(0, 0, 0);

_uninitialize();

_entries.append(entry);

throw;

}

Monitor::Monitor(Boolean async)

Tickler::~Tickler()

: _module_handle(0), _controller(0), _async(async), _stopConnections(0)

{

Socket::initializeInterface();

_uninitialize();

_rep = 0;

_entries.reserveCapacity(32);

for( int i = 0; i < 32; i++ )

{

_MonitorEntry entry(0, 0, 0);

_entries.append(entry);

}

if( _async == true )

void Tickler::notify()

{

_thread_pool = new ThreadPool(0,

Socket::write(_clientSocket, "\0", 1);

"Monitor",

create_time,

destroy_time,

deadlock_time);

}

else

_thread_pool = 0;

}

Monitor::~Monitor()

void Tickler::reset()

{

Tracer::trace(TRC_HTTP, Tracer::LEVEL4,

// Clear all bytes from the tickle socket

"deregistering with module controller");

char buffer[32];

while (Socket::read(_serverSocket, buffer, 32) > 0)

if(_module_handle != NULL)

{

_controller->deregister_module(PEGASUS_MODULENAME_MONITOR);

_controller = 0;

delete _module_handle;

}

Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "deleting rep");

Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "uninitializing interface");

Socket::uninitializeInterface();

Tracer::trace(TRC_HTTP, Tracer::LEVEL4,

"returning from monitor destructor");

if(_async == true)

delete _thread_pool;

}

#if defined(PEGASUS_OS_TYPE_UNIX)

int Monitor::kill_idle_threads()

// Use an anonymous pipe for the tickle connection.

{

static struct timeval now, last;

gettimeofday(&now, NULL);

int dead_threads = 0;

if( now.tv_sec - last.tv_sec > 120 )

void Tickler::_initialize()

{

gettimeofday(&last, NULL);

try

{

dead_threads = _thread_pool->kill_dead_threads();

int fds[2];

}

catch(IPCException& )

if (pipe(fds) == -1)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CREATE",

"Received error number $0 while creating the internal socket.",

getSocketError());

throw Exception(parms);

}

_serverSocket = fds[0];

_clientSocket = fds[1];

Socket::disableBlocking(_serverSocket);

}

return dead_threads;

}

#else

// Use an external loopback socket connection to allow the tickle socket to

// be included in the select() array on non-Unix platforms.

Boolean Monitor::run(Uint32 milliseconds)

void Tickler::_initialize()

{

// Set up the addresses for the listen, client, and server sockets

// based on whether IPv6 is enabled.

Boolean handled_events = false;

Socket::initializeInterface();

int i = 0;

#if defined(PEGASUS_OS_OS400) || defined(PEGASUS_OS_HPUX)

# ifdef PEGASUS_ENABLE_IPV6

struct timeval tv = {milliseconds/1000, milliseconds%1000*1000};

struct sockaddr_storage listenAddress;

struct sockaddr_storage clientAddress;

struct sockaddr_storage serverAddress;

#else

struct timeval tv = {0, 1};

struct sockaddr_in listenAddress;

struct sockaddr_in clientAddress;

struct sockaddr_in serverAddress;

#endif

fd_set fdread;

FD_ZERO(&fdread);

_entry_mut.lock(pegasus_thread_self());

// Check the stopConnections flag. If set, clear the Acceptor monitor entries

int addressFamily;

if (_stopConnections == 1)

SocketLength addressLength;

{

for ( int indx = 0; indx < (int)_entries.size(); indx++)

memset(&listenAddress, 0, sizeof (listenAddress));

{

if (_entries[indx]._type == Monitor::ACCEPTOR)

# ifdef PEGASUS_ENABLE_IPV6

{

if (System::isIPv6StackActive())

if ( _entries[indx]._status.value() != _MonitorEntry::EMPTY)

{

if ( _entries[indx]._status.value() == _MonitorEntry::IDLE ||

_entries[indx]._status.value() == _MonitorEntry::DYING )

{

// remove the entry

// Use the IPv6 loopback address for the listen sockets

_entries[indx]._status = _MonitorEntry::EMPTY;

HostAddress::convertTextToBinary(

HostAddress::AT_IPV6,

"::1",

&reinterpret_cast<struct sockaddr_in6*>(&listenAddress)->sin6_addr);

listenAddress.ss_family = AF_INET6;

reinterpret_cast<struct sockaddr_in6*>(&listenAddress)->sin6_port = 0;

addressFamily = AF_INET6;

addressLength = sizeof(struct sockaddr_in6);

}

else

# endif

{

// set status to DYING

// Use the IPv4 loopback address for the listen sockets

_entries[indx]._status.value() == _MonitorEntry::DYING;

HostAddress::convertTextToBinary(

}

HostAddress::AT_IPV4,

}

"127.0.0.1",

}

&reinterpret_cast<struct sockaddr_in*>(

}

&listenAddress)->sin_addr.s_addr);

_stopConnections = 0;

reinterpret_cast<struct sockaddr_in*>(&listenAddress)->sin_family =

}

AF_INET;

reinterpret_cast<struct sockaddr_in*>(&listenAddress)->sin_port = 0;

for( int indx = 0; indx < (int)_entries.size(); indx++)

addressFamily = AF_INET;

{

addressLength = sizeof(struct sockaddr_in);

if(_entries[indx]._status.value() == _MonitorEntry::IDLE)

{

FD_SET(_entries[indx].socket, &fdread);

}

// Use the same address for the client socket as the listen socket

clientAddress = listenAddress;

int events = select(FD_SETSIZE, &fdread, NULL, NULL, &tv);

// Set up a listen socket to allow the tickle client and server to connect

#ifdef PEGASUS_OS_TYPE_WINDOWS

// Create the listen socket

if(events && events != SOCKET_ERROR )

if ((_listenSocket = Socket::createSocket(addressFamily, SOCK_STREAM, 0)) ==

#else

PEGASUS_INVALID_SOCKET)

if(events && events != -1 )

#endif

{

for( int indx = 0; indx < (int)_entries.size(); indx++)

{

if(FD_ISSET(_entries[indx].socket, &fdread))

MessageLoaderParms parms(

{

"Common.Monitor.TICKLE_CREATE",

MessageQueue *q = MessageQueue::lookup(_entries[indx].queueId);

"Received error number $0 while creating the internal socket.",

if(q == 0)

getSocketError());

{

throw Exception(parms);

try

{

_entries[indx]._status = _MonitorEntry::EMPTY;

}

catch(...)

{

}

// Bind the listen socket to the loopback address

continue;

if (::bind(

}

_listenSocket,

try

reinterpret_cast<struct sockaddr*>(&listenAddress),

{

addressLength) < 0)

if(_entries[indx]._type == Monitor::CONNECTION)

{

static_cast<HTTPConnection *>(q)->_entry_index = indx;

MessageLoaderParms parms(

if(static_cast<HTTPConnection *>(q)->_dying.value() > 0 )

"Common.Monitor.TICKLE_BIND",

{

"Received error number $0 while binding the internal socket.",

_entries[indx]._status = _MonitorEntry::DYING;

getSocketError());

MessageQueue & o = static_cast<HTTPConnection *>(q)->get_owner();

throw Exception(parms);

Message* message= new CloseConnectionMessage(_entries[indx].socket);

message->dest = o.getQueueId();

_entry_mut.unlock();

o.enqueue(message);

return true;

}

_entries[indx]._status = _MonitorEntry::BUSY;

_thread_pool->allocate_and_awaken((void *)q, _dispatch);

}

else

{

int events = 0;

events |= SocketMessage::READ;

Message *msg = new SocketMessage(_entries[indx].socket, events);

_entries[indx]._status = _MonitorEntry::BUSY;

_entry_mut.unlock();

q->enqueue(msg);

// Listen for a connection from the tickle client

_entries[indx]._status = _MonitorEntry::IDLE;

if ((::listen(_listenSocket, 3)) < 0)

return true;

}

catch(...)

{

}

MessageLoaderParms parms(

handled_events = true;

"Common.Monitor.TICKLE_LISTEN",

}

"Received error number $0 while listening to the internal socket.",

}

getSocketError());

}

throw Exception(parms);

_entry_mut.unlock();

return(handled_events);

}

void Monitor::stopListeningForConnections()

// Verify we have the correct listen socket

SocketLength tmpAddressLength = addressLength;

int sock = ::getsockname(

_listenSocket,

reinterpret_cast<struct sockaddr*>(&listenAddress),

&tmpAddressLength);

if (sock < 0)

{

PEG_METHOD_ENTER(TRC_HTTP, "Monitor::stopListeningForConnections()");

MessageLoaderParms parms(

"Common.Monitor.TICKLE_SOCKNAME",

_stopConnections = 1;

"Received error number $0 while getting the internal socket name.",

getSocketError());

PEG_METHOD_EXIT();

throw Exception(parms);

}

// Set up the client side of the tickle connection.

int Monitor::solicitSocketMessages(

// Create the client socket

Sint32 socket,

if ((_clientSocket = Socket::createSocket(addressFamily, SOCK_STREAM, 0)) ==

Uint32 events,

PEGASUS_INVALID_SOCKET)

Uint32 queueId,

int type)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CLIENT_CREATE",

"Received error number $0 while creating the internal client "

"socket.",

getSocketError());

throw Exception(parms);

}

PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");

// Bind the client socket to the loopback address

if (::bind(

int index = -1;

_clientSocket,

_entry_mut.lock(pegasus_thread_self());

reinterpret_cast<struct sockaddr*>(&clientAddress),

addressLength) < 0)

for(index = 0; index < (int)_entries.size(); index++)

{

try

{

if(_entries[index]._status.value() == _MonitorEntry::EMPTY)

{

_entries[index].socket = socket;

MessageLoaderParms parms(

_entries[index].queueId = queueId;

"Common.Monitor.TICKLE_CLIENT_BIND",

_entries[index]._type = type;

"Received error number $0 while binding the internal client "

_entries[index]._status = _MonitorEntry::IDLE;

"socket.",

_entry_mut.unlock();

getSocketError());

throw Exception(parms);

return index;

}

catch(...)

// Connect the client socket to the listen socket address

if (::connect(

_clientSocket,

reinterpret_cast<struct sockaddr*>(&listenAddress),

addressLength) < 0)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CLIENT_CONNECT",

"Received error number $0 while connecting the internal client "

"socket.",

getSocketError());

throw Exception(parms);

}

_entry_mut.unlock();

// Set up the server side of the tickle connection.

PEG_METHOD_EXIT();

return index;

}

void Monitor::unsolicitSocketMessages(Sint32 socket)

tmpAddressLength = addressLength;

{

PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitSocketMessages");

_entry_mut.lock(pegasus_thread_self());

for(int index = 0; index < (int)_entries.size(); index++)

// Accept the client socket connection.

{

_serverSocket = ::accept(

if(_entries[index].socket == socket)

_listenSocket,

{

reinterpret_cast<struct sockaddr*>(&serverAddress),

_entries[index]._status = _MonitorEntry::EMPTY;

&tmpAddressLength);

break;

}

_entry_mut.unlock();

PEG_METHOD_EXIT();

}

PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)

if (_serverSocket == PEGASUS_SOCKET_ERROR)

{

HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(parm);

MessageLoaderParms parms(

"Common.Monitor.TICKLE_ACCEPT",

dst->run(1);

"Received error number $0 while accepting the internal socket "

if( dst->_monitor->_entries.size() > (Uint32)dst->_entry_index )

"connection.",

dst->_monitor->_entries[dst->_entry_index]._status = _MonitorEntry::IDLE;

getSocketError());

throw Exception(parms);

return 0;

}

// Close the listen socket and make the other sockets non-blocking

Socket::close(_listenSocket);

_listenSocket = PEGASUS_INVALID_SOCKET;

////************************* monitor 2 *****************************////

Socket::disableBlocking(_serverSocket);

////************************* monitor 2 *****************************////

Socket::disableBlocking(_clientSocket);

////************************* monitor 2 *****************************////

}

////************************* monitor 2 *****************************////

m2e_rep::m2e_rep(void)

#endif

:Base(), state(IDLE)

void Tickler::_uninitialize()

{

}

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4, "uninitializing interface");

m2e_rep::m2e_rep(monitor_2_entry_type _type,

try

pegasus_socket _sock,

void* _accept,

void* _dispatch)

: Base(), type(_type), state(IDLE), psock(_sock),

accept_parm(_accept), dispatch_parm(_dispatch)

{

if (_serverSocket != PEGASUS_INVALID_SOCKET)

}

m2e_rep::~m2e_rep(void)

{

Socket::close(_serverSocket);

_serverSocket = PEGASUS_INVALID_SOCKET;

}

if (_clientSocket != PEGASUS_INVALID_SOCKET)

m2e_rep::m2e_rep(const m2e_rep& r)

: Base()

{

if(this != &r){

Socket::close(_clientSocket);

type = r.type;

_clientSocket = PEGASUS_INVALID_SOCKET;

psock = r.psock;

accept_parm = r.accept_parm;

dispatch_parm = r.dispatch_parm;

state = IDLE;

}

if (_listenSocket != PEGASUS_INVALID_SOCKET)

m2e_rep& m2e_rep::operator =(const m2e_rep& r)

{

if(this != &r) {

Socket::close(_listenSocket);

type = r.type;

_listenSocket = PEGASUS_INVALID_SOCKET;

psock = r.psock;

accept_parm = r.accept_parm;

dispatch_parm = r.dispatch_parm;

state = IDLE;

}

return *this;

}

catch (...)

Boolean m2e_rep::operator ==(const m2e_rep& r)

{

if(this == &r)

return true;

return false;

}

Boolean m2e_rep::operator ==(void* r)

{

if((void*)this == r)

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

return true;

"Failed to close tickle sockets");

return false;

}

Socket::uninitializeInterface();

m2e_rep::operator pegasus_socket() const

{

return psock;

}

monitor_2_entry::monitor_2_entry(void)

////////////////////////////////////////////////////////////////////////////////

{

_rep = new m2e_rep();

// Monitor

}

////////////////////////////////////////////////////////////////////////////////

monitor_2_entry::monitor_2_entry(pegasus_socket& _psock,

#define MAX_NUMBER_OF_MONITOR_ENTRIES 32

monitor_2_entry_type _type,

Monitor::Monitor()

void* _accept_parm, void* _dispatch_parm)

: _stopConnections(0),

{

_stopConnectionsSem(0),

_rep = new m2e_rep(_type, _psock, _accept_parm, _dispatch_parm);

_solicitSocketCount(0)

}

{

int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;

_entries.reserveCapacity(numberOfMonitorEntriesToAllocate);

// Create a MonitorEntry for the Tickler and set its state to IDLE so the

// Monitor will watch for its events.

_MonitorEntry entry(_tickler.getReadHandle(), 1, INTERNAL);

entry._status = _MonitorEntry::IDLE;

_entries.append(entry);

monitor_2_entry::monitor_2_entry(const monitor_2_entry& e)

// Start the count at 1 because _entries[0] is the Tickler

for (int i = 1; i < numberOfMonitorEntriesToAllocate; i++)

{

if(this != &e){

_MonitorEntry entry(0, 0, 0);

Inc(this->_rep = e._rep);

_entries.append(entry);

}

monitor_2_entry::~monitor_2_entry(void)

Monitor::~Monitor()

{

Dec(_rep);

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

"returning from monitor destructor");

}

monitor_2_entry& monitor_2_entry::operator=(const monitor_2_entry& e)

void Monitor::tickle()

{

if(this != &e){

_tickler.notify();

Dec(_rep);

Inc(this->_rep = e._rep);

}

return *this;

}

Boolean monitor_2_entry::operator ==(const monitor_2_entry& me) const

void Monitor::setState(

Uint32 index,

_MonitorEntry::entry_status status)

{

if(this == &me)

AutoMutex autoEntryMutex(_entry_mut);

return true;

// Set the state to requested state

return false;

_entries[index]._status = status;

}

Boolean monitor_2_entry::operator ==(void* k) const

void Monitor::run(Uint32 milliseconds)

{

if((void *)this == k)

struct timeval tv = {milliseconds/1000, milliseconds%1000*1000};

return true;

return false;

}

monitor_2_entry_type monitor_2_entry::get_type(void) const

fd_set fdread;

{

FD_ZERO(&fdread);

return _rep->type;

}

void monitor_2_entry::set_type(monitor_2_entry_type t)

AutoMutex autoEntryMutex(_entry_mut);

{

_rep->type = t;

}

ArrayIterator<_MonitorEntry> entries(_entries);

monitor_2_entry_state monitor_2_entry::get_state(void) const

// Check the stopConnections flag. If set, clear the Acceptor monitor

// entries

if (_stopConnections.get() == 1)

{

return (monitor_2_entry_state) _rep->state.value();

for ( int indx = 0; indx < (int)entries.size(); indx++)

}

void monitor_2_entry::set_state(monitor_2_entry_state t)

{

_rep->state = t;

if (entries[indx]._type == Monitor::ACCEPTOR)

}

void* monitor_2_entry::get_accept(void) const

{

return _rep->accept_parm;

if ( entries[indx]._status.get() != _MonitorEntry::EMPTY)

}

void monitor_2_entry::set_accept(void* a)

{

_rep->accept_parm = a;

if ( entries[indx]._status.get() == _MonitorEntry::IDLE ||

}

entries[indx]._status.get() == _MonitorEntry::DYING )

void* monitor_2_entry::get_dispatch(void) const

{

return _rep->dispatch_parm;

// remove the entry

entries[indx]._status = _MonitorEntry::EMPTY;

}

else

void monitor_2_entry::set_dispatch(void* a)

{

_rep->dispatch_parm = a;

// set status to DYING

entries[indx]._status = _MonitorEntry::DYING;

}

_stopConnections = 0;

_stopConnectionsSem.signal();

}

pegasus_socket monitor_2_entry::get_sock(void) const

for (int indx = 0; indx < (int)entries.size(); indx++)

{

return _rep->psock;

const _MonitorEntry &entry = entries[indx];

if ((entry._status.get() == _MonitorEntry::DYING) &&

(entry._type == Monitor::CONNECTION))

{

MessageQueue *q = MessageQueue::lookup(entry.queueId);

PEGASUS_ASSERT(q != 0);

HTTPConnection &h = *static_cast<HTTPConnection *>(q);

if (h._connectionClosePending == false)

continue;

// NOTE: do not attempt to delete while there are pending responses

// coming thru. The last response to come thru after a

// _connectionClosePending will reset _responsePending to false

// and then cause the monitor to rerun this code and clean up.

// (see HTTPConnection.cpp)

if (h._responsePending == true)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::run - Ignoring connection delete request "

"because responses are still pending. "

"connection=0x%p, socket=%d\n",

(void *)&h, h.getSocket()));

continue;

}

h._connectionClosePending = false;

MessageQueue &o = h.get_owner();

Message* message= new CloseConnectionMessage(entry.socket);

message->dest = o.getQueueId();

// HTTPAcceptor is responsible for closing the connection.

// The lock is released to allow HTTPAcceptor to call

// unsolicitSocketMessages to free the entry.

// Once HTTPAcceptor completes processing of the close

// connection, the lock is re-requested and processing of

// the for loop continues. This is safe with the current

// implementation of the entries object. Note that the

// loop condition accesses the entries.size() on each

// iteration, so that a change in size while the mutex is

// unlocked will not result in an ArrayIndexOutOfBounds

// exception.

void monitor_2_entry::set_sock(pegasus_socket& s)

_entry_mut.unlock();

{

o.enqueue(message);

_rep->psock = s;

_entry_mut.lock();

// After enqueue a message and the autoEntryMutex has been

// released and locked again, the array of _entries can be

// changed. The ArrayIterator has be reset with the original

// _entries.

entries.reset(_entries);

}

Uint32 _idleEntries = 0;

monitor_2::monitor_2(void)

: _session_dispatch(0), _accept_dispatch(0), _listeners(true, 0),

We will keep track of the maximum socket number and pass this value

_ready(true), _die(0), _requestCount(0)

to the kernel as a parameter to SELECT. This loop seems like a good

place to calculate the max file descriptor (maximum socket number)

because we have to traverse the entire array.

SocketHandle maxSocketCurrentPass = 0;

for (int indx = 0; indx < (int)entries.size(); indx++)

{

try {

if (maxSocketCurrentPass < entries[indx].socket)

maxSocketCurrentPass = entries[indx].socket;

bsd_socket_factory _factory;

if (entries[indx]._status.get() == _MonitorEntry::IDLE)

{

_idleEntries++;

FD_SET(entries[indx].socket, &fdread);

}

// set up the listener/acceptor

pegasus_socket temp = pegasus_socket(&_factory);

Add 1 then assign maxSocket accordingly. We add 1 to account for

descriptors starting at 0.

maxSocketCurrentPass++;

temp.socket(PF_INET, SOCK_STREAM, 0);

_entry_mut.unlock();

// initialize the address

memset(&_tickle_addr, 0, sizeof(_tickle_addr));

#ifdef PEGASUS_OS_ZOS

_tickle_addr.sin_addr.s_addr = inet_addr_ebcdic("127.0.0.1");

#else

_tickle_addr.sin_addr.s_addr = inet_addr("127.0.0.1");

#endif

_tickle_addr.sin_family = PF_INET;

_tickle_addr.sin_port = 0;

PEGASUS_SOCKLEN_SIZE _addr_size = sizeof(_tickle_addr);

temp.bind((struct sockaddr *)&_tickle_addr, sizeof(_tickle_addr));

temp.listen(3);

// The first argument to select() is ignored on Windows and it is not

temp.getsockname((struct sockaddr*)&_tickle_addr, &_addr_size);

// a socket value. The original code assumed that the number of sockets

// and a socket value have the same type. On Windows they do not.

// set up the connector

#ifdef PEGASUS_OS_TYPE_WINDOWS

pegasus_socket tickler = pegasus_socket(&_factory);

int events = select(0, &fdread, NULL, NULL, &tv);

tickler.socket(PF_INET, SOCK_STREAM, 0);

struct sockaddr_in _addr;

memset(&_addr, 0, sizeof(_addr));

#ifdef PEGASUS_OS_ZOS

_addr.sin_addr.s_addr = inet_addr_ebcdic("127.0.0.1");

#else

_addr.sin_addr.s_addr = inet_addr("127.0.0.1");

int events = select(maxSocketCurrentPass, &fdread, NULL, NULL, &tv);

#endif

_addr.sin_family = PF_INET;

_entry_mut.lock();

_addr.sin_port = 0;

tickler.bind((struct sockaddr*)&_addr, sizeof(_addr));

tickler.connect((struct sockaddr*)&_tickle_addr, sizeof(_tickle_addr));

_tickler.set_sock(tickler);

_tickler.set_type(INTERNAL);

_tickler.set_state(BUSY);

struct sockaddr_in peer;

struct timeval timeNow;

memset(&peer, 0, sizeof(peer));

Time::gettimeofday(&timeNow);

PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

pegasus_socket accepted = temp.accept((struct sockaddr*)&peer, &peer_size);

// After enqueue a message and the autoEntryMutex has been released and

monitor_2_entry* _tickle = new monitor_2_entry(accepted, INTERNAL, 0, 0);

// locked again, the array of _entries can be changed. The ArrayIterator

_tickle->set_state(BUSY);

// has be reset with the original _entries

entries.reset(_entries);

if (events == PEGASUS_SOCKET_ERROR)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::run - errorno = %d has occurred on select.", errno));

// The EBADF error indicates that one or more or the file

// descriptions was not valid. This could indicate that

// the entries structure has been corrupted or that

// we have a synchronization error.

PEGASUS_ASSERT(errno != EBADF);

}

else if (events)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::run select event received events = %d, monitoring %d "

"idle entries",

events, _idleEntries));

for (int indx = 0; indx < (int)entries.size(); indx++)

{

// The Monitor should only look at entries in the table that are

// IDLE (i.e., owned by the Monitor).

if ((entries[indx]._status.get() == _MonitorEntry::IDLE) &&

(FD_ISSET(entries[indx].socket, &fdread)))

{

MessageQueue *q = MessageQueue::lookup(entries[indx].queueId);

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::run indx = %d, queueId = %d, q = %p",

indx, entries[indx].queueId, q));

PEGASUS_ASSERT(q !=0);

_listeners.insert_first(_tickle);

try

{

if (entries[indx]._type == Monitor::CONNECTION)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"entries[indx].type for indx = %d is "

"Monitor::CONNECTION",

indx));

HTTPConnection *dst =

reinterpret_cast<HTTPConnection *>(q);

dst->_entry_index = indx;

// Update idle start time because we have received some

// data. Any data is good data at this point, and we'll

// keep the connection alive, even if we've exceeded

// the idleConnectionTimeout, which will be checked

// when we call closeConnectionOnTimeout() next.

Time::gettimeofday(&dst->_idleStartTime);

// Check for accept pending (ie. SSL handshake pending)

// or idle connection timeouts for sockets from which

// we received data (avoiding extra queue lookup below).

if (!dst->closeConnectionOnTimeout(&timeNow))

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::_dispatch: entering run() for "

"indx = %d, queueId = %d, q = %p",

dst->_entry_index,

dst->_monitor->

_entries[dst->_entry_index].queueId,

dst));

try

{

dst->run(1);

}

catch(...){ }

catch (...)

}

monitor_2::~monitor_2(void)

{

try {

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

monitor_2_entry* temp = _listeners.remove_first();

"Monitor::_dispatch: exception received");

while(temp){

delete temp;

temp = _listeners.remove_first();

}

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::_dispatch: exited run() for index %d",

dst->_entry_index));

}

catch(...){ }

}

else if (entries[indx]._type == Monitor::INTERNAL)

{

void monitor_2::run(void)

_tickler.reset();

}

else

{

monitor_2_entry* temp;

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

while(_die.value() == 0) {

"Non-connection entry, indx = %d, has been "

struct timeval tv = {0, 0};

"received.",

indx));

int events = 0;

events |= SocketMessage::READ;

Message* msg = new SocketMessage(

entries[indx].socket, events);

entries[indx]._status = _MonitorEntry::BUSY;

_entry_mut.unlock();

q->enqueue(msg);

_entry_mut.lock();

// place all sockets in the select set

// After enqueue a message and the autoEntryMutex has

FD_ZERO(&rd_fd_set);

// been released and locked again, the array of

try {

// entries can be changed. The ArrayIterator has be

_listeners.lock(pegasus_thread_self());

// reset with the original _entries

temp = _listeners.next(0);

entries.reset(_entries);

while(temp != 0 ){

entries[indx]._status = _MonitorEntry::IDLE;

if(temp->get_state() == CLOSED ){

monitor_2_entry* closed = temp;

temp = _listeners.next(closed);

_listeners.remove_no_lock(closed);

delete closed;

}

if(temp == 0)

break;

Sint32 fd = (Sint32) temp->get_sock();

if(fd >= 0 )

FD_SET(fd , &rd_fd_set);

temp = _listeners.next(temp);

}

_listeners.unlock();

catch (...)

{

}

catch(...){

return;

}

// important - the dispatch routine has pointers to all the

// else check for accept pending (ie. SSL handshake pending) or

// entries that are readable. These entries can be changed but

// idle connection timeouts for sockets from which we did not

// the pointer must not be tampered with.

// receive data.

else if ((entries[indx]._status.get() == _MonitorEntry::IDLE) &&

int events = select(FD_SETSIZE, &rd_fd_set, NULL, NULL, NULL);

entries[indx]._type == Monitor::CONNECTION)

try {

{

_listeners.lock(pegasus_thread_self());

MessageQueue *q = MessageQueue::lookup(entries[indx].queueId);

temp = _listeners.next(0);

HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(q);

while(temp != 0 ){

dst->_entry_index = indx;

Sint32 fd = (Sint32) temp->get_sock();

dst->closeConnectionOnTimeout(&timeNow);

if(fd >= 0 && FD_ISSET(fd, &rd_fd_set)) {

temp->set_state(BUSY);

FD_CLR(fd, &rd_fd_set);

monitor_2_entry* ready = new monitor_2_entry(*temp);

_ready.insert_first((void*)ready);

_requestCount++;

}

temp = _listeners.next(temp);

}

_listeners.unlock();

}

catch(...){

// else if "events" is zero (ie. select timed out) then we still need

return;

// to check if there are any pending SSL handshakes that have timed out.

else

{

for (int indx = 0; indx < (int)entries.size(); indx++)

{

if ((entries[indx]._status.get() == _MonitorEntry::IDLE) &&

entries[indx]._type == Monitor::CONNECTION)

{

MessageQueue *q = MessageQueue::lookup(entries[indx].queueId);

HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(q);

dst->_entry_index = indx;

dst->closeConnectionOnTimeout(&timeNow);

}

// now handle the sockets that are ready to read

_dispatch();

} // while alive

}

void* monitor_2::set_session_dispatch(void (*dp)(monitor_2_entry*))

void Monitor::stopListeningForConnections(Boolean wait)

{

void* old = (void *)_session_dispatch;

PEG_METHOD_ENTER(TRC_HTTP, "Monitor::stopListeningForConnections()");

_session_dispatch = dp;

// set boolean then tickle the server to recognize _stopConnections

return old;

_stopConnections = 1;

}

tickle();

void* monitor_2::set_accept_dispatch(void (*dp)(monitor_2_entry*))

if (wait)

{

void* old = (void*)_accept_dispatch;

// Wait for the monitor to notice _stopConnections. Otherwise the

_accept_dispatch = dp;

// caller of this function may unbind the ports while the monitor

return old;

// is still accepting connections on them.

_stopConnectionsSem.wait();

}

PEG_METHOD_EXIT();

}

// important - the dispatch routine has pointers to all the

int Monitor::solicitSocketMessages(

// entries that are readable. These entries can be changed but

SocketHandle socket,

// the pointer must not be tampered with.

Uint32 events,

void monitor_2::_dispatch(void)

Uint32 queueId,

int type)

{

monitor_2_entry* entry = (monitor_2_entry*) _ready.remove_first();

PEG_METHOD_ENTER(TRC_HTTP, "Monitor::solicitSocketMessages");

while(entry != 0 ){

AutoMutex autoMut(_entry_mut);

switch(entry->get_type()) {

// Check to see if we need to dynamically grow the _entries array

case INTERNAL:

// We always want the _entries array to 2 bigger than the

static char buffer[2];

// current connections requested

entry->get_sock().read(&buffer, 2);

_solicitSocketCount++; // bump the count

break;

int size = (int)_entries.size();

case LISTEN:

if ((int)_solicitSocketCount >= (size-1))

{

static struct sockaddr peer;

for (int i = 0; i < ((int)_solicitSocketCount - (size-1)); i++)

static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

{

pegasus_socket connected = entry->get_sock().accept(&peer, &peer_size);

_MonitorEntry entry(0, 0, 0);

monitor_2_entry *temp = add_entry(connected, SESSION, entry->get_accept(), entry->get_dispatch());

_entries.append(entry);

if(temp && _accept_dispatch != 0)

_accept_dispatch(temp);

}

break;

case SESSION:

if(_session_dispatch != 0 )

_session_dispatch(entry);

else {

static char buffer[4096];

int bytes = entry->get_sock().read(&buffer, 4096);

}

break;

case UNTYPED:

default:

break;

}

_requestCount--;

delete entry;

entry = (monitor_2_entry*) _ready.remove_first();

}

void monitor_2::stop(void)

int index;

for (index = 1; index < (int)_entries.size(); index++)

{

_die = 1;

try

tickle();

// shut down the listener list, free the list nodes

_tickler.get_sock().close();

_listeners.shutdown_queue();

}

void monitor_2::tickle(void)

{

static char _buffer[] =

if (_entries[index]._status.get() == _MonitorEntry::EMPTY)

{

'0','0'

_entries[index].socket = socket;

};

_entries[index].queueId = queueId;

_entries[index]._type = type;

_entries[index]._status = _MonitorEntry::IDLE;

_tickler.get_sock().write(&_buffer, 2);

return index;

}

catch (...)

monitor_2_entry* monitor_2::add_entry(pegasus_socket& ps,

monitor_2_entry_type type,

void* accept_parm,

void* dispatch_parm)

{

monitor_2_entry* m2e = new monitor_2_entry(ps, type, accept_parm, dispatch_parm);

try{

_listeners.insert_first(m2e);

}

catch(...){

delete m2e;

return 0;

}

tickle();

// decrease the count, if we are here we didn't do anything meaningful

return m2e;

_solicitSocketCount--;

PEG_METHOD_EXIT();

return -1;

}

Boolean monitor_2::remove_entry(Sint32 s)

void Monitor::unsolicitSocketMessages(SocketHandle socket)

{

monitor_2_entry* temp;

PEG_METHOD_ENTER(TRC_HTTP, "Monitor::unsolicitSocketMessages");

try {

AutoMutex autoMut(_entry_mut);

_listeners.try_lock(pegasus_thread_self());

temp = _listeners.next(0);

while(temp != 0){

Start at index = 1 because _entries[0] is the tickle entry which

if(s == (Sint32)temp->_rep->psock ){

never needs to be EMPTY;

temp = _listeners.remove_no_lock(temp);

delete temp;

unsigned int index;

_listeners.unlock();

for (index = 1; index < _entries.size(); index++)

return true;

{

}

if (_entries[index].socket == socket)

temp = _listeners.next(temp);

{

_entries[index]._status = _MonitorEntry::EMPTY;

_entries[index].socket = PEGASUS_INVALID_SOCKET;

_solicitSocketCount--;

break;

}

_listeners.unlock();

}

catch(...){

Dynamic Contraction:

To remove excess entries we will start from the end of the _entries

array and remove all entries with EMPTY status until we find the

first NON EMPTY. This prevents the positions, of the NON EMPTY

entries, from being changed.

index = _entries.size() - 1;

while (_entries[index]._status.get() == _MonitorEntry::EMPTY)

{

if (_entries.size() > MAX_NUMBER_OF_MONITOR_ENTRIES)

_entries.remove(index);

index--;

}

return false;

PEG_METHOD_EXIT();

}

Uint32 monitor_2::getOutstandingRequestCount(void)

// Note: this is no longer called with PEP 183.

ThreadReturnType PEGASUS_THREAD_CDECL Monitor::_dispatch(void* parm)

{

return _requestCount.value();

HTTPConnection *dst = reinterpret_cast<HTTPConnection *>(parm);

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::_dispatch: entering run() for indx = %d, queueId = %d, "

"q = %p",

dst->_entry_index,

dst->_monitor->_entries[dst->_entry_index].queueId,

dst));

try

{

dst->run(1);

}

catch (...)

{

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

"Monitor::_dispatch: exception received");

}

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::_dispatch: exited run() for index %d", dst->_entry_index));

PEGASUS_ASSERT(dst->_monitor->_entries[dst->_entry_index]._status.get() ==

_MonitorEntry::BUSY);

// Once the HTTPConnection thread has set the status value to either

// Monitor::DYING or Monitor::IDLE, it has returned control of the

// connection to the Monitor. It is no longer permissible to access the

// connection or the entry in the _entries table.

if (dst->_connectionClosePending)

{

dst->_monitor->_entries[dst->_entry_index]._status =

_MonitorEntry::DYING;

}

else

{

dst->_monitor->_entries[dst->_entry_index]._status =

_MonitorEntry::IDLE;

}

return 0;

}

PEGASUS_NAMESPACE_END

Legend:

Removed from v.1.48
changed lines
	Added in v.1.121.4.5

No CVS admin address has been configured