merge ROS Shell without integrated explorer part into trunk
[reactos.git] / reactos / lib / pseh / i386 / framebased.asm
1 ; Copyright (c) 2004 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 __SEHRegisterFrame
29 __SEHRegisterFrame:
30 mov ecx, [esp+4]
31 mov eax, [fs:0]
32 mov [ecx+0], eax
33 mov [fs:0], ecx
34 ret
35
36 global __SEHUnregisterFrame
37 __SEHUnregisterFrame:
38 mov ecx, [esp+4]
39 mov ecx, [ecx]
40 mov [fs:0], ecx
41 ret
42
43 global __SEHUnwind
44 __SEHUnwind:
45
46 extern __SEHRtlUnwind
47
48 mov ecx, [esp+4]
49
50 ; RtlUnwind clobbers all the "don't clobber" registers, so we save them
51 push esi
52 push edi
53 push ebx
54
55 xor eax, eax
56 push eax ; ReturnValue
57 push eax ; ExceptionRecord
58 push eax ; TargetIp
59 push ecx ; TargetFrame
60 call [__SEHRtlUnwind]
61
62 pop ebx
63 pop edi
64 pop esi
65
66 ret
67
68 ; EOF