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.49 and 1.130

version 1.49, 2003/09/26 19:04:06

version 1.130, 2008/02/27 20:21:17

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: Mike Day (monitor_2) mdday@us.ibm.com

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

#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 \

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

: _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), _stopConnections(0)

{

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

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

MessageLoaderParms parms(

{

"Common.Monitor.TICKLE_BIND",

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

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

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

getSocketError());

{

throw Exception(parms);

_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

{

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)

MessageLoaderParms parms(

{

"Common.Monitor.TICKLE_CLIENT_BIND",

_entries[index].socket = socket;

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

_entries[index].queueId = queueId;

"socket.",

_entries[index]._type = type;

getSocketError());

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

throw Exception(parms);

_entry_mut.unlock();

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

Socket::disableBlocking(_serverSocket);

Socket::disableBlocking(_clientSocket);

}

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

#endif

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

m2e_rep::m2e_rep(void)

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

{

Socket::close(_serverSocket);

Socket::close(_clientSocket);

Socket::close(_listenSocket);

}

catch (...)

m2e_rep::~m2e_rep(void)

{

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

"Failed to close tickle sockets");

}

Socket::uninitializeInterface();

}

m2e_rep::m2e_rep(const m2e_rep& r)

: Base()

{

if(this != &r){

type = r.type;

psock = r.psock;

accept_parm = r.accept_parm;

dispatch_parm = r.dispatch_parm;

state = IDLE;

}

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

}

// Monitor

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

#define MAX_NUMBER_OF_MONITOR_ENTRIES 32

Monitor::Monitor()

: _stopConnections(0),

_stopConnectionsSem(0),

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

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

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

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

{

if(this != &r) {

_entries.append(MonitorEntry());

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)

Monitor::~Monitor()

{

if(this == &r)

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

return true;

"returning from monitor destructor");

return false;

}

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

void Monitor::tickle()

{

if((void*)this == r)

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

return true;

return false;

}

m2e_rep::operator pegasus_socket() const

void Monitor::setState(

Uint32 index,

MonitorEntry::Status status)

{

return psock;

AutoMutex autoEntryMutex(_entriesMutex);

// Set the state to requested state

_entries[index].status = status;

}

void Monitor::run(Uint32 milliseconds)

monitor_2_entry::monitor_2_entry(void)

{

_rep = new m2e_rep();

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

}

monitor_2_entry::monitor_2_entry(pegasus_socket& _psock,

fd_set fdread;

monitor_2_entry_type _type,

FD_ZERO(&fdread);

void* _accept_parm, void* _dispatch_parm)

{

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

}

monitor_2_entry::monitor_2_entry(const monitor_2_entry& e)

AutoMutex autoEntryMutex(_entriesMutex);

{

if(this != &e){

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

}

monitor_2_entry::~monitor_2_entry(void)

ArrayIterator<MonitorEntry> entries(_entries);

{

Dec(_rep);

}

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

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

// entries

if (_stopConnections.get() == 1)

{

if(this != &e){

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

Dec(_rep);

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

}

return *this;

}

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

{

if(this == &me)

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

return true;

return false;

}

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

{

if((void *)this == k)

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

return true;

return false;

}

monitor_2_entry_type monitor_2_entry::get_type(void) const

{

return _rep->type;

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

}

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

void monitor_2_entry::set_type(monitor_2_entry_type t)

{

_rep->type = t;

// remove the entry

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

}

else

monitor_2_entry_state monitor_2_entry::get_state(void) const

{

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

// set status to DYING

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

}

void monitor_2_entry::set_state(monitor_2_entry_state t)

{

_rep->state = t;

}

void* monitor_2_entry::get_accept(void) const

{

return _rep->accept_parm;

}

void monitor_2_entry::set_accept(void* a)

{

_rep->accept_parm = a;

}

_stopConnections = 0;

_stopConnectionsSem.signal();

void* monitor_2_entry::get_dispatch(void) const

{

return _rep->dispatch_parm;

}

void monitor_2_entry::set_dispatch(void* a)

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

{

_rep->dispatch_parm = a;

const MonitorEntry& entry = entries[indx];

}

pegasus_socket monitor_2_entry::get_sock(void) const

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

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

{

return _rep->psock;

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

}

PEGASUS_ASSERT(q != 0);

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

void monitor_2_entry::set_sock(pegasus_socket& s)

if (h._connectionClosePending == false)

{

continue;

_rep->psock = s;

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

AsyncDQueue<HTTPConnection2> monitor_2::_connections(true, 0);

_entriesMutex.unlock();

o.enqueue(message);

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

}

monitor_2::monitor_2(void)

Uint32 _idleEntries = 0;

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

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

{

try {

bsd_socket_factory _factory;

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;

// set up the listener/acceptor

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

pegasus_socket temp = pegasus_socket(&_factory);

{

_idleEntries++;

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

}

temp.socket(PF_INET, SOCK_STREAM, 0);

// initialize the address

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

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

descriptors starting at 0.

#ifdef PEGASUS_OS_ZOS

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

maxSocketCurrentPass++;

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

_entriesMutex.unlock();

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;

int selectErrno = getSocketError();

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

_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(...){ }

}

monitor_2::~monitor_2(void)

{

try {

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

monitor_2_entry* temp = _listeners.remove_first();

while(temp){

delete temp;

temp = _listeners.remove_first();

}

catch(...){ }

}

void monitor_2::run(void)

{

monitor_2_entry* temp;

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

"entries[%d].type is TYPE_CONNECTION",

indx));

struct timeval tv = {0, 0};

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

// place all sockets in the select set

FD_ZERO(&rd_fd_set);

try {

_listeners.lock(pegasus_thread_self());

temp = _listeners.next(0);

while(temp != 0 ){

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

monitor_2_entry* closed = temp;

temp = _listeners.next(closed);

_listeners.remove_no_lock(closed);

HTTPConnection2 *cn = monitor_2::remove_connection((Sint32)(closed->get_sock()));

delete cn;

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

return;

}

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

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

// the pointer must not be tampered with.

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

try {

_listeners.lock(pegasus_thread_self());

temp = _listeners.next(0);

while(temp != 0 ){

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

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

try

{

_ready.insert_first(ready);

dst->run(1);

}

catch(...)

{

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL2,

"Caught exception from "

"HTTPConnection::run()");

}

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

_requestCount++;

"Exited HTTPConnection::run()");

}

temp = _listeners.next(temp);

}

_listeners.unlock();

}

catch(...){

return;

}

// now handle the sockets that are ready to read

_dispatch();

} // while alive

}

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

