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.82 and 1.139.8.1

version 1.82, 2004/12/15 14:12:42

version 1.139.8.1, 2012/02/15 17:47:07

Line 1

//%2004////////////////////////////////////////////////////////////////////////

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

// Licensed to The Open Group (TOG) under one or more contributor license

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

// agreements. Refer to the OpenPegasusNOTICE.txt file distributed with

// this work for additional information regarding copyright ownership.

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

// Each contributor licenses this file to you under the OpenPegasus Open

// Source License; you may not use this file except in compliance with the

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

// License.

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

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

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

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

// deal in the Software without restriction, including without limitation the

// to deal in the Software without restriction, including without limitation

// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or

// the rights to use, copy, modify, merge, publish, distribute, sublicense,

// sell copies of the Software, and to permit persons to whom the Software is

// and/or sell copies of the Software, and to permit persons to whom the

// furnished to do so, subject to the following conditions:

// Software is furnished to do so, subject to the following conditions:

// THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN

// The above copyright notice and this permission notice shall be included

// ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED

// in all copies or substantial portions of the Software.

// "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT

// LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR

// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS

// PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT

// OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

// HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN

// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.

// ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION

// IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY

// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

// CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,

// TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE

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

// SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

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

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

// Modified By: Mike Day (monitor_2) mdday@us.ibm.com

// Amit K Arora (Bug#1153) amita@in.ibm.com

// Alagaraja Ramasubramanian (alags_raj@in.ibm.com) for Bug#1090

// Sushma Fernandes (sushma@hp.com) for Bug#2057

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

#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/HTTPAcceptor.h>

#include <Pegasus/Common/MessageQueueService.h>

#include <Pegasus/Common/Exception.h>

#include "ArrayIterator.h"

#ifdef PEGASUS_OS_TYPE_WINDOWS

#include "HostAddress.h"

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

#include <errno.h>

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

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

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

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

#define MAX_NUMBER_OF_MONITOR_ENTRIES 32

Monitor::Monitor()

: _module_handle(0),

_controller(0),

_async(false),

_stopConnections(0),

_stopConnectionsSem(0),

_solicitSocketCount(0),

_tickle_client_socket(-1),

_tickle_server_socket(-1),

_tickle_peer_socket(-1)

{

int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;

_initialize();

Socket::initializeInterface();

}

_rep = 0;

catch (...)

_entries.reserveCapacity(numberOfMonitorEntriesToAllocate);

// setup the tickler

initializeTickler();

// Start the count at 1 because initilizeTickler()

// has added an entry in the first position of the

// _entries array

for( int i = 1; i < numberOfMonitorEntriesToAllocate; 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),

_stopConnectionsSem(0),

_solicitSocketCount(0),

_tickle_client_socket(-1),

_tickle_server_socket(-1),

_tickle_peer_socket(-1)

{

int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;

_uninitialize();

Socket::initializeInterface();

}

_rep = 0;

_entries.reserveCapacity(numberOfMonitorEntriesToAllocate);

// setup the tickler

void Tickler::notify()

initializeTickler();

{

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

}

// Start the count at 1 because initilizeTickler()

void Tickler::reset()

// has added an entry in the first position of the

