15821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
25821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * errno.c
35821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
45821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Description:
55821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * This translation unit implements routines associated with spawning a new
65821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * thread.
75821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
85821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * --------------------------------------------------------------------------
95821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      Pthreads-win32 - POSIX Threads Library for Win32
115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      Copyright(C) 1998 John E. Bossom
125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      Copyright(C) 1999,2005 Pthreads-win32 contributors
135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      Contact Email: rpj@callisto.canberra.edu.au
155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      The current list of contributors is contained
175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      in the file CONTRIBUTORS included with the source
185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      code distribution. The list can also be seen at the
195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      following World Wide Web location:
205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      http://sources.redhat.com/pthreads-win32/contributors.html
215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      This library is free software; you can redistribute it and/or
235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      modify it under the terms of the GNU Lesser General Public
245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      License as published by the Free Software Foundation; either
255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      version 2 of the License, or (at your option) any later version.
265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      This library is distributed in the hope that it will be useful,
285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      but WITHOUT ANY WARRANTY; without even the implied warranty of
295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      Lesser General Public License for more details.
315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      You should have received a copy of the GNU Lesser General Public
335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      License along with this library in the file COPYING.LIB;
345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      if not, write to the Free Software Foundation, Inc.,
355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *      59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if defined(NEED_ERRNO)
395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "pthread.h"
415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "implement.h"
425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static int reallyBad = ENOMEM;
445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/*
465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Re-entrant errno.
475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * Each thread has it's own errno variable in pthread_t.
495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * The benefit of using the pthread_t structure
515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * instead of another TSD key is TSD keys are limited
525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * on Win32 to 64 per process. Secondly, to implement
535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * it properly without using pthread_t you'd need
545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * to dynamically allocate an int on starting the thread
555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * and store it manually into TLS and then ensure that you free
565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * it on thread termination. We get all that for free
575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * by simply storing the errno on the pthread_t structure.
585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * MSVC and Mingw32 already have their own thread-safe errno.
605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * #if defined( _REENTRANT ) || defined( _MT )
625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * #define errno *_errno()
635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * int *_errno( void );
655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * #else
665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * extern int errno;
675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) * #endif
685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *
695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */
705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int *
725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)_errno (void)
735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles){
745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)  pthread_t self;
755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)  int *result;
765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)  if ((self = pthread_self ()).p == NULL)
785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    {
795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)      /*
805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)       * Yikes! unable to allocate a thread!
815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)       * Throw an exception? return an error?
825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)       */
835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)      result = &reallyBad;
845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    }
855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)  else
865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    {
875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)      result = (int *)(&self.p->exitStatus);
885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)    }
895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)  return (result);
915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)}				/* _errno */
935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)
945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* (NEED_ERRNO) */
95