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

Return to Threads.cpp CVS log

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

Diff for /pegasus/src/Pegasus/Common/Threads.cpp between version 1.3 and 1.22

version 1.3, 2006/08/15 17:17:30

version 1.22, 2012/10/22 11:18:18

Line 1

//%2006////////////////////////////////////////////////////////////////////////

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

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

// EMC Corporation; Symantec Corporation; The Open Group.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

// HOLDERS BE LIABLE FOR ANY 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 (m.brasher@inovadevelopment.com)

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

#include <errno.h>

#include "Threads.h"

#include "IDFactory.h"

#include "TSDKey.h"

#include "Once.h"

#if defined(PEGASUS_PLATFORM_WIN32_IX86_MSVC)

#if defined(PEGASUS_OS_TYPE_WINDOWS)

# include <sys/timeb.h>

#endif

#if defined(PEGASUS_OS_ZOS)

# include <unistd.h>

#endif

#if defined(PEGASUS_OS_SOLARIS)

# include <unistd.h>

#endif

PEGASUS_NAMESPACE_BEGIN

Line 48

Line 52

{

#if defined(PEGASUS_HAVE_NANOSLEEP)

struct timespec wait;

struct timespec wait, remwait;

wait.tv_sec = msec / 1000;

wait.tv_nsec = (msec % 1000) * 1000000;

nanosleep(&wait, NULL);

#elif defined(PEGASUS_PLATFORM_OS400_ISERIES_IBM)

int loop;

while ((nanosleep(&wait, &remwait) == -1) && (errno == EINTR))

int microsecs = msec * 1000; /* convert from milliseconds to microseconds */

if (microsecs < 1000000)

usleep(microsecs);

else

{

loop = microsecs / 1000000;

wait.tv_sec = remwait.tv_sec;

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

wait.tv_nsec = remwait.tv_nsec;

usleep(1000000);

if ((loop*1000000) < microsecs)

usleep(microsecs - (loop*1000000));

}

#elif defined(PEGASUS_PLATFORM_WIN32_IX86_MSVC)

#elif defined(PEGASUS_OS_TYPE_WINDOWS)

if (msec == 0)

{

Line 90

Line 83

}

while( end.millitm > now.millitm && end.time >= now.time);

#elif defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM)

#else

int seconds;

if (msec < 1000)

{

usleep(msec*1000);

Line 103

Line 95

// Usleep the remaining micro seconds

usleep( (msec*1000) % 1000000 );

}

#elif defined(PEGASUS_OS_VMS)

::sleep(msec / 1000);

#endif

}

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

// Thread id TSD:

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

static Once _once = PEGASUS_ONCE_INITIALIZER;

static TSDKeyType _key;

static void _create_key()

{

TSDKey::create(&_key);

}

static inline void _set_id_tsd(Uint32 id)

{

once(&_once, _create_key);

TSDKey::set_thread_specific(_key, (void*)(long)id);

}

static inline Uint32 _get_id_tsd()

{

once(&_once, _create_key);

void* ptr = TSDKey::get_thread_specific(_key);

if (!ptr)

{

// Main thread's id is 1!

return 1;

}

return (Uint32)(long)ptr;

}

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

// _get_stack_multiplier()

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

static inline int _get_stack_multiplier()

{

#if defined(PEGASUS_OS_VMS)

static int _multiplier = 0;

static MutexType _multiplier_mutex = PEGASUS_MUTEX_INITIALIZER;

// This code uses a, 'hidden' (non-documented), VMS only, logical

// name (environment variable), PEGASUS_VMS_THREAD_STACK_MULTIPLIER,

// to allow in the field adjustment of the thread stack size.

// We only check for the logical name once to not have an

// impact on performance.

// Note: This code may have problems in a multithreaded environment

// with the setting of doneOnce to true.

// Current code in Cimserver and the clients do some serial thread

// creations first so this is not a problem now.

if (_multiplier == 0)

{

mutex_lock(&_multiplier_mutex);

if (_multiplier == 0)

{

const char *env = getenv("PEGASUS_VMS_THREAD_STACK_MULTIPLIER");

if (env)

_multiplier = atoi(env);

if (_multiplier == 0)

_multiplier = 2;

}

mutex_unlock(&_multiplier_mutex);

}

return _multiplier;

#else

return 2;

#endif

}

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

// PEGASUS_HAVE_PTHREADS

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

static IDFactory _thread_ids(2); /* 1 reserved for main thread */

#if defined(PEGASUS_HAVE_PTHREADS)

int Threads::create(

Line 215

Line 116

// Initialize thread attributes:

pthread_attr_t attr;

pthread_attr_init(&attr);

int rc = pthread_attr_init(&attr);

if(rc != 0)

{

return rc;

}

// Detached:

if (type == DETACHED)

{

#if defined(PEGASUS_PLATFORM_ZOS_ZSERIES_IBM)

#if defined(PEGASUS_OS_ZOS)

int ds = 1;

pthread_attr_setdetachstate(&attr, &ds);

#else

Line 230

Line 135

}

// Stack size:

rc = pthread_attr_setstacksize(&attr, PEGASUS_INITIAL_THREADSTACK_SIZE);

#if defined(PEGASUS_PLATFORM_HPUX_PARISC_ACC) || defined(PEGASUS_OS_VMS)

{

size_t stacksize;

if (pthread_attr_getstacksize(&attr, &stacksize) == 0)

{

int m = _get_stack_multiplier();

int rc = pthread_attr_setstacksize(&attr, stacksize * m);

PEGASUS_ASSERT(rc == 0);

}

#endif

// Scheduling policy:

#if defined(PEGASUS_PLATFORM_SOLARIS_SPARC_GNU) || \

#if defined(PEGASUS_OS_SOLARIS)

defined(PEGASUS_PLATFORM_SOLARIS_SPARC_CC)

# if defined SUNOS_5_7

pthread_attr_setschedpolicy(&attr, SCHED_RR);

# else

pthread_attr_setschedpolicy(&attr, SCHED_OTHER);

# endif

#endif // PEGASUS_PLATFORM_SOLARIS_SPARC_GNU

#endif /* defined(PEGASUS_OS_SOLARIS) */

// Create thread:

pthread_t thr;

rc = pthread_create(&thread.thread, &attr, start, arg);

int rc = pthread_create(&thr, &attr, start, arg);

if (rc != 0)

{

thread = ThreadType();

return rc;

}

// Assign thread id (and put into thread specific storage).

Uint32 id = _thread_ids.getID();

_set_id_tsd(id);

// Destroy attributes now.

pthread_attr_destroy(&attr);

// Return:

thread = ThreadType(thr, id);

return rc;

return 0;

}

ThreadType Threads::self()

{

return ThreadType(pthread_self(), _get_id_tsd());

ThreadType tt;

tt.thread = pthread_self();

return tt;

}

#endif /* PEGASUS_HAVE_PTHREADS */

Legend:

Removed from v.1.3
changed lines
	Added in v.1.22

No CVS admin address has been configured