2 * Win32 critical sections
4 * Copyright 1998 Alexandre Julliard
10 #include <sys/types.h>
17 #include "debugtools.h"
20 DEFAULT_DEBUG_CHANNEL(win32
);
21 DECLARE_DEBUG_CHANNEL(relay
);
23 /***********************************************************************
24 * InitializeCriticalSection (KERNEL32.@)
26 void WINAPI
InitializeCriticalSection( CRITICAL_SECTION
*crit
)
28 NTSTATUS ret
= RtlInitializeCriticalSection( crit
);
29 if (ret
) RtlRaiseStatus( ret
);
32 /***********************************************************************
33 * InitializeCriticalSectionAndSpinCount (KERNEL32.@)
35 BOOL WINAPI
InitializeCriticalSectionAndSpinCount( CRITICAL_SECTION
*crit
, DWORD spincount
)
37 NTSTATUS ret
= RtlInitializeCriticalSectionAndSpinCount( crit
, spincount
);
38 if (ret
) RtlRaiseStatus( ret
);
42 /***********************************************************************
43 * SetCriticalSectionSpinCount (KERNEL32.@)
44 * This function is available on NT4SP3 or later, but not Win98
47 DWORD WINAPI
SetCriticalSectionSpinCount( CRITICAL_SECTION
*crit
, DWORD spincount
)
49 ULONG_PTR oldspincount
= crit
->SpinCount
;
50 if(spincount
) FIXME("critsection=%p: spincount=%ld not supported\n", crit
, spincount
);
51 crit
->SpinCount
= spincount
;
55 /***********************************************************************
56 * MakeCriticalSectionGlobal (KERNEL32.@)
58 void WINAPI
MakeCriticalSectionGlobal( CRITICAL_SECTION
*crit
)
60 /* let's assume that only one thread at a time will try to do this */
61 HANDLE sem
= crit
->LockSemaphore
;
62 if (!sem
) NtCreateSemaphore( &sem
, SEMAPHORE_ALL_ACCESS
, NULL
, 0, 1 );
63 crit
->LockSemaphore
= ConvertToGlobalHandle( sem
);
67 /***********************************************************************
68 * ReinitializeCriticalSection (KERNEL32.@)
70 void WINAPI
ReinitializeCriticalSection( CRITICAL_SECTION
*crit
)
72 if ( !crit
->LockSemaphore
)
73 RtlInitializeCriticalSection( crit
);
77 /***********************************************************************
78 * UninitializeCriticalSection (KERNEL32.@)
80 void WINAPI
UninitializeCriticalSection( CRITICAL_SECTION
*crit
)
82 RtlDeleteCriticalSection( crit
);
87 /***********************************************************************
88 * InterlockedCompareExchange (KERNEL32.@)
90 /* PVOID WINAPI InterlockedCompareExchange( PVOID *dest, PVOID xchg, PVOID compare ); */
91 __ASM_GLOBAL_FUNC(InterlockedCompareExchange
,
92 "movl 12(%esp),%eax\n\t"
93 "movl 8(%esp),%ecx\n\t"
94 "movl 4(%esp),%edx\n\t"
95 "lock; cmpxchgl %ecx,(%edx)\n\t"
98 /***********************************************************************
99 * InterlockedExchange (KERNEL32.@)
101 /* LONG WINAPI InterlockedExchange( PLONG dest, LONG val ); */
102 __ASM_GLOBAL_FUNC(InterlockedExchange
,
103 "movl 8(%esp),%eax\n\t"
104 "movl 4(%esp),%edx\n\t"
105 "lock; xchgl %eax,(%edx)\n\t"
108 /***********************************************************************
109 * InterlockedExchangeAdd (KERNEL32.@)
111 /* LONG WINAPI InterlockedExchangeAdd( PLONG dest, LONG incr ); */
112 __ASM_GLOBAL_FUNC(InterlockedExchangeAdd
,
113 "movl 8(%esp),%eax\n\t"
114 "movl 4(%esp),%edx\n\t"
115 "lock; xaddl %eax,(%edx)\n\t"
118 /***********************************************************************
119 * InterlockedIncrement (KERNEL32.@)
121 /* LONG WINAPI InterlockedIncrement( PLONG dest ); */
122 __ASM_GLOBAL_FUNC(InterlockedIncrement
,
123 "movl 4(%esp),%edx\n\t"
125 "lock; xaddl %eax,(%edx)\n\t"
129 /***********************************************************************
130 * InterlockedDecrement (KERNEL32.@)
132 __ASM_GLOBAL_FUNC(InterlockedDecrement
,
133 "movl 4(%esp),%edx\n\t"
135 "lock; xaddl %eax,(%edx)\n\t"
139 #elif defined(__sparc__) && defined(__sun__)
142 * As the earlier Sparc processors lack necessary atomic instructions,
143 * I'm simply falling back to the library-provided _lwp_mutex routines
144 * to ensure mutual exclusion in a way appropriate for the current
147 * FIXME: If we have the compare-and-swap instruction (Sparc v9 and above)
148 * we could use this to speed up the Interlocked operations ...
152 static lwp_mutex_t interlocked_mutex
= DEFAULTMUTEX
;
154 /***********************************************************************
155 * InterlockedCompareExchange (KERNEL32.@)
157 PVOID WINAPI
InterlockedCompareExchange( PVOID
*dest
, PVOID xchg
, PVOID compare
)
159 _lwp_mutex_lock( &interlocked_mutex
);
161 if ( *dest
== compare
)
166 _lwp_mutex_unlock( &interlocked_mutex
);
170 /***********************************************************************
171 * InterlockedExchange (KERNEL32.@)
173 LONG WINAPI
InterlockedExchange( PLONG dest
, LONG val
)
176 _lwp_mutex_lock( &interlocked_mutex
);
181 _lwp_mutex_unlock( &interlocked_mutex
);
185 /***********************************************************************
186 * InterlockedExchangeAdd (KERNEL32.@)
188 LONG WINAPI
InterlockedExchangeAdd( PLONG dest
, LONG incr
)
191 _lwp_mutex_lock( &interlocked_mutex
);
196 _lwp_mutex_unlock( &interlocked_mutex
);
200 /***********************************************************************
201 * InterlockedIncrement (KERNEL32.@)
203 LONG WINAPI
InterlockedIncrement( PLONG dest
)
206 _lwp_mutex_lock( &interlocked_mutex
);
210 _lwp_mutex_unlock( &interlocked_mutex
);
214 /***********************************************************************
215 * InterlockedDecrement (KERNEL32.@)
217 LONG WINAPI
InterlockedDecrement( PLONG dest
)
220 _lwp_mutex_lock( &interlocked_mutex
);
224 _lwp_mutex_unlock( &interlocked_mutex
);
229 #error You must implement the Interlocked* functions for your CPU