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

Return to System.cpp CVS log

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

Diff for /pegasus/src/Pegasus/Common/System.cpp between version 1.37.2.2 and 1.58.2.1

version 1.37.2.2, 2006/09/19 18:25:18

version 1.58.2.1, 2007/09/11 16:32:43

Line 29

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

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

// Modified By: Rudy Schuet (rudy.schuet@compaq.com) 11/12/01

// added nsk platform support

// Ramnath Ravindran (Ramnath.Ravindran@compaq.com) 03/21/2002

// replaced instances of "| ios::binary" with

// PEGASUS_OR_IOS_BINARY

// Robert Kieninger, IBM (kieningr@de.ibm.com) for Bug#667

// Dave Sudlik, IBM (dsudlik@us.ibm.com) for Bug#1462

// Sean Keenan, Hewlett-Packard Company (sean.keenan@hp.com)

// David Dillard, Symantec Corp. (david_dillard@symantec.com)

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

#if defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM)

#include <Pegasus/Common/Config.h>

#endif

#include <fstream>

#include <cctype> // for tolower()

#include <cstring>

#include "System.h"

#include "Socket.h"

#include "Network.h"

#ifdef PEGASUS_OS_TYPE_WINDOWS

# include <windows.h>

#else

# include <arpa/inet.h>

#endif

#include <Pegasus/Common/PegasusVersion.h>

#include <Pegasus/Common/FileSystem.h>

#include <Pegasus/Common/HostAddress.h>

#include <Pegasus/Common/Array.h>

#if defined(PEGASUS_OS_TYPE_WINDOWS)

# include "SystemWindows.cpp"

#elif defined(PEGASUS_OS_TYPE_UNIX)

#elif defined(PEGASUS_OS_TYPE_UNIX) || \

# include "SystemUnix.cpp"

defined(PEGASUS_OS_VMS) || \

#elif defined(PEGASUS_OS_TYPE_NSK)

defined(PEGASUS_OS_VXWORKS)

# include "SystemNsk.cpp"

# include "SystemPOSIX.cpp"

#elif defined(PEGASUS_OS_VMS)

# include "SystemVms.cpp"

#else

# error "Unsupported platform"

#endif

#if defined(PEGASUS_OS_OS400)

# include "OS400ConvertChar.h"

#endif

PEGASUS_USING_STD;

PEGASUS_NAMESPACE_BEGIN

Line 87

Line 65

Boolean System::copyFile(const char* fromPath, const char* toPath)

{

ifstream is(fromPath PEGASUS_IOS_BINARY);

ofstream os(toPath PEGASUS_IOS_BINARY);

fstream os(toPath, ios::out PEGASUS_OR_IOS_BINARY);

char c;

Line 97

Line 75

return false;

}

FileSystem::syncWithDirectoryUpdates(os);

return is.eof();

}

Line 206

Line 185

return dirname;

}

String System::getHostIP(const String &hostName)

Boolean System::getHostIP(const String &hostName, int *af, String &hostIP)

{

#ifdef PEGASUS_ENABLE_IPV6

struct addrinfo *info, hints;

memset (&hints, 0, sizeof(struct addrinfo));

// Check for valid IPV4 address, if found return ipv4 address

*af = AF_INET;

hints.ai_family = *af;

hints.ai_protocol = IPPROTO_TCP;

hints.ai_socktype = SOCK_STREAM;

if (!getaddrinfo(hostName.getCString(), 0, &hints, &info))

{

char ipAddress[PEGASUS_INET_ADDRSTR_LEN];

HostAddress::convertBinaryToText(info->ai_family,

&(reinterpret_cast<struct sockaddr_in*>(info->ai_addr))->sin_addr,

ipAddress,

PEGASUS_INET_ADDRSTR_LEN);

hostIP = ipAddress;

freeaddrinfo(info);

return true;

}

// Check for valid IPV6 Address.

*af = AF_INET6;

hints.ai_family = *af;

hints.ai_protocol = IPPROTO_TCP;

hints.ai_socktype = SOCK_STREAM;

if (!getaddrinfo(hostName.getCString(), 0, &hints, &info))

{

char ipAddress[PEGASUS_INET6_ADDRSTR_LEN];

HostAddress::convertBinaryToText(info->ai_family,

&(reinterpret_cast<struct sockaddr_in6*>(info->ai_addr))->sin6_addr,

ipAddress,

PEGASUS_INET6_ADDRSTR_LEN);

hostIP = ipAddress;

freeaddrinfo(info);

return true;

}

return false;

#else

*af = AF_INET;

struct hostent* hostEntry;

struct in_addr inaddr;

String ipAddress;

Line 237

Line 257

hostEntryBuffer,

sizeof(hostEntryBuffer),

&hostEntryErrno);

