2 * Win32 'syslevel' routines
4 * Copyright 1998 Ulrich Weigand
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
27 #include <sys/types.h>
32 #include "wine/winbase16.h"
35 #include "wine/library.h"
36 #include "wine/debug.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(win32
);
40 static SYSLEVEL Win16Mutex
;
41 static CRITICAL_SECTION_DEBUG critsect_debug
=
43 0, 0, &Win16Mutex
.crst
,
44 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
45 0, 0, { 0, (DWORD
)(__FILE__
": Win16Mutex") }
47 static SYSLEVEL Win16Mutex
= { { &critsect_debug
, -1, 0, 0, 0, 0 }, 1 };
49 /* Global variable to save current TEB while in 16-bit code */
50 WORD SYSLEVEL_Win16CurrentTeb
= 0;
53 /************************************************************************
54 * GetpWin16Lock (KERNEL32.93)
56 VOID WINAPI
GetpWin16Lock(SYSLEVEL
**lock
)
61 /************************************************************************
62 * GetpWin16Lock (KERNEL.449)
64 SEGPTR WINAPI
GetpWin16Lock16(void)
66 static SYSLEVEL
*w16Mutex
;
67 static SEGPTR segpWin16Mutex
;
71 w16Mutex
= &Win16Mutex
;
72 segpWin16Mutex
= MapLS( &w16Mutex
);
74 return segpWin16Mutex
;
77 /************************************************************************
78 * _CreateSysLevel (KERNEL.438)
80 VOID WINAPI
_CreateSysLevel(SYSLEVEL
*lock
, INT level
)
82 RtlInitializeCriticalSection( &lock
->crst
);
85 TRACE("(%p, %d): handle is %p\n",
86 lock
, level
, lock
->crst
.LockSemaphore
);
89 /************************************************************************
90 * _EnterSysLevel (KERNEL32.97)
91 * _EnterSysLevel (KERNEL.439)
93 VOID WINAPI
_EnterSysLevel(SYSLEVEL
*lock
)
95 TEB
*teb
= NtCurrentTeb();
98 TRACE("(%p, level %d): thread %lx count before %ld\n",
99 lock
, lock
->level
, GetCurrentThreadId(), teb
->sys_count
[lock
->level
] );
101 for ( i
= 3; i
> lock
->level
; i
-- )
102 if ( teb
->sys_count
[i
] > 0 )
104 ERR("(%p, level %d): Holding %p, level %d. Expect deadlock!\n",
105 lock
, lock
->level
, teb
->sys_mutex
[i
], i
);
108 RtlEnterCriticalSection( &lock
->crst
);
110 teb
->sys_count
[lock
->level
]++;
111 teb
->sys_mutex
[lock
->level
] = lock
;
113 TRACE("(%p, level %d): thread %lx count after %ld\n",
114 lock
, lock
->level
, GetCurrentThreadId(), teb
->sys_count
[lock
->level
] );
116 if (lock
== &Win16Mutex
)
117 SYSLEVEL_Win16CurrentTeb
= wine_get_fs();
120 /************************************************************************
121 * _LeaveSysLevel (KERNEL32.98)
122 * _LeaveSysLevel (KERNEL.440)
124 VOID WINAPI
_LeaveSysLevel(SYSLEVEL
*lock
)
126 TEB
*teb
= NtCurrentTeb();
128 TRACE("(%p, level %d): thread %lx count before %ld\n",
129 lock
, lock
->level
, GetCurrentThreadId(), teb
->sys_count
[lock
->level
] );
131 if ( teb
->sys_count
[lock
->level
] <= 0 || teb
->sys_mutex
[lock
->level
] != lock
)
133 ERR("(%p, level %d): Invalid state: count %ld mutex %p.\n",
134 lock
, lock
->level
, teb
->sys_count
[lock
->level
],
135 teb
->sys_mutex
[lock
->level
] );
139 if ( --teb
->sys_count
[lock
->level
] == 0 )
140 teb
->sys_mutex
[lock
->level
] = NULL
;
143 RtlLeaveCriticalSection( &lock
->crst
);
145 TRACE("(%p, level %d): thread %lx count after %ld\n",
146 lock
, lock
->level
, GetCurrentThreadId(), teb
->sys_count
[lock
->level
] );
149 /************************************************************************
152 VOID WINAPI
_KERNEL32_86(SYSLEVEL
*lock
)
154 _LeaveSysLevel(lock
);
157 /************************************************************************
158 * _ConfirmSysLevel (KERNEL32.95)
159 * _ConfirmSysLevel (KERNEL.436)
161 DWORD WINAPI
_ConfirmSysLevel(SYSLEVEL
*lock
)
163 if ( lock
&& lock
->crst
.OwningThread
== (HANDLE
)GetCurrentThreadId() )
164 return lock
->crst
.RecursionCount
;
169 /************************************************************************
170 * _CheckNotSysLevel (KERNEL32.94)
171 * _CheckNotSysLevel (KERNEL.437)
173 VOID WINAPI
_CheckNotSysLevel(SYSLEVEL
*lock
)
175 if (lock
&& lock
->crst
.OwningThread
== (HANDLE
)GetCurrentThreadId() &&
176 lock
->crst
.RecursionCount
)
178 ERR( "Holding lock %p level %d\n", lock
, lock
->level
);
184 /************************************************************************
185 * _EnterWin16Lock [KERNEL.480]
187 VOID WINAPI
_EnterWin16Lock(void)
189 _EnterSysLevel(&Win16Mutex
);
192 /************************************************************************
193 * _LeaveWin16Lock [KERNEL.481]
195 VOID WINAPI
_LeaveWin16Lock(void)
197 _LeaveSysLevel(&Win16Mutex
);
200 /************************************************************************
201 * _ConfirmWin16Lock (KERNEL32.96)
203 DWORD WINAPI
_ConfirmWin16Lock(void)
205 return _ConfirmSysLevel(&Win16Mutex
);
208 /************************************************************************
209 * ReleaseThunkLock (KERNEL32.48)
211 VOID WINAPI
ReleaseThunkLock(DWORD
*mutex_count
)
213 DWORD count
= _ConfirmSysLevel(&Win16Mutex
);
214 *mutex_count
= count
;
217 _LeaveSysLevel(&Win16Mutex
);
220 /************************************************************************
221 * RestoreThunkLock (KERNEL32.49)
223 VOID WINAPI
RestoreThunkLock(DWORD mutex_count
)
225 while (mutex_count
-- > 0)
226 _EnterSysLevel(&Win16Mutex
);
229 /************************************************************************
230 * SYSLEVEL_CheckNotLevel
232 VOID
SYSLEVEL_CheckNotLevel( INT level
)
236 for ( i
= 3; i
>= level
; i
-- )
237 if ( NtCurrentTeb()->sys_count
[i
] > 0 )
239 ERR("(%d): Holding lock of level %d!\n",