- Fix KiDispatchException to unmask KI_EXCEPTION_INTERNAL when setting the exception...
[reactos.git] / reactos / lib / pseh / i386 / framebased.asm
1 ; Copyright (c) 2004/2005 KJK::Hyperion
2
3 ; Permission is hereby granted, free of charge, to any person obtaining a copy
4 ; of this software and associated documentation files (the "Software"), to deal
5 ; in the Software without restriction, including without limitation the rights
6 ; to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
7 ; copies of the Software, and to permit persons to whom the Software is
8 ; furnished to dos so, subject to the following conditions:
9
10 ; The above copyright notice and this permission notice shall be included in all
11 ; copies or substantial portions of the Software.
12
13 ; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
14 ; IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
15 ; FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
16 ; AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
17 ; LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
18 ; OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
19 ; SOFTWARE.
20
21 segment .text use32
22
23 global __SEHCleanHandlerEnvironment
24 __SEHCleanHandlerEnvironment:
25 cld
26 ret
27
28 global __SEHCurrentRegistration
29 __SEHCurrentRegistration:
30 mov eax, [fs:0]
31 ret
32
33 global __SEHRegisterFrame
34 __SEHRegisterFrame:
35 mov ecx, [esp+4]
36 mov eax, [fs:0]
37 mov [ecx+0], eax
38 mov [fs:0], ecx
39 ret
40
41 global __SEHUnregisterFrame
42 __SEHUnregisterFrame:
43 mov ecx, [fs:0]
44 mov ecx, [ecx+0]
45 mov [fs:0], ecx
46 ret
47
48 global __SEHGlobalUnwind
49 __SEHGlobalUnwind:
50
51 extern __SEHRtlUnwind
52
53 ; RtlUnwind clobbers all the "don't clobber" registers, so we save them
54 push ebx
55 mov ebx, [esp+8]
56 push esi
57 push edi
58
59 push dword 0x0 ; ReturnValue
60 push dword 0x0 ; ExceptionRecord
61 push dword .RestoreRegisters ; TargetIp
62 push ebx ; TargetFrame
63 call [__SEHRtlUnwind]
64
65 .RestoreRegisters:
66 pop edi
67 pop esi
68 pop ebx
69
70 ret
71
72 ; EOF