#elif defined(PEGASUS_OS_OS400)

char ebcdicHost[PEGASUS_MAXHOSTNAMELEN];

if (strlen(hostNamePtr) < PEGASUS_MAXHOSTNAMELEN)

strcpy(ebcdicHost, hostNamePtr);

else

return ipAddress;

AtoE(ebcdicHost);

hostEntry = gethostbyname(ebcdicHost);

#else

hostEntry = gethostbyname(hostNamePtr);

#endif

Line 252

Line 264

if (hostEntry)

{

::memcpy( &inaddr, hostEntry->h_addr,4);

#if defined(PEGASUS_OS_OS400)

ipAddress = ::inet_ntoa( inaddr );

char * gottenIPAdress = NULL;

}

gottenIPAdress = ::inet_ntoa( inaddr );

hostIP = ipAddress;

return true;

#endif

}

if (gottenIPAdress != NULL)

#ifdef PEGASUS_ENABLE_IPV6

Boolean System::isIPv6StackActive()

{

EtoA(gottenIPAdress);

SocketHandle ip6Socket;

ipAddress.assign(gottenIPAdress);

if ((ip6Socket = Socket::createSocket(AF_INET6, SOCK_STREAM, IPPROTO_TCP))

== PEGASUS_INVALID_SOCKET)

{

if (getSocketError() == PEGASUS_INVALID_ADDRESS_FAMILY)

{

return false;

}

#else

ipAddress = ::inet_ntoa( inaddr );

#endif

}

return ipAddress;

else

{

Socket::close(ip6Socket);

}

return true;

}

#endif

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

// Convert a hostname into a a single host unique integer representation

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

Uint32 System::_acquireIP(const char* hostname)

Boolean System::_acquireIP(const char* hostname, int *af, void *dst)

{

#ifdef PEGASUS_ENABLE_IPV6

String ipAddress;

if(getHostIP(hostname, af, ipAddress))

{

HostAddress::convertTextToBinary(*af, ipAddress.getCString(), dst);

return true;

}

return false;

#else

*af = AF_INET;

Uint32 ip = 0xFFFFFFFF;

if (!hostname) return 0xFFFFFFFF;

#ifdef PEGASUS_OS_OS400

char ebcdicHost[PEGASUS_MAXHOSTNAMELEN];

if (strlen(hostname) < PEGASUS_MAXHOSTNAMELEN)

strcpy(ebcdicHost, hostname);

else

return 0xFFFFFFFF;

AtoE(ebcdicHost);

#endif

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

// This code used to check if the first character of "hostname" was alphabetic

// to indicate hostname instead of IP address. But RFC 1123, section 2.1, relaxed

// to indicate hostname instead of IP address. But RFC 1123, section 2.1,

// this requirement to alphabetic character *or* digit. So bug 1462 changed the

// relaxed this requirement to alphabetic character *or* digit. So bug 1462

// flow here to call inet_addr first to check for a valid IP address in dotted

// changed the flow here to call inet_addr first to check for a valid IP

// decimal notation. If it's not a valid IP address, then try to validate

// address in dotted decimal notation. If it's not a valid IP address, then

// it as a hostname.

// try to validate it as a hostname.

// RFC 1123 states: The host SHOULD check the string syntactically for a

// dotted-decimal number before looking it up in the Domain Name System.

// Hence the call to inet_addr() first.

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

#ifdef PEGASUS_OS_OS400

Uint32 tmp_addr = inet_addr(ebcdicHost);

#else

Uint32 tmp_addr = inet_addr((char *) hostname);

#endif

struct hostent* hostEntry;

Line 334

Line 356

hostEntryBuffer,

sizeof(hostEntryBuffer),

&hostEntryErrno);

#elif defined(PEGASUS_OS_OS400)

hostEntry = gethostbyname(ebcdicHost);

#elif defined(PEGASUS_OS_ZOS)

char hostName[PEGASUS_MAXHOSTNAMELEN + 1];

if (String::equalNoCase("localhost",String(hostname)))

Line 343

Line 363