{

// _entries array

// Clear all bytes from the tickle socket

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

char buffer[32];

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

{

_MonitorEntry entry(0, 0, 0);

_entries.append(entry);

}

Monitor::~Monitor()

#if defined(PEGASUS_OS_TYPE_UNIX)

// Use an anonymous pipe for the tickle connection.

void Tickler::_initialize()

{

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

int fds[2];

"deregistering with module controller");

if(_module_handle != NULL)

if (pipe(fds) == -1)

{

_controller->deregister_module(PEGASUS_MODULENAME_MONITOR);

MessageLoaderParms parms(

_controller = 0;

"Common.Monitor.TICKLE_CREATE",

delete _module_handle;

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

getSocketError());

throw Exception(parms);

}

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

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

_serverSocket = fds[0];

_clientSocket = fds[1];

try{

Socket::disableBlocking(_serverSocket);

if(_tickle_peer_socket >= 0)

{

Socket::close(_tickle_peer_socket);

}

if(_tickle_client_socket >= 0)

{

Socket::close(_tickle_client_socket);

}

if(_tickle_server_socket >= 0)

#else

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

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

void Tickler::_initialize()

{

Socket::close(_tickle_server_socket);

}

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

// based on whether IPv6 is enabled.

Socket::initializeInterface();

# ifdef PEGASUS_ENABLE_IPV6

struct sockaddr_storage listenAddress;

struct sockaddr_storage clientAddress;

struct sockaddr_storage serverAddress;

# else

struct sockaddr_in listenAddress;

struct sockaddr_in clientAddress;

struct sockaddr_in serverAddress;

# endif

int addressFamily;

SocketLength addressLength;

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

# ifdef PEGASUS_ENABLE_IPV6

if (System::isIPv6StackActive())

{

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

addressLength = sizeof(struct sockaddr_in6);

}

catch(...)

else

# endif

{

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

// Use the IPv4 loopback address for the listen sockets

"Failed to close tickle sockets");

HostAddress::convertTextToBinary(

}

HostAddress::AT_IPV4,

"127.0.0.1",

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

Socket::uninitializeInterface();

addressFamily = AF_INET;

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

addressLength = sizeof(struct sockaddr_in);

"returning from monitor destructor");

}

void Monitor::initializeTickler(){

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

clientAddress = listenAddress;

NOTE: On any errors trying to

setup out tickle connection,

throw an exception/end the server

/* setup the tickle server/listener */

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

// get a socket for the server side

// Create the listen socket

if((_tickle_server_socket = ::socket(PF_INET, SOCK_STREAM, 0)) < 0){

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

//handle error

PEGASUS_INVALID_SOCKET)

MessageLoaderParms parms("Common.Monitor.TICKLE_CREATE",

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_CREATE",

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

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

getSocketError());

errno);

#else

WSAGetLastError());

#endif

throw Exception(parms);

}

// initialize the address

// Bind the listen socket to the loopback address

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

if (::bind(

#ifdef PEGASUS_OS_ZOS

_listenSocket,

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

reinterpret_cast<struct sockaddr*>(&listenAddress),

#else

addressLength) < 0)

#ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM

{

#pragma convert(37)

MessageLoaderParms parms(

#endif

"Common.Monitor.TICKLE_BIND",

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

#ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM

#pragma convert(0)

#endif

_tickle_server_addr.sin_family = PF_INET;

_tickle_server_addr.sin_port = 0;

PEGASUS_SOCKLEN_SIZE _addr_size = sizeof(_tickle_server_addr);

// bind server side to socket

if((::bind(_tickle_server_socket,

(struct sockaddr *)&_tickle_server_addr,

sizeof(_tickle_server_addr))) < 0){

// handle error

MessageLoaderParms parms("Common.Monitor.TICKLE_BIND",

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

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

getSocketError());

errno);

#else

WSAGetLastError());

#endif

throw Exception(parms);

}

// tell the kernel we are a server

// Listen for a connection from the tickle client

if((::listen(_tickle_server_socket,3)) < 0){

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

// handle error

{

MessageLoaderParms parms("Common.Monitor.TICKLE_LISTEN",

MessageLoaderParms parms(

"Common.Monitor.TICKLE_LISTEN",

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

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

getSocketError());

errno);

#else

WSAGetLastError());

#endif

throw Exception(parms);

}

// make sure we have the correct socket for our server

// Verify we have the correct listen socket

int sock = ::getsockname(_tickle_server_socket,

SocketLength tmpAddressLength = addressLength;

(struct sockaddr*)&_tickle_server_addr,

int sock = ::getsockname(

&_addr_size);

_listenSocket,

if(sock < 0){

reinterpret_cast<struct sockaddr*>(&listenAddress),

// handle error

&tmpAddressLength);

MessageLoaderParms parms("Common.Monitor.TICKLE_SOCKNAME",

if (sock < 0)

{

MessageLoaderParms parms(

"Common.Monitor.TICKLE_SOCKNAME",

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

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

getSocketError());

errno);

#else

WSAGetLastError());

#endif

throw Exception(parms);

}

/* set up the tickle client/connector */

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

// get a socket for our tickle client

// Create the client socket

if((_tickle_client_socket = ::socket(PF_INET, SOCK_STREAM, 0)) < 0){

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

// handle error

PEGASUS_INVALID_SOCKET)

MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_CREATE",

{

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

MessageLoaderParms parms(

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

"Common.Monitor.TICKLE_CLIENT_CREATE",

errno);

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

#else

"socket.",

WSAGetLastError());

getSocketError());

#endif

throw Exception(parms);

}

// setup the address of the client

// Bind the client socket to the loopback address

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

if (::bind(

#ifdef PEGASUS_OS_ZOS

_clientSocket,

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

reinterpret_cast<struct sockaddr*>(&clientAddress),

#else

addressLength) < 0)

#ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM

{

#pragma convert(37)

MessageLoaderParms parms(

#endif

"Common.Monitor.TICKLE_CLIENT_BIND",

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

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

#ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM

"socket.",

#pragma convert(0)

getSocketError());

#endif

throw Exception(parms);

#endif

}

_tickle_client_addr.sin_family = PF_INET;

_tickle_client_addr.sin_port = 0;

// bind socket to client side

// Connect the client socket to the listen socket address

if((::bind(_tickle_client_socket,

if (::connect(

(struct sockaddr*)&_tickle_client_addr,

_clientSocket,

sizeof(_tickle_client_addr))) < 0){

reinterpret_cast<struct sockaddr*>(&listenAddress),

// handle error

addressLength) < 0)

MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_BIND",

{

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

MessageLoaderParms parms(

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

"Common.Monitor.TICKLE_CLIENT_CONNECT",

errno);

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

#else

"socket.",

WSAGetLastError());

getSocketError());

#endif

throw Exception(parms);

}

// connect to server side

if((::connect(_tickle_client_socket,

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

(struct sockaddr*)&_tickle_server_addr,

sizeof(_tickle_server_addr))) < 0){

// handle error

tmpAddressLength = addressLength;

MessageLoaderParms parms("Common.Monitor.TICKLE_CLIENT_CONNECT",

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

// Accept the client socket connection.

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

_serverSocket = ::accept(

errno);

_listenSocket,

#else

reinterpret_cast<struct sockaddr*>(&serverAddress),

WSAGetLastError());

&tmpAddressLength);

#endif

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

}

/* set up the slave connection */

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

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

PEGASUS_SOCKLEN_SIZE peer_size = sizeof(_tickle_peer_addr);

pegasus_sleep(1);

Socket::close(_listenSocket);

// this call may fail, we will try a max of 20 times to establish this peer connection

Socket::disableBlocking(_serverSocket);

if((_tickle_peer_socket = ::accept(_tickle_server_socket,

Socket::disableBlocking(_clientSocket);

(struct sockaddr*)&_tickle_peer_addr,

&peer_size)) < 0){

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

// Only retry on non-windows platforms.

if(_tickle_peer_socket == -1 && errno == EAGAIN)

{

int retries = 0;

{

pegasus_sleep(1);

_tickle_peer_socket = ::accept(_tickle_server_socket,

(struct sockaddr*)&_tickle_peer_addr,

&peer_size);

retries++;

} while(_tickle_peer_socket == -1 && errno == EAGAIN && retries < 20);

}

#endif

void Tickler::_uninitialize()

{

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

try

{

Socket::close(_serverSocket);

Socket::close(_clientSocket);

Socket::close(_listenSocket);

}

if(_tickle_peer_socket == -1){

catch (...)

// handle error

{

MessageLoaderParms parms("Common.Monitor.TICKLE_ACCEPT",

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL2,

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

"Failed to close tickle sockets");

#if !defined(PEGASUS_OS_TYPE_WINDOWS)

errno);

#else

WSAGetLastError());

#endif

throw Exception(parms);

}

// add the tickler to the list of entries to be monitored and set to IDLE because Monitor only

Socket::uninitializeInterface();

// checks entries with IDLE state for events

_MonitorEntry entry(_tickle_peer_socket, 1, INTERNAL);

entry._status = _MonitorEntry::IDLE;

_entries.append(entry);

}

void Monitor::tickle(void)

