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.44 and 1.131

version 1.44, 2003/08/22 16:15:22

version 1.131, 2008/02/29 18:12:38

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

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

struct MonitorRep

{

fd_set rd_fd_set;

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

// Tickler

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

Monitor::Monitor()

Tickler::Tickler()

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

: _listenSocket(PEGASUS_INVALID_SOCKET),

_clientSocket(PEGASUS_INVALID_SOCKET),

_serverSocket(PEGASUS_INVALID_SOCKET)

{

Socket::initializeInterface();

try

_rep = 0;

_entries.reserveCapacity(32);

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

{

_MonitorEntry entry(0, 0, 0);

_initialize();

_entries.append(entry);

}

catch (...)

Monitor::Monitor(Boolean async)

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

{

Socket::initializeInterface();

_uninitialize();

_rep = 0;

throw;

_entries.reserveCapacity(32);

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

{

_MonitorEntry entry(0, 0, 0);

_entries.append(entry);

}

if( _async == true )

{

_thread_pool = new ThreadPool(0,

"Monitor",

create_time,

destroy_time,

deadlock_time);

}

else

_thread_pool = 0;

}

Monitor::~Monitor()

Tickler::~Tickler()

{

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

"deregistering with module controller");

if(_module_handle != NULL)

{

_controller->deregister_module(PEGASUS_MODULENAME_MONITOR);

_uninitialize();

_controller = 0;

delete _module_handle;

}

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

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

#if defined(PEGASUS_OS_TYPE_UNIX)

Socket::uninitializeInterface();

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

"returning from monitor destructor");

if(_async == true)

delete _thread_pool;

}

// Use an anonymous pipe for the tickle connection.

int Monitor::kill_idle_threads()

void Tickler::_initialize()

{

static struct timeval now, last;

int fds[2];

gettimeofday(&now, NULL);

int dead_threads = 0;

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

if (pipe(fds) == -1)

{

gettimeofday(&last, NULL);

try

{

dead_threads = _thread_pool->kill_dead_threads();

}

catch(IPCException& )

{

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

}

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

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

{

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

{

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

}

int addressFamily;

SocketLength addressLength;

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

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

#ifdef PEGASUS_OS_TYPE_WINDOWS

# ifdef PEGASUS_ENABLE_IPV6

if(events && events != SOCKET_ERROR )

if (System::isIPv6StackActive())

#else

if(events && events != -1 )

#endif

{

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

{

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

{

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

if(q == 0)

{

try

{

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

}

catch(...)

{

// Use the IPv6 loopback address for the listen sockets

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;

continue;

addressLength = sizeof(struct sockaddr_in6);

}

try

{

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

{

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

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

{

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

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

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

# endif

{

int events = 0;

// Use the IPv4 loopback address for the listen sockets

events |= SocketMessage::READ;

HostAddress::convertTextToBinary(

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

HostAddress::AT_IPV4,

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

"127.0.0.1",

_entry_mut.unlock();

&reinterpret_cast<struct sockaddr_in*>(

&listenAddress)->sin_addr.s_addr);

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

AF_INET;

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

q->enqueue(msg);

addressFamily = AF_INET;

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

addressLength = sizeof(struct sockaddr_in);

return true;

}

catch(...)

{

}

handled_events = true;

}

_entry_mut.unlock();

return(handled_events);

}

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

clientAddress = listenAddress;

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

int Monitor::solicitSocketMessages(

// Create the listen socket

Sint32 socket,

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

Uint32 events,

PEGASUS_INVALID_SOCKET)

Uint32 queueId,

int type)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CREATE",

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

getSocketError());

throw Exception(parms);

}

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

// Bind the listen socket to the loopback address

if (::bind(

int index = -1;

_listenSocket,

_entry_mut.lock(pegasus_thread_self());

reinterpret_cast<struct sockaddr*>(&listenAddress),

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_BIND",

_entries[index]._type = type;

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

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

getSocketError());

_entry_mut.unlock();

throw Exception(parms);

return index;

}

catch(...)

// Listen for a connection from the tickle client

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

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_LISTEN",

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

getSocketError());

throw Exception(parms);

}

// Verify we have the correct listen socket

_entry_mut.unlock();

SocketLength tmpAddressLength = addressLength;

PEG_METHOD_EXIT();

int sock = ::getsockname(

return index;

_listenSocket,

reinterpret_cast<struct sockaddr*>(&listenAddress),

&tmpAddressLength);

if (sock < 0)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_SOCKNAME",

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

getSocketError());

throw Exception(parms);

}

void Monitor::unsolicitSocketMessages(Sint32 socket)

{

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

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

_entry_mut.lock(pegasus_thread_self());

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

// Create the client socket

{

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

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

PEGASUS_INVALID_SOCKET)

{

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

MessageLoaderParms parms(

break;

"Common.Monitor.TICKLE_CLIENT_CREATE",

}

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

}

"socket.",

_entry_mut.unlock();

getSocketError());

PEG_METHOD_EXIT();

throw Exception(parms);

}

PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)

// Bind the client socket to the loopback address

if (::bind(

_clientSocket,

reinterpret_cast<struct sockaddr*>(&clientAddress),

addressLength) < 0)

{

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

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CLIENT_BIND",

dst->run(1);

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

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

"socket.",

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

getSocketError());

throw Exception(parms);

return 0;

}

// Connect the client socket to the listen socket address

if (::connect(

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

_clientSocket,

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

reinterpret_cast<struct sockaddr*>(&listenAddress),

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

addressLength) < 0)

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

m2e_rep::m2e_rep(void)

:Base(), state(IDLE)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CLIENT_CONNECT",

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

"socket.",

getSocketError());

throw Exception(parms);

}

m2e_rep::m2e_rep(monitor_2_entry_type _type,

pegasus_socket _sock,

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

void* _accept,

void* _dispatch)

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

accept_parm(_accept), dispatch_parm(_dispatch)

{

}

tmpAddressLength = addressLength;

// Accept the client socket connection.

_serverSocket = ::accept(

_listenSocket,

reinterpret_cast<struct sockaddr*>(&serverAddress),

&tmpAddressLength);

m2e_rep::~m2e_rep(void)

if (_serverSocket == PEGASUS_SOCKET_ERROR)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_ACCEPT",

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

"connection.",

getSocketError());

throw Exception(parms);

}

m2e_rep::m2e_rep(const m2e_rep& r)

: Base()

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

{

if(this != &r){

type = r.type;

psock = r.psock;

accept_parm = r.accept_parm;

dispatch_parm = r.dispatch_parm;

state = IDLE;

}

Socket::close(_listenSocket);

Socket::disableBlocking(_serverSocket);

Socket::disableBlocking(_clientSocket);

}

#endif

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

void Tickler::_uninitialize()

{

if(this != &r) {

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

type = r.type;

psock = r.psock;

accept_parm = r.accept_parm;

dispatch_parm = r.dispatch_parm;

state = IDLE;

}

return *this;

}

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

try

{

if(this == &r)

Socket::close(_serverSocket);

return true;

Socket::close(_clientSocket);

return false;

Socket::close(_listenSocket);

}

catch (...)

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.

_entries.append(MonitorEntry(

_tickler.getServerSocket(),

MonitorEntry::STATUS_IDLE,

MonitorEntry::TYPE_INTERNAL));

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

_entries.append(MonitorEntry());

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

}

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

Socket::write(_tickler.getClientSocket(), "\0", 1);

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::Status status)

{

if(this == &me)

AutoMutex autoEntryMutex(_entriesMutex);

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

{

_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 (Uint32 indx = 0; indx < entries.size(); indx++)

}

void monitor_2_entry::set_state(monitor_2_entry_state t)

{

_rep->state = t;

if (entries[indx].type == MonitorEntry::TYPE_ACCEPTOR)

}

void* monitor_2_entry::get_accept(void) const

{

return _rep->accept_parm;

if (entries[indx].status != MonitorEntry::STATUS_EMPTY)

}

void monitor_2_entry::set_accept(void* a)

{

_rep->accept_parm = a;

if (entries[indx].status == MonitorEntry::STATUS_IDLE ||

}

entries[indx].status == MonitorEntry::STATUS_DYING)

void* monitor_2_entry::get_dispatch(void) const

{

return _rep->dispatch_parm;

// remove the entry

entries[indx].status = MonitorEntry::STATUS_EMPTY;

}

else

void monitor_2_entry::set_dispatch(void* a)

{

_rep->dispatch_parm = a;

// set status to DYING

entries[indx].status = MonitorEntry::STATUS_DYING;

}

pegasus_socket monitor_2_entry::get_sock(void) const

}