gethostname( hostName, PEGASUS_MAXHOSTNAMELEN );

hostName[sizeof(hostName)-1] = 0;

hostEntry = gethostbyname(hostName);

} else

}

else

{

hostEntry = gethostbyname((char *)hostname);

}

Line 352

Line 373

#endif

if (!hostEntry)

{

return 0xFFFFFFFF;

// error, couldn't resolve the ip

memcpy(dst, &ip, sizeof (Uint32));

return false;

}

unsigned char ip_part1,ip_part2,ip_part3,ip_part4;

Line 368

Line 391

else // else hostname *is* a dotted-decimal IP address

{

// resolve hostaddr to a real host entry

// casting to (const char *) as (char *) will work as (void *) too, those it fits all platforms

// casting to (const char *) as (char *) will work as (void *) too,

#ifndef PEGASUS_OS_OS400

// those it fits all platforms

hostEntry = gethostbyaddr((const char *) &tmp_addr, sizeof(tmp_addr), AF_INET);

#if defined(PEGASUS_OS_LINUX)

char hostEntryBuffer[8192];

struct hostent hostEntryStruct;

int hostEntryErrno;

gethostbyaddr_r(

(const char*) &tmp_addr,

sizeof(tmp_addr),

AF_INET,

&hostEntryStruct,

hostEntryBuffer,

sizeof(hostEntryBuffer),

&hostEntry,

&hostEntryErrno);

#elif defined(PEGASUS_OS_SOLARIS)

char hostEntryBuffer[8192];

struct hostent hostEntryStruct;

int hostEntryErrno;

hostEntry = gethostbyaddr_r(

(const char *) &tmp_addr,

sizeof(tmp_addr),

AF_INET,

&hostEntryStruct,

hostEntryBuffer,

sizeof(hostEntryBuffer),

&hostEntryErrno);

#else

hostEntry = gethostbyaddr((char *) &tmp_addr, sizeof(tmp_addr), AF_INET);

hostEntry =

gethostbyaddr((const char *) &tmp_addr, sizeof(tmp_addr), AF_INET);

#endif

if (hostEntry == 0)

{

// error, couldn't resolve the ip

return 0xFFFFFFFF;

memcpy(dst, &ip, sizeof (Uint32));

} else

return false;

}

else

{

unsigned char ip_part1,ip_part2,ip_part3,ip_part4;

ip_part1 = hostEntry->h_addr[0];

Line 393

Line 444

ip = (ip << 8) + ip_part4;

}

memcpy(dst, &ip, sizeof (Uint32));

return ip;

return true;

#endif

}

Boolean System::sameHost (const String & hostName)

