/[pcsx2_0.9.7]/trunk/3rdparty/w32pthreads/pthread_once.c
ViewVC logotype

Contents of /trunk/3rdparty/w32pthreads/pthread_once.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 31 - (show annotations) (download)
Tue Sep 7 03:24:11 2010 UTC (9 years, 11 months ago) by william
File MIME type: text/plain
File size: 2509 byte(s)
committing r3113 initial commit again...
1 /*
2 * pthread_once.c
3 *
4 * Description:
5 * This translation unit implements miscellaneous thread functions.
6 *
7 * --------------------------------------------------------------------------
8 *
9 * Pthreads-win32 - POSIX Threads Library for Win32
10 * Copyright(C) 1998 John E. Bossom
11 * Copyright(C) 1999,2005 Pthreads-win32 contributors
12 *
13 * Contact Email: rpj@callisto.canberra.edu.au
14 *
15 * The current list of contributors is contained
16 * in the file CONTRIBUTORS included with the source
17 * code distribution. The list can also be seen at the
18 * following World Wide Web location:
19 * http://sources.redhat.com/pthreads-win32/contributors.html
20 *
21 * This library is free software; you can redistribute it and/or
22 * modify it under the terms of the GNU Lesser General Public
23 * License as published by the Free Software Foundation; either
24 * version 2 of the License, or (at your option) any later version.
25 *
26 * This library is distributed in the hope that it will be useful,
27 * but WITHOUT ANY WARRANTY; without even the implied warranty of
28 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
29 * Lesser General Public License for more details.
30 *
31 * You should have received a copy of the GNU Lesser General Public
32 * License along with this library in the file COPYING.LIB;
33 * if not, write to the Free Software Foundation, Inc.,
34 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
35 */
36
37 #include "ptw32pch.h"
38
39
40 static void PTW32_CDECL
41 ptw32_once_on_init_cancel (void * arg)
42 {
43 /* when the initting thread is cancelled we have to release the lock */
44 ptw32_mcs_local_node_t *node = (ptw32_mcs_local_node_t *)arg;
45 ptw32_mcs_lock_release(node);
46 }
47
48 int
49 pthread_once (pthread_once_t * once_control, void (*init_routine) (void))
50 {
51 if (once_control == NULL || init_routine == NULL)
52 {
53 return EINVAL;
54 }
55
56 if (!InterlockedExchangeAdd((LPLONG)&once_control->done, 0)) /* MBR fence */
57 {
58 ptw32_mcs_local_node_t node;
59
60 ptw32_mcs_lock_acquire((ptw32_mcs_lock_t *)&once_control->lock, &node);
61
62 if (!once_control->done)
63 {
64
65 #ifdef _MSC_VER
66 #pragma inline_depth(0)
67 #endif
68
69 pthread_cleanup_push(ptw32_once_on_init_cancel, (void *)&node);
70 (*init_routine)();
71 pthread_cleanup_pop(0);
72
73 #ifdef _MSC_VER
74 #pragma inline_depth()
75 #endif
76
77 once_control->done = PTW32_TRUE;
78 }
79
80 ptw32_mcs_lock_release(&node);
81 }
82
83 return 0;
84
85 } /* pthread_once */

  ViewVC Help
Powered by ViewVC 1.1.22