1/*
2 * ptw32_processTerminate.c
3 *
4 * Description:
5 * This translation unit implements routines which are private to
6 * the implementation and may be used throughout it.
7 *
8 * --------------------------------------------------------------------------
9 *
10 *      Pthreads-win32 - POSIX Threads Library for Win32
11 *      Copyright(C) 1998 John E. Bossom
12 *      Copyright(C) 1999,2005 Pthreads-win32 contributors
13 *
14 *      Contact Email: rpj@callisto.canberra.edu.au
15 *
16 *      The current list of contributors is contained
17 *      in the file CONTRIBUTORS included with the source
18 *      code distribution. The list can also be seen at the
19 *      following World Wide Web location:
20 *      http://sources.redhat.com/pthreads-win32/contributors.html
21 *
22 *      This library is free software; you can redistribute it and/or
23 *      modify it under the terms of the GNU Lesser General Public
24 *      License as published by the Free Software Foundation; either
25 *      version 2 of the License, or (at your option) any later version.
26 *
27 *      This library is distributed in the hope that it will be useful,
28 *      but WITHOUT ANY WARRANTY; without even the implied warranty of
29 *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
30 *      Lesser General Public License for more details.
31 *
32 *      You should have received a copy of the GNU Lesser General Public
33 *      License along with this library in the file COPYING.LIB;
34 *      if not, write to the Free Software Foundation, Inc.,
35 *      59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
36 */
37
38#include "pthread.h"
39#include "implement.h"
40
41
42void
43ptw32_processTerminate (void)
44     /*
45      * ------------------------------------------------------
46      * DOCPRIVATE
47      *      This function performs process wide termination for
48      *      the pthread library.
49      *
50      * PARAMETERS
51      *      N/A
52      *
53      * DESCRIPTION
54      *      This function performs process wide termination for
55      *      the pthread library.
56      *      This routine sets the global variable
57      *      ptw32_processInitialized to FALSE
58      *
59      * RESULTS
60      *              N/A
61      *
62      * ------------------------------------------------------
63      */
64{
65  if (ptw32_processInitialized)
66    {
67      ptw32_thread_t * tp, * tpNext;
68      ptw32_mcs_local_node_t node;
69
70      if (ptw32_selfThreadKey != NULL)
71	{
72	  /*
73	   * Release ptw32_selfThreadKey
74	   */
75	  pthread_key_delete (ptw32_selfThreadKey);
76
77	  ptw32_selfThreadKey = NULL;
78	}
79
80      if (ptw32_cleanupKey != NULL)
81	{
82	  /*
83	   * Release ptw32_cleanupKey
84	   */
85	  pthread_key_delete (ptw32_cleanupKey);
86
87	  ptw32_cleanupKey = NULL;
88	}
89
90      ptw32_mcs_lock_acquire(&ptw32_thread_reuse_lock, &node);
91
92      tp = ptw32_threadReuseTop;
93      while (tp != PTW32_THREAD_REUSE_EMPTY)
94	{
95	  tpNext = tp->prevReuse;
96	  free (tp);
97	  tp = tpNext;
98	}
99
100      ptw32_mcs_lock_release(&node);
101
102      ptw32_processInitialized = PTW32_FALSE;
103    }
104
105}				/* processTerminate */
106