Boolean System::resolveHostNameAtDNS(

{

const char* hostname,

Uint32* resolvedNameIP)

// If a port is included, return false

{

// ask the DNS for hostname resolution to IP address

if (hostName.find (":") != PEG_NOT_FOUND)

// this can mean a time delay for as long as the DNS

// takes to answer

struct hostent* hostEntry;

#if defined(PEGASUS_OS_LINUX)

char hostEntryBuffer[8192];

struct hostent hostEntryStruct;

int hostEntryErrno;

gethostbyname_r(

hostname,

&hostEntryStruct,

hostEntryBuffer,

sizeof(hostEntryBuffer),

&hostEntry,

&hostEntryErrno);

#elif defined(PEGASUS_OS_SOLARIS)

char hostEntryBuffer[8192];

struct hostent hostEntryStruct;

int hostEntryErrno;

hostEntry = gethostbyname_r(

(char *)hostname,

&hostEntryStruct,

hostEntryBuffer,

sizeof(hostEntryBuffer),

&hostEntryErrno);

#else

hostEntry = gethostbyname((char *)hostname);

#endif

if (hostEntry == 0)

{

// error, couldn't resolve the hostname to an ip address

return false;

}

else

// Retrieve IP addresses for both hostnames

Uint32 hostNameIP, systemHostIP = 0xFFFFFFFF;

hostNameIP = System::_acquireIP ((const char *) hostName.getCString ());

if (hostNameIP == 0x7F000001)

{

unsigned char ip_part1,ip_part2,ip_part3,ip_part4;

// localhost or IP address of 127.0.0.1

ip_part1 = hostEntry->h_addr[0];

// real IP address needed for compare

ip_part2 = hostEntry->h_addr[1];

ip_part3 = hostEntry->h_addr[2];

hostNameIP = System::_acquireIP

ip_part4 = hostEntry->h_addr[3];

((const char *) System::getHostName ().getCString ());

*resolvedNameIP = ip_part1;

*resolvedNameIP = (*resolvedNameIP << 8) + ip_part2;

*resolvedNameIP = (*resolvedNameIP << 8) + ip_part3;

*resolvedNameIP = (*resolvedNameIP << 8) + ip_part4;

}

if (hostNameIP == 0xFFFFFFFF)

return true;

}

Boolean System::resolveIPAtDNS(Uint32 ip_addr, Uint32 * resolvedIP)

{

struct hostent *entry;

// Malformed IP address or not resolveable

entry = gethostbyaddr((const char *) &ip_addr, sizeof(ip_addr), AF_INET);

if (entry == 0)

{

// error, couldn't resolve the ip

return false;

}

else

{

unsigned char ip_part1,ip_part2,ip_part3,ip_part4;

ip_part1 = entry->h_addr[0];

ip_part2 = entry->h_addr[1];

ip_part3 = entry->h_addr[2];

ip_part4 = entry->h_addr[3];

*resolvedIP = ip_part1;

*resolvedIP = (*resolvedIP << 8) + ip_part2;

*resolvedIP = (*resolvedIP << 8) + ip_part3;

*resolvedIP = (*resolvedIP << 8) + ip_part4;

}

return true;

}

systemHostIP = System::_acquireIP

((const char *) System::getFullyQualifiedHostName ().getCString ());

if (systemHostIP == 0x7F000001)

Boolean System::isLoopBack(int af, void *binIPAddress)

{

#ifdef PEGASUS_ENABLE_IPV6

// localhost or IP address of 127.0.0.1

struct in6_addr ip6 = PEGASUS_IPV6_LOOPBACK_INIT;

// real IP address needed for compare

#endif

Uint32 ip4 = PEGASUS_IPV4_LOOPBACK_INIT;

systemHostIP = System::_acquireIP

switch (af)

((const char *) System::getHostName ().getCString ());

}

if (systemHostIP == 0xFFFFFFFF)

{

#ifdef PEGASUS_ENABLE_IPV6

// Malformed IP address or not resolveable

case AF_INET6:

return !memcmp(&ip6, binIPAddress, sizeof (ip6));

#endif

case AF_INET:

Uint32 n = ntohl( *(Uint32*)binIPAddress);

return !memcmp(&ip4, &n, sizeof (ip4));

}

return false;

}

if (hostNameIP != systemHostIP)

Boolean System::isLocalHost(const String &hostName)