{

}

return _rep->psock;

_stopConnections = 0;

_stopConnectionsSem.signal();

}

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

{

const MonitorEntry& entry = entries[indx];

void monitor_2_entry::set_sock(pegasus_socket& s)

if ((entry.status == MonitorEntry::STATUS_DYING) &&

(entry.type == MonitorEntry::TYPE_CONNECTION))

{

_rep->psock = s;

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

monitor_2::monitor_2(void)

// HTTPAcceptor is responsible for closing the connection.

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

// The lock is released to allow HTTPAcceptor to call

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

// unsolicitSocketMessages to free the entry.

{

// Once HTTPAcceptor completes processing of the close

try {

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

bsd_socket_factory _factory;

_entriesMutex.unlock();

o.enqueue(message);

_entriesMutex.lock();

// set up the listener/acceptor

// After enqueue a message and the autoEntryMutex has been

pegasus_socket temp = pegasus_socket(&_factory);

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

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

// _entries.

entries.reset(_entries);

}

temp.socket(PF_INET, SOCK_STREAM, 0);

Uint32 _idleEntries = 0;

// initialize the address

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

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

_tickle_addr.sin_family = PF_INET;

_tickle_addr.sin_port = 0;

PEGASUS_SOCKLEN_SIZE _addr_size = sizeof(_tickle_addr);

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

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 (Uint32 indx = 0; indx < entries.size(); indx++)

{

if (maxSocketCurrentPass < entries[indx].socket)

maxSocketCurrentPass = entries[indx].socket;

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

if (entries[indx].status == MonitorEntry::STATUS_IDLE)

temp.listen(3);

{

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

_idleEntries++;

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

}

// set up the connector

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

descriptors starting at 0.

maxSocketCurrentPass++;

pegasus_socket tickler = pegasus_socket(&_factory);

_entriesMutex.unlock();

tickler.socket(PF_INET, SOCK_STREAM, 0);

struct sockaddr_in _addr;

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

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

_addr.sin_family = PF_INET;

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

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

_tickler.set_state(BUSY);

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

#ifdef PEGASUS_OS_TYPE_WINDOWS

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

#else

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

#endif

int selectErrno = getSocketError();

struct sockaddr_in peer;

_entriesMutex.lock();

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

PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

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

struct timeval timeNow;

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

Time::gettimeofday(&timeNow);

_tickle->set_state(BUSY);

_listeners.insert_first(_tickle);

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

if (events == PEGASUS_SOCKET_ERROR)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Monitor::run - select() returned error %d.", selectErrno));

// 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(selectErrno != EBADF);

}

else if (events)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

"idle entries",

events, _idleEntries));

for (Uint32 indx = 0; indx < 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 == MonitorEntry::STATUS_IDLE) &&

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

{

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

PEGASUS_ASSERT(q != 0);

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

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

}

try

catch(...){ }

{

}

if (entries[indx].type == MonitorEntry::TYPE_CONNECTION)

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"entries[%d].type is TYPE_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,

"Entering HTTPConnection::run() for "

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

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

monitor_2::~monitor_2(void)

try

{

try {

dst->run(1);

monitor_2_entry* temp = _listeners.remove_first();

while(temp){

delete temp;

temp = _listeners.remove_first();

}

catch (...)

{

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL2,

"Caught exception from "

"HTTPConnection::run()");

}

catch(...){ }

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

"Exited HTTPConnection::run()");

}

void monitor_2::run(void)

}

else if (entries[indx].type == MonitorEntry::TYPE_INTERNAL)

{

monitor_2_entry* temp;

char buffer;

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

Sint32 ignored =

struct timeval tv = {0, 0};

Socket::read(entries[indx].socket, &buffer, 1);

}