{

void* old = (void *)_session_dispatch;

_session_dispatch = dp;

return old;

}

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

{

void* old = (void*)_accept_dispatch;

_accept_dispatch = dp;

return old;

}

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

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

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

// the pointer must not be tampered with.

void monitor_2::_dispatch(void)

{

monitor_2_entry* entry;

char buffer;

Sint32 ignored =

if(_ready.count() == 0 )

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

return;

}

else

try

{

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

entry = _ready.remove_first();

// After enqueue a message and the autoEntryMutex has

// been released and locked again, the array of

// entries can be changed. The ArrayIterator has to be

// reset with the latest _entries.

entries.reset(_entries);

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

}

catch(...)

{

}

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

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

// receive data.

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

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

while(entry != 0 ) {

switch(entry->get_type()) {

case INTERNAL:

static char buffer[2];

entry->get_sock().disableBlocking();

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

entry->get_sock().enableBlocking();

break;

case LISTEN:

{

static struct sockaddr peer;

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

static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

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

entry->get_sock().disableBlocking();

dst->_entry_index = indx;

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

dst->closeConnectionOnTimeout(&timeNow);

entry->get_sock().enableBlocking();

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;

case UNTYPED:

default:

break;

}

_requestCount--;

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

delete entry;

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

else

if(_ready.count() == 0 )

break;

try

{

entry = _ready.remove_first();

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

}

{

catch(...)

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

}

void monitor_2::stop(void)

void Monitor::stopListeningForConnections(Boolean wait)

{

_die = 1;

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

// set boolean then tickle the server to recognize _stopConnections

_stopConnections = 1;

tickle();

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

if (wait)

_tickler.get_sock().close();

_listeners.shutdown_queue();

}

void monitor_2::tickle(void)

{

static char _buffer[] =

{

'0','0'

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

};

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

// is still accepting connections on them.

_stopConnectionsSem.wait();

}

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

PEG_METHOD_EXIT();

}

monitor_2_entry* monitor_2::add_entry(pegasus_socket& ps,

int Monitor::solicitSocketMessages(

monitor_2_entry_type type,

SocketHandle socket,

void* accept_parm,

Uint32 events,

void* dispatch_parm)

Uint32 queueId,

Uint32 type)

{

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

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

AutoMutex autoMut(_entriesMutex);

try{

_listeners.insert_first(m2e);

}

catch(...){

delete m2e;

return 0;

}

tickle();

return m2e;

}

Boolean monitor_2::remove_entry(Sint32 s)

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

{

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

monitor_2_entry* temp;

// current connections requested

try {

_solicitSocketCount++; // bump the count

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

}

catch(...){

}

return false;

}

Uint32 monitor_2::getOutstandingRequestCount(void)

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

{

return _requestCount.value();

_entries.append(MonitorEntry());

}

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

HTTPConnection2* monitor_2::remove_connection(Sint32 sock)

{

HTTPConnection2* temp;

try

{

monitor_2::_connections.lock(pegasus_thread_self());

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

temp = monitor_2::_connections.next(0);

while(temp != 0 )

{

if(sock == temp->getSocket())

_entries[index].socket = socket;

{

_entries[index].queueId = queueId;

temp = monitor_2::_connections.remove_no_lock(temp);

_entries[index].type = type;

monitor_2::_connections.unlock();

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

return temp;

}

return (int)index;

temp = monitor_2::_connections.next(temp);

}

monitor_2::_connections.unlock();

}

catch(...)

{

}

return 0;

}

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

_solicitSocketCount--;

PEG_METHOD_EXIT();

return -1;

}

Boolean monitor_2::insert_connection(HTTPConnection2* connection)

void Monitor::unsolicitSocketMessages(SocketHandle socket)

{

try

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

{

monitor_2::_connections.insert_first(connection);

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

}

catch(...)

{

return false;

_entries[index].reset();

_solicitSocketCount--;

break;

}

return true;

}

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

{

_entries.remove(index);

}

PEG_METHOD_EXIT();

}

PEGASUS_NAMESPACE_END

Legend:

Removed from v.1.49
changed lines
	Added in v.1.130

No CVS admin address has been configured