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

Return to SystemUnix.cpp CVS log

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

Diff for /pegasus/src/Pegasus/Common/SystemUnix.cpp between version 1.47 and 1.114

version 1.47, 2002/08/29 00:27:52

version 1.114, 2005/12/09 20:45:45

Line 1

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

//%2005////////////////////////////////////////////////////////////////////////

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

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

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

Line 26

Line 32

// Modified By: Ben Heilbronn (ben_heilbronn@hp.com)

// Sushma Fernandes (sushma_fernandes@hp.com)

// Nag Boranna (nagaraja_boranna@hp.com)

// Bapu Patil (bapu_patil@hp.com)

// Dave Rosckes (rosckes@us.ibm.com)

// Amit K Arora (amita@in.ibm.com) for PEP101

// David Dillard, VERITAS Software Corp.

// (david.dillard@veritas.com)

// Yi Zhou (yi.zhou@hp.com)

// Josephine Eskaline Joyce, IBM (jojustin@in.ibm.com) for Bug#3194

// Roger Kumpf, Hewlett-Packard Company (roger_kumpf@hp.com)

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

#ifdef PEGASUS_OS_HPUX

# include <dl.h>

# include <dlfcn.h>

#elif defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM)

# include <dll.h>

#elif defined(PEGASUS_PLATFORM_OS400_ISERIES_IBM)

# include <fcntl.h>

# include <mih/rslvsp.h> /* rslvsp() */

# include <qycmutilu2.H>

# include <mih/micommon.h> /* _AUTH_EXECUTE */

# include <mih/miobjtyp.h> /* WLI_SRVPGM */

# include <pointer.h> /* _SYSPTR */

# include <qusec.h> /* Qus_EC_t */

# include <qleawi.h> /* QleActBndPgm(),QleGetExp() */

# include <unistd.cleinc>

# include "qycmmsgclsMessage.H" // ycmMessage class

# include "OS400SystemState.h" // OS400LoadDynamicLibrary, etc

# include "OS400ConvertChar.h"

#else

# include <dlfcn.h>

#endif

Line 49

Line 62

#include <unistd.h>

#include <dirent.h>

#include <pwd.h>

#include <grp.h>

#include <errno.h>

#if defined(PEGASUS_OS_SOLARIS)

# include <string.h>

#endif

#if !defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) && !defined(PEGASUS_PLATFORM_OS400_ISERIES_IBM)

#if !defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM) && !defined(PEGASUS_PLATFORM_OS400_ISERIES_IBM) && !defined(PEGASUS_PLATFORM_DARWIN_PPC_GNU)

#include <crypt.h>

#endif

#ifdef PEGASUS_PLATFORM_ZOS_ZSERIES_IBM

#define _OPEN_SYS_SOCK_IPV6

#include <sys/socket.h>

#include <arpa/inet.h>

//#include <__ftp.h>

#define _OPEN_SYS_EXT

#include <sys/ps.h>

#endif

#if defined(PEGASUS_USE_SYSLOGS)

#include <syslog.h>

#endif

#include <sys/stat.h>

#include <sys/types.h>

#include <cstdio>

Line 62

Line 94

#include <netdb.h>

#include "System.h"

#include <Pegasus/Common/Tracer.h>

#include <Pegasus/Common/Destroyer.h>

#include <Pegasus/Common/InternalException.h>

#include <Pegasus/Common/IPC.h>

#ifdef PEGASUS_ZOS_SECURITY

#include "DynamicLibraryzOS_inline.h"

#endif

PEGASUS_NAMESPACE_BEGIN

#if defined(PEGASUS_OS_LSB)

#include <netinet/in.h>

#if defined(PEGASUS_OS_HPUX)

#include <termios.h>

Boolean System::bindVerbose = false;

#include <stdio.h>

#include <stdlib.h>

#endif

#if defined(PEGASUS_OS_OS400)

PEGASUS_NAMESPACE_BEGIN

char os400ExceptionID[8] = {0};

#ifdef PEGASUS_OS_OS400

typedef struct os400_pnstruct

{

Qlg_Path_Name_T qlg_struct;

char * pn;

} OS400_PNSTRUCT;

#endif

inline void sleep_wrapper(Uint32 seconds)

Line 88

Line 130

milliseconds = Uint32(tv.tv_usec) / 1000;

}

void System::getCurrentTimeUsec(Uint32& seconds, Uint32& microseconds)