else

{

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

"received.",

indx));

int events = 0;

events |= SocketMessage::READ;

Message* msg = new SocketMessage(

entries[indx].socket, events);

entries[indx].status = MonitorEntry::STATUS_BUSY;

_entriesMutex.unlock();

q->enqueue(msg);

_entriesMutex.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 to be

_listeners.lock(pegasus_thread_self());

// reset with the latest _entries.

temp = _listeners.next(0);

entries.reset(_entries);

while(temp != 0 ){

entries[indx].status = MonitorEntry::STATUS_IDLE;

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

monitor_2_entry* closed = temp;

temp = _listeners.next(closed);

_listeners.remove_no_lock(closed);

delete closed;

}

FD_SET((Sint32) temp->get_sock() , &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 == MonitorEntry::STATUS_IDLE) &&

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

entries[indx].type == MonitorEntry::TYPE_CONNECTION)

try {

_listeners.lock(pegasus_thread_self());

temp = _listeners.next(0);

while(temp != 0 ){

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

if(FD_ISSET(fd, &rd_fd_set)) {

{

temp->set_state(BUSY);

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

FD_CLR(fd, &rd_fd_set);

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

monitor_2_entry* ready = new monitor_2_entry(*temp);

dst->_entry_index = indx;

_ready.insert_first((void*)ready);

dst->closeConnectionOnTimeout(&timeNow);

_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 (Uint32 indx = 0; indx < entries.size(); indx++)

{

if ((entries[indx].status == MonitorEntry::STATUS_IDLE) &&

entries[indx].type == MonitorEntry::TYPE_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,

{

Uint32 type)

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

while(entry != 0 ){

switch(entry->get_type()) {

case INTERNAL:

static char buffer[2];

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

break;

case LISTEN:

{

static struct sockaddr peer;

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

static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

AutoMutex autoMut(_entriesMutex);

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

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

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;

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

case UNTYPED:

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

default:

// current connections requested

break;

_solicitSocketCount++; // bump the count

}

_requestCount--;

delete entry;

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

}

void monitor_2::stop(void)

for (Uint32 i = _entries.size(); i < _solicitSocketCount + 1; i++)

{

_die = 1;

_entries.append(MonitorEntry());

tickle();

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

_tickler.get_sock().close();

_listeners.shutdown_queue();

}

void monitor_2::tickle(void)

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

{

static char _buffer[] =

try

{

'0','0'

if (_entries[index].status == MonitorEntry::STATUS_EMPTY)

};

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

}

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

_entries[index].socket = socket;

_entries[index].queueId = queueId;

_entries[index].type = type;

_entries[index].status = MonitorEntry::STATUS_IDLE;

try{

return (int)index;

_listeners.insert_first(m2e);

}

catch(...){

delete m2e;

return 0;

}

tickle();

catch (...)

return m2e;

}

Boolean monitor_2::remove_entry(Sint32 s)

{

monitor_2_entry* temp;

try {

_listeners.try_lock(pegasus_thread_self());

temp = _listeners.next(0);

while(temp != 0){

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

temp = _listeners.remove_no_lock(temp);

delete temp;

_listeners.unlock();

return true;

}

temp = _listeners.next(temp);

}

_listeners.unlock();

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

_solicitSocketCount--;

PEG_METHOD_EXIT();

return -1;

}

catch(...){

void Monitor::unsolicitSocketMessages(SocketHandle socket)

{

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

AutoMutex autoMut(_entriesMutex);

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

never needs to be reset to EMPTY;

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

{

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

{

_entries[index].reset();

_solicitSocketCount--;

break;

}

return false;

}

Uint32 monitor_2::getOutstandingRequestCount(void)

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.

for (Uint32 index = _entries.size() - 1;

(_entries[index].status == MonitorEntry::STATUS_EMPTY) &&

(index >= MAX_NUMBER_OF_MONITOR_ENTRIES);

index--)

{

return _requestCount.value();

_entries.remove(index);

}

PEG_METHOD_EXIT();

}

PEGASUS_NAMESPACE_END

Legend:

Removed from v.1.44
changed lines
	Added in v.1.131

No CVS admin address has been configured