{

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

static char _buffer[] =

// Monitor

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

#define MAX_NUMBER_OF_MONITOR_ENTRIES 32

Monitor::Monitor()

: _stopConnections(0),

_stopConnectionsSem(0),

_solicitSocketCount(0)

{

'0','0'

int numberOfMonitorEntriesToAllocate = MAX_NUMBER_OF_MONITOR_ENTRIES;

};

_entries.reserveCapacity(numberOfMonitorEntriesToAllocate);

AutoMutex autoMutex(_tickle_mutex);

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

Socket::disableBlocking(_tickle_client_socket);

// Monitor will watch for its events.

Socket::write(_tickle_client_socket,&_buffer, 2);

_entries.append(MonitorEntry(

Socket::enableBlocking(_tickle_client_socket);

_tickler.getReadHandle(),

MonitorEntry::STATUS_IDLE,

MonitorEntry::TYPE_TICKLER));

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

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

{

_entries.append(MonitorEntry());

}

void Monitor::setState( Uint32 index, _MonitorEntry::entry_status status )

Monitor::~Monitor()

{

// Set the state to requested state

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

_entries[index]._status = status;

"returning from monitor destructor");

}

Boolean Monitor::run(Uint32 milliseconds)

void Monitor::tickle()

{

_tickler.notify();

}

Boolean handled_events = false;

void Monitor::setState(

int i = 0;

Uint32 index,

MonitorEntry::Status status)

{

AutoMutex autoEntryMutex(_entriesMutex);

// Set the state to requested state

_entries[index].status = status;

}

void Monitor::run(Uint32 milliseconds)