{

timeval tv;

gettimeofday(&tv, 0);

seconds = Uint32(tv.tv_sec);

microseconds = Uint32(tv.tv_usec);

}

String System::getCurrentASCIITime()

{

char str[50];

time_t rawTime;

struct tm tmBuffer;

time(&rawTime);

strftime(str, 40,"%m/%d/%Y-%T", localtime(&rawTime));

strftime(str, 40,"%m/%d/%Y-%T", localtime_r(&rawTime, &tmBuffer));

String time = str;

return String(str);

return time;

}

void System::sleep(Uint32 seconds)

Line 106

Line 156

Boolean System::exists(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgAccess((Qlg_Path_Name_T *)&pathname, F_OK) == 0;

#else

return access(path, F_OK) == 0;

#endif

}

Boolean System::canRead(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgAccess((Qlg_Path_Name_T *)&pathname, R_OK) == 0;

#else

return access(path, R_OK) == 0;

#endif

}

Boolean System::canWrite(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgAccess((Qlg_Path_Name_T *)&pathname, W_OK) == 0;

#else

return access(path, W_OK) == 0;

#endif

}

Boolean System::getCurrentDirectory(char* path, Uint32 size)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgGetcwd((Qlg_Path_Name_T *)&pathname, size) == 0;

#else

return getcwd(path, size) != NULL;

#endif

}

Boolean System::isDirectory(const char* path)

{

struct stat st;

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

if (QlgStat((Qlg_Path_Name_T *)&pathname, &st) != 0)

return false;

#else

if (stat(path, &st) != 0)

return false;

#endif

return S_ISDIR(st.st_mode);

}

Boolean System::changeDirectory(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgChdir((Qlg_Path_Name_T *)&pathname) == 0;

#else

return chdir(path) == 0;

#endif

}

Boolean System::makeDirectory(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgMkdir((Qlg_Path_Name_T *)&pathname, 0777) == 0;

#else

return mkdir(path, 0777) == 0;

#endif

}

Boolean System::getFileSize(const char* path, Uint32& size)

{

struct stat st;

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

if (QlgStat((Qlg_Path_Name_T *)&pathname, &st) != 0)

return false;

#else

if (stat(path, &st) != 0)

return false;

#endif

size = st.st_size;

return true;

Line 157

Line 339

Boolean System::removeDirectory(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgRmdir((Qlg_Path_Name_T *)&pathname) == 0;

#else

return rmdir(path) == 0;

#endif

}

Boolean System::removeFile(const char* path)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

return QlgUnlink((Qlg_Path_Name_T *)&pathname) == 0;

#else

return unlink(path) == 0;

#endif

}

Boolean System::renameFile(const char* oldPath, const char* newPath)

