(file) Return to Mutex.cpp CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / Common

Diff for /pegasus/src/Pegasus/Common/Mutex.cpp between version 1.2 and 1.9.16.3

version 1.2, 2005/10/24 19:35:25 version 1.9.16.3, 2007/09/12 03:24:32
Line 1 
Line 1 
 //%2005////////////////////////////////////////////////////////////////////////  //%2006////////////////////////////////////////////////////////////////////////
 // //
 // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
 // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems. // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
Line 8 
Line 8 
 // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group. // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
 // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.; // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
 // EMC Corporation; VERITAS Software Corporation; The Open Group. // EMC Corporation; VERITAS Software Corporation; The Open Group.
   // Copyright (c) 2006 Hewlett-Packard Development Company, L.P.; IBM Corp.;
   // EMC Corporation; Symantec Corporation; The Open Group.
 // //
 // 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 copy
 // of this software and associated documentation files (the "Software"), to // of this software and associated documentation files (the "Software"), to
Line 27 
Line 29 
 // //
 //============================================================================== //==============================================================================
 // //
 // Author: Mike Day (mdday@us.ibm.com)  
 //  
 // Modified By: Markus Mueller  
 //              Ramnath Ravindran (Ramnath.Ravindran@compaq.com)  
 //              David Eger (dteger@us.ibm.com)  
 //              Amit K Arora, IBM (amita@in.ibm.com) for PEP#101  
 //              Sean Keenan, Hewlett-Packard Company (sean.keenan@hp.com)  
 //              Roger Kumpf, Hewlett-Packard Company (roger_kumpf@hp.com)  
 //              David Dillard, VERITAS Software Corp.  
 //                  (david.dillard@veritas.com)  
 //              Aruran, IBM (ashanmug@in.ibm.com) for BUG# 3518  
 //  
 //%///////////////////////////////////////////////////////////////////////////// //%/////////////////////////////////////////////////////////////////////////////
  
 #include "Mutex.h" #include "Mutex.h"
   #include "Time.h"
   #include "PegasusAssert.h"
   #include "Once.h"
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
   //==============================================================================
   //
   // Mutex implementation with PTHREAD_MUTEX_RECURSIVE feature.
   //
   //==============================================================================
   
   #if defined(PEGASUS_HAVE_PTHREADS) && defined(PEGASUS_HAVE_RECURSIVE_MUTEXES)
   
   static Once _once = PEGASUS_ONCE_INITIALIZER;
   static pthread_mutexattr_t _attr;
   
   static void _init_attr()
   {
       pthread_mutexattr_init(&_attr);
       pthread_mutexattr_settype(&_attr, PTHREAD_MUTEX_RECURSIVE);
   }
   
   Mutex::Mutex()
   {
       once(&_once, _init_attr);
       pthread_mutex_init(&_rep.mutex, &_attr);
   #if defined(PEGASUS_DEBUG)
       _rep.count = 0;
   #endif
   }
   
   Mutex::Mutex(RecursiveTag)
   {
       once(&_once, _init_attr);
       pthread_mutex_init(&_rep.mutex, &_attr);
   #if defined(PEGASUS_DEBUG)
       _rep.count = 0;
   #endif
   }
   
   Mutex::Mutex(NonRecursiveTag)
   {
       pthread_mutex_init(&_rep.mutex, NULL);
   #if defined(PEGASUS_DEBUG)
       _rep.count = 0;
   #endif
   }
   
   Mutex::~Mutex()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
       pthread_mutex_destroy(&_rep.mutex);
   }
   
   void Mutex::lock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       switch (pthread_mutex_lock(&_rep.mutex))
       {
           case 0:
   #if defined(PEGASUS_DEBUG)
               _rep.count++;
   #endif
               break;
   
           default:
               throw WaitFailed(Threads::self());
       }
   }
   
   void Mutex::try_lock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       int r = pthread_mutex_trylock(&_rep.mutex);
       if (r == -1)
           r=errno;
       switch (r)
       {
           case 0:
   #if defined(PEGASUS_DEBUG)
               _rep.count++;
   #endif
               break;
   
           case EBUSY:
               throw AlreadyLocked(Threads::self());
   
           default:
               throw WaitFailed(Threads::self());
       }
   }
   
   void Mutex::timed_lock(Uint32 milliseconds)
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       struct timeval now;
       struct timeval finish;
       struct timeval remaining;
       {
           Uint32 usec;
           gettimeofday(&finish, NULL);
           finish.tv_sec += (milliseconds / 1000 );
           milliseconds %= 1000;
           usec = finish.tv_usec + ( milliseconds * 1000 );
           finish.tv_sec += (usec / 1000000);
           finish.tv_usec = usec % 1000000;
       }
   
       for (;;)
       {
           int r=pthread_mutex_trylock(&_rep.mutex);
           if (r == -1)
               r = errno;
           switch (r)
           {
               case 0:
   #if defined(PEGASUS_DEBUG)
                   _rep.count++;
   #endif
                   return;
   
               case EBUSY:
               {
                   gettimeofday(&now, NULL);
   
                   if (Time::subtract(&remaining, &finish, &now))
                       throw TimeOut(Threads::self());
   
                   Threads::yield();
                   break;
               }
   
               default:
                   throw WaitFailed(Threads::self());
           }
       }
   }
   
   void Mutex::unlock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
       PEGASUS_DEBUG_ASSERT(_rep.count > 0);
   
   #if defined(PEGASUS_DEBUG)
       _rep.count--;
   #endif
   
       if (pthread_mutex_unlock(&_rep.mutex) != 0)
           throw Permission(Threads::self());
   }
   
   #if defined(PEGASUS_OS_LINUX)
   void Mutex::reinitialize()
   {
       pthread_mutex_init(&_rep.mutex, &_attr);
   #if defined(PEGASUS_DEBUG)
       _rep.count = 0;
   #endif
   }
   #endif
   
   #endif /* PEGASUS_HAVE_PTHREADS && PEGASUS_HAVE_RECURSIVE_MUTEXES */
   
   //==============================================================================
   //
   // Mutex implementation without PTHREAD_MUTEX_RECURSIVE feature.
   //
   //==============================================================================
   
   #if defined(PEGASUS_HAVE_PTHREADS) && !defined(PEGASUS_HAVE_RECURSIVE_MUTEXES)
   
   Mutex::Mutex()
   {
       memset(&_rep, 0, sizeof(_rep));
       _rep.recursive = 1;
       pthread_mutex_init(&_rep.mutex, NULL);
       pthread_cond_init(&_rep.cond, NULL);
       _rep.owner = 0;
       _rep.count = 0;
   }
   
   Mutex::Mutex(RecursiveTag)
   {
       memset(&_rep, 0, sizeof(_rep));
       _rep.recursive = 1;
       pthread_mutex_init(&_rep.mutex, NULL);
       pthread_cond_init(&_rep.cond, NULL);
       _rep.owner = 0;
       _rep.count = 0;
   }
   
   Mutex::Mutex(NonRecursiveTag)
   {
       memset(&_rep, 0, sizeof(_rep));
       _rep.recursive = 0;
       pthread_mutex_init(&_rep.mutex, NULL);
   }
   
   Mutex::~Mutex()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
       pthread_mutex_destroy(&_rep.mutex);
   
       if (_rep.recursive)
           pthread_cond_destroy(&_rep.cond);
   }
   
   void Mutex::lock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       if (_rep.recursive)
       {
           pthread_t self = pthread_self();
   
           pthread_mutex_lock(&_rep.mutex);
           {
               if (_rep.count == 0)
               {
                   _rep.owner = self;
               }
               else if (!pthread_equal(_rep.owner, self))
               {
                   while (_rep.count > 0)
                       pthread_cond_wait(&_rep.cond, &_rep.mutex);
   
                   _rep.owner = self;
               }
   
               _rep.count++;
           }
           pthread_mutex_unlock(&_rep.mutex);
       }
       else
       {
           if (pthread_mutex_lock(&_rep.mutex) != 0)
           {
               throw WaitFailed(Threads::self());
           }
       }
   }
   
   void Mutex::try_lock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       if (_rep.recursive)
       {
           pthread_t self = pthread_self();
   
           pthread_mutex_lock(&_rep.mutex);
           {
               if (_rep.count == 0)
               {
                   _rep.owner = self;
                   _rep.count = 1;
               }
               else if (pthread_equal(_rep.owner, self))
               {
                   _rep.count++;
               }
               else
               {
                   pthread_mutex_unlock(&_rep.mutex);
                   throw AlreadyLocked(Threads::self());
               }
           }
           pthread_mutex_unlock(&_rep.mutex);
       }
       else
       {
           int r = pthread_mutex_trylock(&_rep.mutex);
   
           if (r == -1)
               r = errno;
   
           switch (r)
           {
               case 0:
                   break;
   
               case EBUSY:
                   throw AlreadyLocked(Threads::self());
   
               default:
                   throw WaitFailed(Threads::self());
           }
       }
   }
   
   void Mutex::timed_lock(Uint32 milliseconds)
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       if (_rep.recursive)
       {
           pthread_t self = pthread_self();
   
           pthread_mutex_lock(&_rep.mutex);
           {
               if (_rep.count == 0)
               {
                   _rep.owner = self;
               }
               else if (!pthread_equal(_rep.owner, self))
               {
                   timespec ts;
                   clock_gettime(CLOCK_REALTIME, &ts);
   
                   ts.tv_sec += milliseconds / 1000;
                   ts.tv_nsec += (milliseconds % 1000) * 1000000;
   
                   while (_rep.count > 0)
                   {
                       if (pthread_cond_timedwait(
                           &_rep.cond, &_rep.mutex, &ts) != 0)
                       {
                           pthread_mutex_unlock(&_rep.mutex);
                           throw TimeOut(Threads::self());
                       }
                   }
   
                   _rep.owner = self;
               }
   
               _rep.count++;
           }
           pthread_mutex_unlock(&_rep.mutex);
       }
       else
       {
           struct timeval now;
           struct timeval finish;
           struct timeval remaining;
           {
               Uint32 usec;
               gettimeofday(&finish, NULL);
               finish.tv_sec += (milliseconds / 1000 );
               milliseconds %= 1000;
               usec = finish.tv_usec + ( milliseconds * 1000 );
               finish.tv_sec += (usec / 1000000);
               finish.tv_usec = usec % 1000000;
           }
   
           for (;;)
           {
               int r = pthread_mutex_trylock(&_rep.mutex);
   
               if (r == -1)
                   r = errno;
   
               switch (r)
               {
                   case 0:
                       return;
   
                   case EBUSY:
                   {
                       gettimeofday(&now, NULL);
   
                       if (Time::subtract(&remaining, &finish, &now))
                           throw TimeOut(Threads::self());
   
                       Threads::yield();
                       break;
                   }
   
                   default:
                       throw WaitFailed(Threads::self());
               }
           }
       }
   }
   
   void Mutex::unlock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       if (_rep.recursive)
       {
           pthread_t self = pthread_self();
   
           pthread_mutex_lock(&_rep.mutex);
           {
               // If not locked or if calling thread is not the locker.
   
               if (_rep.count == 0 || !pthread_equal(_rep.owner, self))
                   PEGASUS_DEBUG_ASSERT(0);
   
               _rep.count--;
               _rep.owner = 0;
   
               pthread_cond_signal(&_rep.cond);
           }
           pthread_mutex_unlock(&_rep.mutex);
       }
       else
       {
           if (pthread_mutex_unlock(&_rep.mutex) != 0)
               throw Permission(Threads::self());
       }
   }
   
   #endif /* PEGASUS_HAVE_PTHREADS && !PEGASUS_HAVE_RECURSIVE_MUTEXES */
   
   //==============================================================================
   //
   // PEGASUS_HAVE_WINDOWS_THREADS
   //
   //==============================================================================
   
   #if defined(PEGASUS_HAVE_WINDOWS_THREADS)
   
   static inline void _initialize(MutexRep& rep)
   {
       rep.handle = CreateMutex(NULL, FALSE, NULL);
       rep.count = 0;
   }
   
   Mutex::Mutex()
   {
       _initialize(_rep);
   }
   
   Mutex::Mutex(RecursiveTag)
   {
       _initialize(_rep);
   }
   
   Mutex::Mutex(NonRecursiveTag)
   {
       _initialize(_rep);
   }
   
   Mutex::~Mutex()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       WaitForSingleObject(_rep.handle, INFINITE);
       CloseHandle(_rep.handle);
   }
   
   void Mutex::lock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       DWORD rc = WaitForSingleObject(_rep.handle, INFINITE);
   
       if (rc == WAIT_FAILED)
           throw WaitFailed(Threads::self());
   
       _rep.count++;
   }
   
   void Mutex::try_lock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       DWORD rc = WaitForSingleObject(_rep.handle, 0);
   
       if (rc == WAIT_TIMEOUT)
           throw AlreadyLocked(Threads::self());
   
       if (rc == WAIT_FAILED)
           throw WaitFailed(Threads::self());
   
       _rep.count++;
   }
   
   void Mutex::timed_lock(Uint32 milliseconds)
   {
       PEGASUS_DEBUG_ASSERT(_magic);
   
       DWORD rc = WaitForSingleObject(_rep.handle, milliseconds);
   
       if (rc == WAIT_TIMEOUT)
           throw TimeOut(Threads::self());
   
       if (rc == WAIT_FAILED)
           throw WaitFailed(Threads::self());
   
       _rep.count++;
   }
   
   void Mutex::unlock()
   {
       PEGASUS_DEBUG_ASSERT(_magic);
       PEGASUS_DEBUG_ASSERT(_rep.count > 0);
   
       _rep.count--;
       ReleaseMutex(_rep.handle);
   }
   
   #endif /* PEGASUS_HAVE_WINDOWS_THREADS */
   
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.9.16.3
No CVS admin address has been configured
 Powered by
ViewCVS 0.9.2