{

return false;

// Get all ip addresses on the node and compare them with the given hostname.

#ifdef PEGASUS_ENABLE_IPV6

CString csName = hostName.getCString();

struct addrinfo hints, *res1, *res2, *res1root, *res2root;

char localHostName[PEGASUS_MAXHOSTNAMELEN];

gethostname(localHostName, PEGASUS_MAXHOSTNAMELEN);

Boolean isLocal = false;

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

hints.ai_family = AF_INET;

hints.ai_socktype = SOCK_STREAM;

hints.ai_protocol = IPPROTO_TCP;

res1root = res2root = 0;

getaddrinfo(csName, 0, &hints, &res1root);

getaddrinfo(localHostName, 0, &hints, &res2root);

res1 = res1root;

while (res1 && !isLocal)

{

if (isLoopBack(AF_INET,

&(reinterpret_cast<struct sockaddr_in*>(res1->ai_addr))->sin_addr))

{

isLocal = true;

break;

}

res2 = res2root;

while (res2)

{

if (!memcmp(

&(reinterpret_cast<struct sockaddr_in*>(res1->ai_addr))->

sin_addr,

&(reinterpret_cast<struct sockaddr_in*>(res2->ai_addr))->

sin_addr,

sizeof (struct in_addr)))

{

isLocal = true;

break;

}

res2 = res2->ai_next;

}

res1 = res1->ai_next;

}

freeaddrinfo(res1root);

freeaddrinfo(res2root);

if (isLocal)

{

return true;

}

hints.ai_family = AF_INET6;

res1root = res2root = 0;

getaddrinfo(csName, 0, &hints, &res1root);

getaddrinfo(localHostName, 0, &hints, &res2root);

res1 = res1root;

while (res1 && !isLocal)

{

if (isLoopBack(

AF_INET6,

&(reinterpret_cast<struct sockaddr_in6*>(res1->ai_addr))->

sin6_addr))

{

isLocal = true;

break;

}

res2 = res2root;

while (res2)

{

if (!memcmp(

&(reinterpret_cast<struct sockaddr_in6*>(res1->ai_addr))->

sin6_addr,

&(reinterpret_cast<struct sockaddr_in6*>(res2->ai_addr))->

sin6_addr,

sizeof (struct in6_addr)))

{

isLocal = true;

break;

}

res2 = res2->ai_next;

}

res1 = res1->ai_next;

}

freeaddrinfo(res1root);

freeaddrinfo(res2root);

return isLocal;

#else

// differentiate between a dotted IP address given

// and a real hostname given

CString csName = hostName.getCString();

char cc_hostname[PEGASUS_MAXHOSTNAMELEN];

strcpy(cc_hostname, (const char*) csName);

Uint32 tmp_addr = 0xFFFFFFFF;

Boolean hostNameIsIPNotation;

// Note: Platforms already supporting the inet_aton()

// should define their platform here,

// as this is the superior way to work

#if defined(PEGASUS_OS_LINUX) || \

defined(PEGASUS_OS_AIX) || \

defined(PEGASUS_OS_HPUX) || \

defined(PEGASUS_OS_PASE)

struct in_addr inaddr;

// if inet_aton failed(return=0),

// we do not have a valip IP address (x.x.x.x)

int atonSuccess = inet_aton(cc_hostname, &inaddr);

if (atonSuccess == 0) hostNameIsIPNotation = false;

else

{

hostNameIsIPNotation = true;

tmp_addr = inaddr.s_addr;

}

#else

// Note: 0xFFFFFFFF is actually a valid IP address (255.255.255.255).

// A better solution would be to use inet_aton() or equivalent, as

// inet_addr() is now considered "obsolete".

// Note: inet_aton() not yet supported on all Pegasus platforms

tmp_addr = inet_addr((char *) cc_hostname);

if (tmp_addr == 0xFFFFFFFF) hostNameIsIPNotation = false;

else hostNameIsIPNotation = true;

#endif

if (!hostNameIsIPNotation) // if hostname is not an IP address

{

// localhost ?

if (String::equalNoCase(hostName,String("localhost"))) return true;

char localHostName[PEGASUS_MAXHOSTNAMELEN];

CString cstringLocalHostName = System::getHostName().getCString();

strcpy(localHostName, (const char*) cstringLocalHostName);

// given hostname equals what system returns as local hostname ?

if (String::equalNoCase(hostName,localHostName)) return true;

Uint32 hostIP;

// bail out if hostname unresolveable

if (!System::resolveHostNameAtDNS(cc_hostname, &hostIP)) return false;

// lets see if the IP is defined on one of the network interfaces

// this can help us avoid another call to DNS

if (System::isIpOnNetworkInterface(hostIP)) return true;

// need to check if the local hosts name is possibly

// registered at the DNS with the IP address equal resolvedNameIP

Uint32 localHostIP;

if (!System::resolveHostNameAtDNS(localHostName, &localHostIP))

return false;

if (localHostIP == hostIP) return true;

}

else

{ // hostname is an IP address

// 127.0.0.1 is always the loopback

// inet_addr returns network byte order

if (tmp_addr == htonl(0x7F000001)) return true;

// IP defined on a local AF_INET network interface

if (System::isIpOnNetworkInterface(tmp_addr)) return true;

// out of luck so far, lets ask the DNS what our IP is

// and check against what we got

Uint32 localHostIP;

if (!System::resolveHostNameAtDNS(

(const char*) System::getHostName().getCString(), &localHostIP))

return false;

if (localHostIP == tmp_addr) return true;

// not yet, sometimes resolving the IP address we got against the DNS

// can solve the problem

// casting to (const char *) as (char *) will work as (void *) too,

// those it fits all platforms

Uint32 hostIP;

if (!System::resolveIPAtDNS(tmp_addr, &hostIP)) return false;

if (hostIP == localHostIP) return true;

}

return false;

#endif

}

// System ID constants for Logger::put and Logger::trace

const String System::CIMLISTENER = "cimlistener"; // Listener systme ID

PEGASUS_NAMESPACE_END

Legend:

Removed from v.1.37.2.2
changed lines
	Added in v.1.58.2.1

No CVS admin address has been configured