{

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT oldpathname;

memset((void*)&oldpathname, 0x00, sizeof(OS400_PNSTRUCT));

oldpathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(oldpathname.qlg_struct.Country_ID,"US",2);

memcpy(oldpathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

oldpathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

oldpathname.qlg_struct.Path_Length = strlen(oldPath);

oldpathname.qlg_struct.Path_Name_Delimiter[0] = '/';

oldpathname.pn = (char *)oldPath;

OS400_PNSTRUCT newpathname;

memset((void*)&newpathname, 0x00, sizeof(OS400_PNSTRUCT));

newpathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(newpathname.qlg_struct.Country_ID,"US",2);

memcpy(newpathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

newpathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

newpathname.qlg_struct.Path_Length = strlen(newPath);

newpathname.qlg_struct.Path_Name_Delimiter[0] = '/';

newpathname.pn = (char *)newPath;

if (QlgLink((Qlg_Path_Name_T *)&oldpathname,

(Qlg_Path_Name_T *)&newpathname) != 0)

{

return false;

}

return QlgUnlink((Qlg_Path_Name_T *)&oldpathname) == 0;

#else

if (link(oldPath, newPath) != 0)

return false;

return unlink(oldPath) == 0;

#endif

}

DynamicLibraryHandle System::loadDynamicLibrary(const char* fileName)

Line 180

Line 429

Tracer::trace(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

"Attempting to load library %s", fileName);

#if defined(PEGASUS_OS_HPUX)

#if defined(PEGASUS_OS_TRU64)

void* handle;

if (bindVerbose)

{

handle = shl_load(fileName,

BIND_IMMEDIATE | DYNAMIC_PATH | BIND_VERBOSE, 0L);

}

else

{

handle = shl_load(fileName, BIND_IMMEDIATE | DYNAMIC_PATH, 0L);

}

Tracer::trace(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

"After loading lib %s, error code is %d", fileName,

(handle == (void *)0)?errno:0);

PEG_METHOD_EXIT();

return DynamicLibraryHandle(handle);

#elif defined(PEGASUS_OS_TRU64)

PEG_METHOD_EXIT();

return DynamicLibraryHandle(dlopen(fileName, RTLD_NOW));

#elif defined(PEGASUS_OS_ZOS)

# if defined(PEGASUS_ZOS_SECURITY)

if (!hasProgramControl(fileName))

{

PEG_METHOD_EXIT();

return DynamicLibraryHandle(dllload(fileName));

#elif defined(PEGASUS_OS_OS400)

// Activate the service program.

// Parse out the library and srvpgm names.

// Note: the fileName passed in must be in OS/400 form - library/srvpgm

if (fileName == NULL || strlen(fileName) == 0 || strlen(fileName) >= 200)

return 0;

char name[200];

strcpy(name, fileName);

char* lib = strtok(name, "/");

if (lib == NULL || strlen(lib) == 0)

return 0;

char* srvpgm = strtok(name, NULL);

if (srvpgm == NULL || strlen(srvpgm) == 0)

return 0;

/*----------------------------------------------------------------*/

/* Resolve to the service program */

/*----------------------------------------------------------------*/

_OBJ_TYPE_T objectType = WLI_SRVPGM;

_SYSPTR sysP = rslvsp(objectType, srvpgm, lib, _AUTH_NONE);

/*----------------------------------------------------------------*/

/* Activate the service program */

/*----------------------------------------------------------------*/

Qle_ABP_Info_t activationInfo;

int actInfoLen = sizeof(activationInfo);

int hdl;

Qus_EC_t os400ErrorCode = {0};

os400ErrorCode.Bytes_Provided = sizeof(Qus_EC_t);

os400ErrorCode.Bytes_Available = 0;

QleActBndPgm(&sysP,

&hdl,

&activationInfo,

&actInfoLen,

&os400ErrorCode);

if (os400ErrorCode.Bytes_Available)

{

// Got an error.

memset(os400ExceptionID, '\0', 8);

strncpy(os400ExceptionID, os400ErrorCode.Exception_Id, 7);

Tracer::trace(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

"Error activating service program. Exception Id = %s", os400ExceptionID);

return 0;

}

# endif

PEG_METHOD_EXIT();

return DynamicLibraryHandle(hdl);

return DynamicLibraryHandle(dllload(fileName));

#elif defined(PEGASUS_OS_OS400)

PEG_METHOD_EXIT();

return DynamicLibraryHandle(OS400_LoadDynamicLibrary(fileName));

#else

PEG_METHOD_EXIT();

return DynamicLibraryHandle(dlopen(fileName, RTLD_NOW | RTLD_GLOBAL));

return DynamicLibraryHandle(dlopen(fileName, RTLD_GLOBAL|RTLD_NOW));

#endif

}

void System::unloadDynamicLibrary(DynamicLibraryHandle libraryHandle)

{

// ATTN: Should this method indicate success/failure?

#ifdef PEGASUS_OS_OS400

#ifdef PEGASUS_OS_LINUX

OS400_UnloadDynamicLibrary((int)libraryHandle);

#elif defined(PEGASUS_OS_ZOS)

dllfree(reinterpret_cast<dllhandle *> (libraryHandle));

#else

dlclose(libraryHandle);

#endif

#ifdef PEGASUS_OS_HPUX

// Note: shl_unload will unload the library even if it has been loaded

// multiple times. No reference count is kept.

int ignored = shl_unload(reinterpret_cast<shl_t>(libraryHandle));

#endif

}

String System::dynamicLoadError() {

// ATTN: Is this safe in a multi-threaded process? Should this string

// be returned from loadDynamicLibrary?

#ifdef PEGASUS_OS_HPUX

#ifdef PEGASUS_OS_ZOS

// ATTN: If shl_load() returns NULL, this value should be strerror(errno)

return String();

#elif defined(PEGASUS_OS_ZOS)

return String();

#elif defined(PEGASUS_OS_OS400)

return String(os400ExceptionID);

return String(OS400_DynamicLoadError());

#else

String dlerr = dlerror();

return dlerr;

Line 300

Line 481

DynamicLibraryHandle libraryHandle,

const char* symbolName)

{

#ifdef PEGASUS_OS_HPUX

char* p = (char*)symbolName;

void* proc = 0;

if (shl_findsym((shl_t*)&libraryHandle, symbolName, TYPE_UNDEFINED,

&proc) == 0)

{

return DynamicSymbolHandle(proc);

}

if (shl_findsym((shl_t*)libraryHandle,

(String("_") + symbolName).getCString(),

TYPE_UNDEFINED,

&proc) == 0)

{

return DynamicSymbolHandle(proc);

}

return 0;

#elif defined(PEGASUS_OS_ZOS)

#ifdef PEGASUS_OS_ZOS

return DynamicSymbolHandle(dllqueryfn((dllhandle *)libraryHandle,

(char*)symbolName));

#elif defined(PEGASUS_OS_OS400)

/*----------------------------------------------------------------*/

return DynamicSymbolHandle(OS400_LoadDynamicSymbol((int)libraryHandle,

/* Get procedure pointer and return it to caller */

symbolName));

/*----------------------------------------------------------------*/

Qus_EC_t os400ErrorCode = {0};

os400ErrorCode.Bytes_Provided = sizeof(Qus_EC_t);

os400ErrorCode.Bytes_Available = 0;

int exportType;

void * procAddress = NULL;

QleGetExp((int *)&libraryHandle,

(char *)symbolName,

&procAddress,

&exportType,

&os400ErrorCode);

if (os400ErrorCode.Bytes_Available)

{

// Got an error.

memset(os400ExceptionID, '\0', 8);

strncpy(os400ExceptionID, os400ErrorCode.Exception_Id, 7);

Tracer::trace(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

"Error getting export. Exception Id = %s", os400ExceptionID);

return 0;

}

return DynamicSymbolHandle(procAddress);

#else

return DynamicSymbolHandle(dlsym(libraryHandle, (char*)symbolName));

Line 365

Line 498

String System::getHostName()

{

static char hostname[64];

static char hostname[PEGASUS_MAXHOSTNAMELEN + 1];

if (!*hostname)

{

gethostname(hostname, sizeof(hostname));

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

#ifdef PEGASUS_PLATFORM_AIX_RS_IBMCXX

#if defined(PEGASUS_OS_OS400)

char *dot = strchr(hostname, '.');

EtoA(hostname);

if (dot != NULL) *dot = '\0';

#endif

}

return hostname;

}

String System::getFullyQualifiedHostName ()

{

#ifdef PEGASUS_OS_HPUX

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

char hostName [MAXHOSTNAMELEN];

char hostName[PEGASUS_MAXHOSTNAMELEN + 1];

struct hostent *he;

String fqName;

if (gethostname (hostName, MAXHOSTNAMELEN) != 0)

if (gethostname(hostName, sizeof(hostName)) != 0)

{

return String::EMPTY;

}

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

if (he = gethostbyname (hostName))

if ((he = gethostbyname (hostName)))

{

strcpy (hostName, he->h_name);

strncpy(hostName, he->h_name, sizeof(hostName)-1);

}

#if defined(PEGASUS_OS_OS400)

EtoA(hostName);

#endif

fqName.assign (hostName);

return fqName;

#elif defined(PEGASUS_OS_ZOS)

char hostName[PEGASUS_MAXHOSTNAMELEN + 1];

String fqName;

struct addrinfo *resolv;

struct addrinfo hint;

struct hostent *he;

// receive short name of the local host

if (gethostname(hostName, PEGASUS_MAXHOSTNAMELEN) != 0)

{

return String::EMPTY;

}

resolv = new struct addrinfo;

hint.ai_flags = AI_CANONNAME;

hint.ai_family = AF_UNSPEC; // any family

hint.ai_socktype = 0; // any socket type

hint.ai_protocol = 0; // any protocol

int success = getaddrinfo(hostName,

NULL,

&hint,

&resolv);

if (success==0)

{

// assign fully qualified hostname

fqName.assign(resolv->ai_canonname);

} else

{

if ((he = gethostbyname(hostName)))

{

strcpy (hostName, he->h_name);

}

// assign hostName

// if gethostbyname was successful assign that result

// else assign unqualified hostname

fqName.assign(hostName);

}

freeaddrinfo(resolv);

delete resolv;

return fqName;

#else

// ATTN: Implement this method to return the fully qualified host name

Line 408

Line 586

String System::getSystemCreationClassName ()

{

#ifdef PEGASUS_OS_HPUX

return "CIM_ComputerSystem";

#else

// ATTN: Implement this method to return the system creation class name

// The value returned should match the value of the CreationClassName key

// property used in the instrumentation of the CIM_ComputerSystem class

// as determined by the provider for the CIM_ComputerSystem class

return String::EMPTY;

return "CIM_ComputerSystem";

#endif

}

Uint32 System::lookupPort(

Line 429

Line 605

// Get wbem-local port from /etc/services

#if !defined(PEGASUS_OS_OS400)

#ifdef PEGASUS_OS_SOLARIS

#define SERV_BUFF_SIZE 1024

struct servent serv_result;

char buf[SERV_BUFF_SIZE];

if ( (serv = getservbyname_r(serviceName, TCP, &serv_result,

buf, SERV_BUFF_SIZE)) != NULL )

#elif defined(PEGASUS_OS_OS400)

struct servent serv_result;

serv = &serv_result;

struct servent_data buf;

memset(&buf, 0x00, sizeof(struct servent_data));

char srvnameEbcdic[256];

strcpy(srvnameEbcdic, serviceName);

AtoE(srvnameEbcdic);

char tcpEbcdic[64];

strcpy(tcpEbcdic, TCP);

AtoE(tcpEbcdic);

if ( (getservbyname_r(srvnameEbcdic, tcpEbcdic, &serv_result,

&buf)) == 0 )

#else // PEGASUS_OS_SOLARIS

if ( (serv = getservbyname(serviceName, TCP)) != NULL )

#else

#endif // PEGASUS_OS_SOLARIS

// Need to cast on OS/400

if ( (serv = getservbyname((char *)serviceName, TCP)) != NULL )

#endif

{

#ifndef PEGASUS_PLATFORM_LINUX_IX86_GNU

localPort = serv->s_port;

#else

localPort = htons((uint16_t)serv->s_port);

#endif

}

else

{

Line 449

Line 642

return localPort;

}

#if defined(PEGASUS_OS_LSB)

getpass equivalent.

Adapted from example implementation described in GLIBC documentation

(http://www.dusek.ch/manual/glibc/libc_32.html) and

"Advanced Programming in the UNIX Environment" by Richard Stevens,

pg. 350.

#define MAX_PASS_LEN 1024

char *getpassword(const char *prompt)

{

static char buf[MAX_PASS_LEN];

struct termios old, new_val;

char *ptr;

int c;

buf[0] = 0;

/* Turn echoing off and fail if we can't. */

if (tcgetattr (fileno (stdin), &old) != 0)

return buf;

new_val = old;

new_val.c_lflag &= ~(ECHO | ECHOE | ECHOK | ECHONL);

if (tcsetattr (fileno (stdin), TCSAFLUSH, &new_val) != 0)

return buf;

/* Read the password. */

fputs (prompt, stdin);

ptr = buf;

while ( (c = getc(stdin)) != EOF && c != '\n') {

if (ptr < &buf[MAX_PASS_LEN])

*ptr++ = c;

}

*ptr = 0;

putc('\n', stdin);

/* Restore terminal. */

(void) tcsetattr (fileno (stdin), TCSAFLUSH, &old);

fclose(stdin);

return buf;

}

#endif

String System::getPassword(const char* prompt)

{

Line 457

Line 693

#if !defined(PEGASUS_OS_OS400)

// Not supported on OS/400, and we don't need it.

// 'getpass' is DEPRECATED

# if !defined(PEGASUS_OS_LSB)

password = String(getpass( prompt ));

# else

password = String(getpassword( prompt ));

# endif

#endif

return password;

Line 468

Line 710

String userName = String::EMPTY;

struct passwd* pwd = NULL;

#if defined(PEGASUS_OS_SOLARIS) || \

defined(PEGASUS_OS_HPUX) || \

defined(PEGASUS_OS_LINUX) || \

defined(PEGASUS_OS_OS400)

const unsigned int PWD_BUFF_SIZE = 1024;

struct passwd local_pwd;

char buf[PWD_BUFF_SIZE];

if(getpwuid_r(geteuid(), &local_pwd, buf, PWD_BUFF_SIZE, &pwd) != 0)

{

String errorMsg = String("getpwuid_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

// L10N TODO - This message needs to be added.

//Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

// errorMsg);

}

#elif defined(PEGASUS_OS_ZOS)

char effective_username[9];

__getuserid(effective_username, 9);

__etoa_l(effective_username,9);

userName.assign(effective_username);

return userName;

#else

// get the currently logged in user's UID.

pwd = getpwuid(geteuid());

#endif

if ( pwd == NULL )

{

//ATTN: Log a message

// L10N TODO - This message needs to be added.

// "User might have been removed just after login"

//Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

// "getpwuid_r failure, user may have been removed just after login");

Tracer::trace (TRC_OS_ABSTRACTION, Tracer::LEVEL4,

"getpwuid_r failure, user may have been removed just after login");

}

else

{

#if defined(PEGASUS_OS_OS400)

EtoA(pwd->pw_name);

#endif

// get the user name

Line 500

Line 774

Boolean System::isSystemUser(const char* userName)

{

#if defined(PEGASUS_OS_OS400)

AtoE((char *)userName);

#endif

#if defined(PEGASUS_OS_SOLARIS) || \

defined(PEGASUS_OS_HPUX) || \

defined(PEGASUS_OS_LINUX) || \

defined(PEGASUS_OS_OS400)

const unsigned int PWD_BUFF_SIZE = 1024;

struct passwd pwd;

struct passwd *result;

char pwdBuffer[PWD_BUFF_SIZE];

if (getpwnam_r(userName, &pwd, pwdBuffer, PWD_BUFF_SIZE, &result) != 0)

{

String errorMsg = String("getpwnam_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

// L10N TODO - This message needs to be added.

//Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

// errorMsg);

}

if (result == NULL)

{

return false;

}

#else

// get the password entry for the user

if ( getpwnam(userName) == NULL )

{

#if defined(PEGASUS_OS_OS400)

EtoA((char *)userName);

#endif

return false;

}

#endif

#if defined(PEGASUS_OS_OS400)

EtoA((char *)userName);

#endif

return true;

}

Boolean System::isPrivilegedUser(const String userName)

Boolean System::isPrivilegedUser(const String& userName)

{

// Check if the given user is a privileged user

#if !defined(PEGASUS_OS_OS400)

struct passwd pwd;

struct passwd *result;

char pwdBuffer[1024];

const unsigned int PWD_BUFF_SIZE = 1024;

char pwdBuffer[PWD_BUFF_SIZE];

if (getpwnam_r(userName.getCString(), &pwd, pwdBuffer, 1024, &result) == 0)

if (getpwnam_r(

userName.getCString(), &pwd, pwdBuffer, PWD_BUFF_SIZE, &result) != 0)

{

String errorMsg = String("getpwnam_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

// L10N TODO - This message needs to be added.

//Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

// errorMsg);

}

// Check if the requested entry was found. If not return false.

if ( result != NULL )

{

// Check if the uid is 0.

if ( pwd.pw_uid == 0 )

{

return true;

}

return false;

#else

CString user = userName.getCString();

const char * tmp = (const char *)user;

AtoE((char *)tmp);

return ycmCheckUserCmdAuthorities(tmp);

#endif

}

String System::getPrivilegedUserName()

Line 536

Line 869

if (userName == String::EMPTY)

{

struct passwd* pwd = NULL;

#if defined(PEGASUS_OS_SOLARIS) || \

defined(PEGASUS_OS_HPUX) || \

defined(PEGASUS_OS_LINUX) || \

defined(PEGASUS_OS_OS400)

const unsigned int PWD_BUFF_SIZE = 1024;

struct passwd local_pwd;

char buf[PWD_BUFF_SIZE];

if(getpwuid_r(0, &local_pwd, buf, PWD_BUFF_SIZE, &pwd) != 0)

{

String errorMsg = String("getpwuid_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

// L10N TODO - This message needs to be added.

//Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

// errorMsg);

}

#else

// get the privileged user's UID.

// (on OS/400, this is QSECOFR)

pwd = getpwuid(0);

#endif

if ( pwd != NULL )

{

#if defined(PEGASUS_OS_OS400)

EtoA(pwd->pw_name);

#endif

// get the user name

Line 550

Line 905

}

else

{

Tracer::trace (TRC_OS_ABSTRACTION, Tracer::LEVEL4,

"Could not find entry.");

PEGASUS_ASSERT(0);

}

Line 557

Line 914

return (userName);

}

Boolean System::isGroupMember(const char* userName, const char* groupName)

{

struct group grp;

char *member;

Boolean retVal = false;

const unsigned int PWD_BUFF_SIZE = 1024;

const unsigned int GRP_BUFF_SIZE = 1024;

struct passwd pwd;

struct passwd *result;

struct group *grpresult;

char pwdBuffer[PWD_BUFF_SIZE];

char grpBuffer[GRP_BUFF_SIZE];

// Search Primary group information.

// Find the entry that matches "userName"

if (getpwnam_r(userName, &pwd, pwdBuffer, PWD_BUFF_SIZE, &result) != 0)

{

String errorMsg = String("getpwnam_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

errorMsg);

throw InternalSystemError();

}

if ( result != NULL )

{

// User found, check for group information.

gid_t group_id;

group_id = pwd.pw_gid;

// Get the group name using group_id and compare with group passed.

if ( getgrgid_r(group_id, &grp,

grpBuffer, GRP_BUFF_SIZE, &grpresult) != 0)

{

String errorMsg = String("getgrgid_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

errorMsg);

throw InternalSystemError();

}

// Compare the user's group name to groupName.

if ( strcmp (grp.gr_name, groupName) == 0 )

{

// User is a member of the group.

return true;

}

// Search supplemental groups.

// Get a user group entry

#if defined(PEGASUS_OS_LSB)

if ( getgrnam_r((char *)groupName, &grp,

grpBuffer, GRP_BUFF_SIZE, &grpresult) != 0 )

#else

if ( getgrnam_r(groupName, &grp,

grpBuffer, GRP_BUFF_SIZE, &grpresult) != 0 )

#endif

{

String errorMsg = String("getgrnam_r failure : ") +

String(strerror(errno));

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2, errorMsg);

Logger::put(Logger::STANDARD_LOG, "CIMServer", Logger::WARNING,

errorMsg);

throw InternalSystemError();

}

// Check if the requested group was found.

if (grpresult == NULL)

{

return false;

}

Uint32 j = 0;

// Get all the members of the group

member = grp.gr_mem[j++];

while (member)

{

// Check if the user is a member of the group

if ( strcmp(userName, member) == 0 )

{

retVal = true;

break;

}

member = grp.gr_mem[j++];

}

return retVal;

}

#ifndef PEGASUS_OS_OS400

Boolean System::changeUserContext(const char* userName)

{

const unsigned int PWD_BUFF_SIZE = 1024;

struct passwd pwd;

struct passwd *result;

char pwdBuffer[PWD_BUFF_SIZE];

# if defined(PEGASUS_OS_OS400)

AtoE((char *)userName);

# endif

int rc = getpwnam_r(userName, &pwd, pwdBuffer, PWD_BUFF_SIZE, &result);

# if defined(PEGASUS_OS_OS400)

EtoA((char *)userName);

# endif

if (rc != 0)

{

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

String("getpwnam_r failed: ") + String(strerror(errno)));

return false;

}

if (result == 0)

{

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

"getpwnam_r failed.");

return false;

}

Tracer::trace(TRC_OS_ABSTRACTION, Tracer::LEVEL4,

"Changing user context to: uid = %d, gid = %d",

(int)pwd.pw_uid, (int)pwd.pw_gid);

if (setgid(pwd.pw_gid) != 0)

{

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

String("setgid failed: ") + String(strerror(errno)));

return false;

}

if (setuid(pwd.pw_uid) != 0)

{

PEG_TRACE_STRING(TRC_OS_ABSTRACTION, Tracer::LEVEL2,

String("setuid failed: ") + String(strerror(errno)));

return false;

}

return true;

}

#endif

Uint32 System::getPID()

{

Line 574

Line 1088

#if !defined(PEGASUS_OS_OS400)

return (truncate(path, newSize) == 0);

#else

int fd = open(path, O_WRONLY);

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

int fd = QlgOpen((Qlg_Path_Name_T *)&pathname, O_WRONLY);

if (fd != -1)

{

int rc = ftruncate(fd, newSize);

Line 586

Line 1112

#endif

}

// Is absolute path?

Boolean System::is_absolute_path(const char *path)

{

if (path == NULL)

return false;

if (path[0] == '/')

return true;

return false;

}

// Changes file permissions on the given file.

Boolean System::changeFilePermissions(const char* path, mode_t mode)

{

Sint32 ret = 0;

const char * tmp = path;

#if defined(PEGASUS_OS_OS400)

// ATTN: Update this code to handle UTF8 when path contains UTF8

AtoE((char *)tmp);

#endif

ret = ::chmod(tmp, mode);

return ( ret != -1 );

}

Boolean System::verifyFileOwnership(const char* path)

{

struct stat st;

#if defined(PEGASUS_OS_OS400)

OS400_PNSTRUCT pathname;

memset((void*)&pathname, 0x00, sizeof(OS400_PNSTRUCT));

pathname.qlg_struct.CCSID = 1208;

#pragma convert(37)

memcpy(pathname.qlg_struct.Country_ID,"US",2);

memcpy(pathname.qlg_struct.Language_ID,"ENU",3);

#pragma convert(0)

pathname.qlg_struct.Path_Type = QLG_PTR_SINGLE;

pathname.qlg_struct.Path_Length = strlen(path);

pathname.qlg_struct.Path_Name_Delimiter[0] = '/';

pathname.pn = (char *)path;

if (QlgStat((Qlg_Path_Name_T *)&pathname, &st) != 0)

{

return false;

}

#else

if (lstat(path, &st) != 0)

{

return false;

}

#endif

return ((st.st_uid == geteuid()) && // Verify the file owner

S_ISREG(st.st_mode) && // Verify it is a regular file

(st.st_nlink == 1)); // Verify it is not a hard link

}

void System::syslog(const String& ident, Uint32 severity, const char* message)

{

#if defined(PEGASUS_OS_HPUX) || defined(PEGASUS_OS_LINUX)

// Since the openlog(), syslog(), and closelog() function calls must be

// coordinated (see below), we need a thread control.

static Mutex logMutex;

AutoMutex loglock(logMutex);

// Get a const char* representation of the identifier string. Note: The

// character string passed to the openlog() function must persist until

// closelog() is called. The syslog() method uses this pointer directly

// rather than a copy of the string it refers to.

CString identCString = ident.getCString();

openlog(identCString, LOG_PID, LOG_DAEMON);

// Map from the Logger log level to the system log level.

Uint32 syslogLevel;

if (severity & Logger::FATAL)

{

syslogLevel = LOG_CRIT;

}

else if (severity & Logger::SEVERE)

{

syslogLevel = LOG_ERR;

}

else if (severity & Logger::WARNING)

{

syslogLevel = LOG_WARNING;

}

else if (severity & Logger::INFORMATION)

{

syslogLevel = LOG_INFO;

}

else // if (severity & Logger::TRACE)

{

syslogLevel = LOG_DEBUG;

}

// Write the message to the system log.

::syslog(syslogLevel, "%s", message);

closelog();

#elif defined(PEGASUS_OS_OS400)

std::string replacementData = message;

// All messages will go to the joblog. In the future

// some messages may go to other message queues yet

// to be determined.

if ((severity & Logger::TRACE) ||

(severity & Logger::INFORMATION))

{

// turn into ycmMessage so we can put it in the job log

# pragma convert(37)

ycmMessage theMessage("CPIDF80",

message,

strlen(message),

"Logger",

ycmCTLCIMID,

TRUE);

# pragma convert(0)

// put the message in the joblog

theMessage.joblogIt(UnitOfWorkError,

ycmMessage::Informational);

}

if ((severity & Logger::WARNING) ||

(severity & Logger::SEVERE) ||

(severity & Logger::FATAL))

{

// turn into ycmMessage so we can put it in the job log

# pragma convert(37)

ycmMessage theMessage("CPDDF82",

message,

strlen(message),

"Logger",

ycmCTLCIMID,

TRUE);

# pragma convert(0)

// put the message in the joblog

theMessage.joblogIt(UnitOfWorkError,

ycmMessage::Diagnostic);

}

#endif

}

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

#if defined(PEGASUS_PLATFORM_OS400_ISERIES_IBM)

const String System::CIMSERVER = "qycmcimom"; // Server system ID

#else

const String System::CIMSERVER = "cimserver"; // Server system ID

#endif

// System Initializater for AIX

#ifdef PEGASUS_OS_AIX

#include <cstdlib>

class SystemInitializer

{

public:

/**

* Default constructor.

SystemInitializer();

};

SystemInitializer::SystemInitializer()

{

putenv("XPG_SUS_ENV=ON");

}

static SystemInitializer initializer;

#endif

PEGASUS_NAMESPACE_END

Legend:

Removed from v.1.47
changed lines
	Added in v.1.114

No CVS admin address has been configured