{

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

fd_set fdread;

FD_ZERO(&fdread);

_entry_mut.lock(pegasus_thread_self());

AutoMutex autoEntryMutex(_entriesMutex);

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

ArrayIterator<MonitorEntry> entries(_entries);

if (_stopConnections == 1)

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

// entries

if (_stopConnections.get() == 1)

{

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

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

{

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

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

{

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

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

{

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

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

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

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

{

// remove the entry

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

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

}

else

{

// set status to DYING

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

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

}

Line 445

Line 413

_stopConnectionsSem.signal();

}

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

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

{

const _MonitorEntry &entry = _entries[indx];

const MonitorEntry& entry = entries[indx];

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

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

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

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

{

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

PEGASUS_ASSERT(q != 0);

Line 466

Line 435

if (h._responsePending == true)

{

Tracer::trace(TRC_HTTP, Tracer::LEVEL4, "Monitor::run - "

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Ignoring connection delete request because "

"Monitor::run - Ignoring connection delete request "

"responses are still pending. "

"because responses are still pending. "

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

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

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

continue;

}

h._connectionClosePending = false;

MessageQueue &o = h.get_owner();

HTTPAcceptor &o = h.getOwningAcceptor();

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

message->dest = o.getQueueId();

Line 484

Line 453

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

// implementation of the entries object. Note that the

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

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

_entry_mut.unlock();

_entriesMutex.unlock();

o.enqueue(message);

_entry_mut.lock(pegasus_thread_self());

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

}

Line 504

Line 479

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

because we have to traverse the entire array.

int maxSocketCurrentPass = 0;

SocketHandle maxSocketCurrentPass = 0;

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

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

{

if(maxSocketCurrentPass < _entries[indx].socket)

if (maxSocketCurrentPass < entries[indx].socket)

maxSocketCurrentPass = _entries[indx].socket;

maxSocketCurrentPass = entries[indx].socket;

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

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

{

_idleEntries++;

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

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

}

Line 523

Line 498

maxSocketCurrentPass++;

_entry_mut.unlock();

_entriesMutex.unlock();

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

_entry_mut.lock(pegasus_thread_self());

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

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

if(events == SOCKET_ERROR)

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

#else

if(events == -1)

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

#endif

int selectErrno = getSocketError();

_entriesMutex.lock();

struct timeval timeNow;

Time::gettimeofday(&timeNow);

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

{

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

PEG_TRACE((TRC_HTTP, Tracer::LEVEL1,

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

"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

// the entries structure has been corrupted or that

// we have a synchronization error.

PEGASUS_ASSERT(errno != EBADF);

PEGASUS_ASSERT(selectErrno != EBADF);

}

else if (events)

{

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

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

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

events, _idleEntries);

"idle entries",

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

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

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

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

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

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

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

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

{

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

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

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

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

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

PEGASUS_ASSERT(q !=0);

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

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

try

{

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

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

{

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

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"_entries[indx].type for indx = %d is Monitor::CONNECTION", indx);

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

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

indx));

// Do not update the entry just yet. The entry gets updated once

HTTPConnection *dst =

// the request has been read.

reinterpret_cast<HTTPConnection *>(q);

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

dst->_entry_index = indx;

// If allocate_and_awaken failure, retry on next iteration

// Update idle start time because we have received some

/* Removed for PEP 183.

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

if (!MessageQueueService::get_thread_pool()->allocate_and_awaken(

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

(void *)q, _dispatch))

// the idleConnectionTimeout, which will be checked

{

// when we call closeConnectionOnTimeout() next.

Tracer::trace(TRC_DISCARDED_DATA, Tracer::LEVEL2,

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

"Monitor::run: Insufficient resources to process request.");

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

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

_entry_mut.unlock();

// or idle connection timeouts for sockets from which

return true;

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

}

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

{

// Added for PEP 183

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

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

"Entering HTTPConnection::run() for "

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

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

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

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

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

try

{

dst->run(1);

}

catch (...)

{

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

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL1,

"Monitor::_dispatch: exception received");

"Caught exception from "

"HTTPConnection::run()");

}

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

PEG_TRACE_CSTRING(TRC_HTTP, Tracer::LEVEL4,

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

"Exited HTTPConnection::run()");

}

// It is possible the entry status may not be set to busy.

}

// The following will fail in that case.

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

// PEGASUS_ASSERT(dst->_monitor->_entries[dst->_entry_index]._status.value() == _MonitorEntry::BUSY);

{

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

_tickler.reset();

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

// The following is not relevant as the worker thread or the

// reader thread will update the status of the entry.

//if (dst->_connectionClosePending)

//{

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

//}

//else

//{

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

//}

// end Added for PEP 183

}

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

// set ourself to BUSY,

// read the data

// and set ourself back to IDLE

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

static char buffer[2];

Socket::disableBlocking(_entries[indx].socket);

Sint32 amt = Socket::read(_entries[indx].socket,&buffer, 2);

Socket::enableBlocking(_entries[indx].socket);

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

}

else

{

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

PEG_TRACE((TRC_HTTP, Tracer::LEVEL4,

"Non-connection entry, indx = %d, has been received.", indx);

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

int events = 0;

"received.",

events |= SocketMessage::READ;

indx));

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

Message* msg = new SocketMessage(

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

entries[indx].socket, SocketMessage::READ);

_entry_mut.unlock();

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

_entriesMutex.unlock();

q->enqueue(msg);

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

_entriesMutex.lock();

return true;

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

{

}

handled_events = true;

}

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

{

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

PEGASUS_ASSERT(q != 0);

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

dst->_entry_index = indx;

dst->closeConnectionOnTimeout(&timeNow);

}

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

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

PEGASUS_ASSERT(q != 0);

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

dst->_entry_index = indx;

dst->closeConnectionOnTimeout(&timeNow);

}

_entry_mut.unlock();

return(handled_events);

}

void Monitor::stopListeningForConnections(Boolean wait)

Line 671

Line 670

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

try

_stopConnectionsSem.wait();

{

_stopConnectionsSem.time_wait(10000);

}

catch (TimeOut &)

{

// The monitor is probably busy processng a very long request, and is

// not accepting connections. Let the caller unbind the ports.

}

PEG_METHOD_EXIT();

Line 687

Line 678

int Monitor::solicitSocketMessages(

Sint32 socket,

SocketHandle socket,

Uint32 events,

Uint32 queueId,

int type)

Uint32 type)

{

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

AutoMutex autoMut(_entry_mut);

AutoMutex autoMut(_entriesMutex);

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

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

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

// current connections requested

_solicitSocketCount++; // bump the count

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

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

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

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

{

_MonitorEntry entry(0, 0, 0);

_entries.append(MonitorEntry());

_entries.append(entry);

}

int index;

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

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

{

try

{

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

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

{

_entries[index].socket = socket;

_entries[index].queueId = queueId;

_entries[index]._type = type;

_entries[index].type = type;

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

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

return index;

PEG_METHOD_EXIT();

return (int)index;

}

catch(...)

{

}

_solicitSocketCount--; // decrease the count, if we are here we didnt do anything meaningful

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

_solicitSocketCount--;

PEG_METHOD_EXIT();

return -1;

}

void Monitor::unsolicitSocketMessages(Sint32 socket)

void Monitor::unsolicitSocketMessages(SocketHandle socket)

{

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

AutoMutex autoMut(_entry_mut);

AutoMutex autoMut(_entriesMutex);

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

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

to be EMPTY;

never needs to be reset to EMPTY;

int index;

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

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

{

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

{

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

_entries[index].reset();

_entries[index].socket = -1;

_solicitSocketCount--;

break;

}

Line 755

Line 742

Dynamic Contraction:

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

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

and remove all entries with EMPTY status until we find the first NON EMPTY.

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

This prevents the positions, of the NON EMPTY entries, from being changed.

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

entries, from being changed.

index = _entries.size() - 1;

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

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

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

if(_entries.size() > MAX_NUMBER_OF_MONITOR_ENTRIES)

(index >= MAX_NUMBER_OF_MONITOR_ENTRIES);

index--)

{

_entries.remove(index);

index--;

}

PEG_METHOD_EXIT();

}

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

PEGASUS_THREAD_RETURN PEGASUS_THREAD_CDECL Monitor::_dispatch(void *parm)

{

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

Tracer::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 (...)

{

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

"Monitor::_dispatch: exception received");

}

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

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

PEGASUS_ASSERT(dst->_monitor->_entries[dst->_entry_index]._status.value() == _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;

}

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

m2e_rep::m2e_rep(void)

:Base(), state(IDLE)

{

}

m2e_rep::m2e_rep(monitor_2_entry_type _type,

pegasus_socket _sock,

void* _accept,

void* _dispatch)

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

accept_parm(_accept), dispatch_parm(_dispatch)

{

}

m2e_rep::~m2e_rep(void)

{

}

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;

}

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

{

if(this != &r) {

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)

{

if(this == &r)

return true;

return false;

}

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

{

if((void*)this == r)

return true;

return false;

}

m2e_rep::operator pegasus_socket() const

{

return psock;

}

monitor_2_entry::monitor_2_entry(void)

{

_rep = new m2e_rep();

}

monitor_2_entry::monitor_2_entry(pegasus_socket& _psock,

monitor_2_entry_type _type,

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)

{

if(this != &e){

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

}

monitor_2_entry::~monitor_2_entry(void)

{

Dec(_rep);

}

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

{

if(this != &e){

Dec(_rep);

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

}

return *this;

}

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

{

if(this == &me)

return true;

return false;

}

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

{

if((void *)this == k)

return true;

return false;

}

monitor_2_entry_type monitor_2_entry::get_type(void) const

{

return _rep->type;

}

void monitor_2_entry::set_type(monitor_2_entry_type t)

{

_rep->type = t;

}

monitor_2_entry_state monitor_2_entry::get_state(void) const

{

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

}

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;

}

void* monitor_2_entry::get_dispatch(void) const

{

return _rep->dispatch_parm;

}

void monitor_2_entry::set_dispatch(void* a)

{

_rep->dispatch_parm = a;

}

pegasus_socket monitor_2_entry::get_sock(void) const

{

return _rep->psock;

}

void monitor_2_entry::set_sock(pegasus_socket& s)

{

_rep->psock = s;

}

//static monitor_2* _m2_instance;

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

monitor_2::monitor_2(void)

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

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

{

try {

bsd_socket_factory _factory;

// set up the listener/acceptor

pegasus_socket temp = pegasus_socket(&_factory);

temp.socket(PF_INET, SOCK_STREAM, 0);

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

#ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM

#pragma convert(37)

#endif

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

#ifdef PEGASUS_PLATFORM_OS400_ISERIES_IBM

#pragma convert(0)

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

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

// set up the connector

pegasus_socket tickler = pegasus_socket(&_factory);

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

#endif

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

_tickler.set_state(BUSY);

struct sockaddr_in peer;

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

PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

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

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

// No need to set _tickle's state as BUSY, since monitor_2::run() now

// does a select only on sockets which are in IDLE (default) state.

// _tickle->set_state(BUSY);

_listeners.insert_first(_tickle);

}

catch(...){ }

}

monitor_2::~monitor_2(void)

{

stop();

try {

monitor_2_entry* temp = _listeners.remove_first();

while(temp){

delete temp;

temp = _listeners.remove_first();

}

catch(...){ }

try

{

HTTPConnection2* temp = _connections.remove_first();

while(temp)

{

delete temp;

temp = _connections.remove_first();

}

catch(...)

{

}

void monitor_2::run(void)

{

monitor_2_entry* temp;

int _nonIdle=0, _idleCount=0, events;

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

_nonIdle=_idleCount=0;

struct timeval tv_idle = { 60, 0 };

// place all sockets in the select set

FD_ZERO(&rd_fd_set);

try {

_listeners.lock(pegasus_thread_self());

temp = _listeners.next(0);

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

"monitor_2::run:Creating New FD list for SELECT.");

while(temp != 0 ){

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

monitor_2_entry* closed = temp;

temp = _listeners.next(closed);

_listeners.remove_no_lock(closed);

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

"monitor_2::run:Deleteing CLOSED socket fd=%d.",(Sint32)closed->get_sock());

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

delete cn;

delete closed;

}

if(temp == 0)

break;

//Count the number if IDLE sockets

if(temp->get_state() != IDLE ) _nonIdle++;

else _idleCount++;

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

//Select should be called ONLY on the FDs which are in IDLE state

if((fd >= 0) && (temp->get_state() == IDLE))

{

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

"monitor_2::run:Adding FD %d to the list for SELECT.",fd);

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.

if(_connections.count() )

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

else

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

if(_die.value())

{

break;

}

#ifdef PEGASUS_OS_TYPE_WINDOWS

if(events == SOCKET_ERROR)

#else

if(events == -1)

#endif

{

Tracer::trace(TRC_HTTP, Tracer::LEVEL2,

"monitor_2:run:INVALID FD. errorno = %d 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.

// Keeping the line below commented for time being.

// PEGASUS_ASSERT(errno != EBADF);

}

else if (events)

{

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

"monitor_2::run select event received events = %d, monitoring %d idle entries", events, _idleCount);

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

if(temp->get_type() != CLIENTSESSION) temp->set_state(BUSY);

FD_CLR(fd, &rd_fd_set);

monitor_2_entry* ready = new monitor_2_entry(*temp);

try

{

_ready.insert_first(ready);

}

catch(...)

{

}

_requestCount++;

}

temp = _listeners.next(temp);

}

_listeners.unlock();

}

catch(...){

return;

}

// now handle the sockets that are ready to read

if(_ready.count())

_dispatch();

else

{

if(_connections.count() == 0 )

_idle_dispatch(_idle_parm);

}

} // if events

} // while alive

_die=0;

}

int monitor_2::solicitSocketMessages(

Sint32 socket,

Uint32 events,

Uint32 queueId,

int type)

{

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

AutoMutex autoMut(_entry_mut);

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

{

try

{

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

{

_entries[index].socket = socket;

//_entries[index].queueId = queueId;

//_entries[index]._type = type;

_entries[index]._status = IDLE;

return index;

}

catch(...)

{

}

PEG_METHOD_EXIT();

return -1;

}

void monitor_2::unsolicitSocketMessages(Sint32 socket)

{

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

AutoMutex autoMut(_entry2_mut);

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

{

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

{

_entries2[index]._status = monitor_2_entry::EMPTY;

_entries2[index].socket = -1;

break;

}

PEG_METHOD_EXIT();

}

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;

}

void* monitor_2::set_idle_dispatch(void (*dp)(void*))

{

void* old = (void*)_idle_dispatch;

_idle_dispatch = dp;

return old;

}

void* monitor_2::set_idle_parm(void* parm)

{

void* old = _idle_parm;

_idle_parm = parm;

return old;

}

//-----------------------------------------------------------------

// Note on deleting the monitor_2_entry nodes:

// Each case: in the switch statement needs to handle the deletion

// of the monitor_2_entry * node differently. A SESSION dispatch

// routine MUST DELETE the entry during its dispatch handling.

// All other dispatch routines MUST NOT delete the entry during the

// dispatch handling, but must allow monitor_2::_dispatch to delete

// the entry.

// The reason is pretty obscure and it is debatable whether or not

// to even bother, but during cimserver shutdown the single monitor_2_entry*

// will leak unless the _session_dispatch routine takes care of deleting it.

// The reason is that a shutdown messages completely stops everything and

// the _session_dispatch routine never returns. So monitor_2::_dispatch is

// never able to do its own cleanup.

// << Mon Oct 13 09:33:33 2003 mdd >>

//-----------------------------------------------------------------

void monitor_2::_dispatch(void)

{

monitor_2_entry* entry;

try

{

entry = _ready.remove_first();

}

catch(...)

{

}

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

entry->set_state(IDLE); // Set state of the socket to IDLE so that

// monitor_2::run can add to the list of FDs

// on which select would be called.

delete entry;

break;

case LISTEN:

{

static struct sockaddr peer;

static PEGASUS_SOCKLEN_SIZE peer_size = sizeof(peer);

entry->get_sock().disableBlocking();

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

entry->set_state(IDLE); // Set state of the LISTEN socket to IDLE

#ifdef PEGASUS_OS_TYPE_WINDOWS

if((Sint32)connected == SOCKET_ERROR)

#else

if((Sint32)connected == -1 )

#endif

{

delete entry;

break;

}

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

delete entry;

}

break;

case SESSION:

case CLIENTSESSION:

if(_session_dispatch != 0 )

{

// NOTE: _session_dispatch will delete entry - do not do it here

unsigned client=0;

if(entry->get_type() == CLIENTSESSION) client = 1;

Sint32 sock=(Sint32)(entry->get_sock());

_session_dispatch(entry);

if(client)

{

HTTPConnection2 *cn = monitor_2::remove_connection(sock);

if(cn) delete cn;

// stop();

_die=1;

}

else {

static char buffer[4096];

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

delete entry;

}

break;

case UNTYPED:

default:

delete entry;

break;

}

_requestCount--;

if(_ready.count() == 0 )

break;

try

{

entry = _ready.remove_first();

}

catch(...)

{

}

void monitor_2::stop(void)

{

_die = 1;

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[] =

{

'0','0'

};

_tickler.get_sock().disableBlocking();

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

_tickler.get_sock().enableBlocking();

}

monitor_2_entry* monitor_2::add_entry(pegasus_socket& ps,

monitor_2_entry_type type,

void* accept_parm,

void* dispatch_parm)

{

Sint32 fd1,fd2;

fd2=(Sint32) ps;

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

// The purpose of the following piece of code is to avoid duplicate entries in

// the _listeners list. Would it be too much of an overhead ?

try {

monitor_2_entry* temp;

_listeners.lock(pegasus_thread_self());

temp = _listeners.next(0);

while(temp != 0 )

{

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

if(fd1 == fd2)

{

Tracer::trace(TRC_HTTP, Tracer::LEVEL3,

"monitor_2::add_entry:Request for duplicate entry in _listeners for %d FD.", fd1);

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

{

temp->set_state(IDLE);

Tracer::trace(TRC_HTTP, Tracer::LEVEL3,

"monitor_2::add_entry:CLOSED state changed to IDLE for %d.", fd1);

}

_listeners.unlock();

delete m2e;

return 0;

}

temp = _listeners.next(temp);

}

catch(...)

{

delete m2e;

return 0;

}

_listeners.unlock();

try{

_listeners.insert_first(m2e);

}

catch(...){

delete m2e;

return 0;

}

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

"monitor_2::add_entry:SUCCESSFULLY added to _listeners list. FD = %d.", fd2);

tickle();

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

}

catch(...){

}

return false;

}

Uint32 monitor_2::getOutstandingRequestCount(void)

{

return _requestCount.value();

}

HTTPConnection2* monitor_2::remove_connection(Sint32 sock)

{

HTTPConnection2* temp;

try

{

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

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

while(temp != 0 )

{

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

{

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

monitor_2::_connections.unlock();

return temp;

}

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

}

monitor_2::_connections.unlock();

}

catch(...)

{

}

return 0;

}

Boolean monitor_2::insert_connection(HTTPConnection2* connection)

{

try

{

monitor_2::_connections.insert_first(connection);

}

catch(...)

{

return false;

}

return true;

}

PEGASUS_NAMESPACE_END

Legend:

Removed from v.1.82
changed lines
	Added in v.1.139.8.1

No CVS admin address has been configured