1 karl  1.13 //%2005////////////////////////////////////////////////////////////////////////

  2 mike  1.2  //

  3 karl  1.12 // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
  4            // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
  5            // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L.P.;

  6 karl  1.11 // IBM Corp.; EMC Corporation, The Open Group.

  7 karl  1.12 // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
  8            // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.

  9 karl  1.13 // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
 10            // EMC Corporation; VERITAS Software Corporation; The Open Group.

 11 mike  1.2  //
 12            // Permission is hereby granted, free of charge, to any person obtaining a copy

 13 kumpf 1.6  // of this software and associated documentation files (the "Software"), to
 14            // deal in the Software without restriction, including without limitation the
 15            // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or

 16 mike  1.2  // sell copies of the Software, and to permit persons to whom the Software is
 17            // furnished to do so, subject to the following conditions:
 18            // 

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

 20 mike  1.2  // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
 21            // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT

 22 kumpf 1.6  // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
 23            // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
 24            // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN

 25 mike  1.2  // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
 26            // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 27            //
 28            //==============================================================================
 29            //
 30            // Author: Markus Mueller (sedgewick_de@yahoo.de)
 31            //
 32            // Modified By: Mike Day (mdday@us.ibm.com)
 33            //
 34            //%/////////////////////////////////////////////////////////////////////////////
 35            
 36            
 37            PEGASUS_NAMESPACE_BEGIN
 38            
 39            static sigset_t *block_signal_mask(sigset_t *sig)
 40            {
 41                sigemptyset(sig);
 42                // should not be used for main()
 43                sigaddset(sig, SIGHUP);

 44 kumpf 1.14     sigaddset(sig, SIGINT);

 45 mike  1.2      // maybe useless, since KILL can't be blocked according to POSIX
 46                sigaddset(sig, SIGKILL);
 47            
 48                sigaddset(sig, SIGABRT);
 49                sigaddset(sig, SIGALRM);
 50                sigaddset(sig, SIGPIPE);
 51            
 52            
 53            // Note: older versions of the linux pthreads library use SIGUSR1 and SIGUSR2
 54            // internally to stop and start threads that are blocking, the newer ones

 55 kumpf 1.14 // implement this through the kernel's real time signals

 56 mike  1.2  
 57            // since SIGSTOP/CONT can handle suspend()/resume() on Linux
 58            // block them
 59            // #if defined(PEGASUS_PLATFORM_LINUX_IX86_GNU)
 60            //     sigaddset(sig, SIGUSR1);
 61            //     sigaddset(sig, SIGUSR2);
 62            // #endif

 63 sage  1.3  #ifndef PEGASUS_PLATFORM_ZOS_ZSERIES_IBM

 64 mike  1.2      pthread_sigmask(SIG_BLOCK, sig, NULL);

 65 sage  1.3  #else
 66                sigprocmask(SIG_BLOCK, sig, NULL);
 67            #endif

 68 mike  1.2      return sig;
 69            }
 70            

 71 keith.petley 1.9  #if defined PEGASUS_PLATFORM_ZOS_ZSERIES_IBM || defined PEGASUS_PLATFORM_SOLARIS_SPARC_CC

 72 sage         1.4  extern "C" {
 73                       void * _linkage(void * zosParm)
 74                       {
 75                           zosParmDef * zos;
 76                           void * retval;
 77                   
 78                           zos = (zosParmDef *)zosParm;
 79                           retval = (*(zos->_start))(zos->realParm);
 80                           free(zosParm);
 81                           return retval;
 82                       }

 83 keith.petley 1.9  }

 84 sage         1.4  #endif

 85 mike         1.2  
 86                   
 87                   ////////////////////////////////////////////////////////////////////////////
 88                   

 89 kumpf        1.14 Thread::Thread(
 90                       PEGASUS_THREAD_RETURN (PEGASUS_THREAD_CDECL *start)(void *),
 91                       void *parameter,
 92                       Boolean detached)
 93                       : _is_detached(detached),
 94                         _cancel_enabled(true),
 95                         _cancelled(false),
 96                         _suspend_count(),
 97                         _start(start),
 98                         _cleanup(true),
 99                         _tsd(true),
100                         _thread_parm(parameter),
101                         _exit_code(0)

102 mike         1.2  {
103                       pthread_attr_init(&_handle.thatt);

104 kumpf        1.10 
105                   #if defined(PEGASUS_PLATFORM_HPUX_PARISC_ACC)
106                       size_t stacksize;
107                       if (pthread_attr_getstacksize(&_handle.thatt, &stacksize) == 0)
108                       {
109                          int rc = pthread_attr_setstacksize(&_handle.thatt, stacksize*2);
110                          PEGASUS_ASSERT(rc == 0);
111                       }
112                   #endif
113                   

114 mike         1.2      _handle.thid = 0;
115                   }
116                   
117                   Thread::~Thread()
118                   {

119 kumpf        1.14     try
120                       {

121 kumpf        1.15         join();

122 kumpf        1.14         pthread_attr_destroy(&_handle.thatt);
123                   
124                           empty_tsd();
125                       }
126                       catch (...)
127                       {
128                           // Do not allow the destructor to throw an exception
129                       }

130 mike         1.2  }
131                   
132                   PEGASUS_NAMESPACE_END