2 Copyright Oliver Kowalke 2009.
3 Copyright Thomas Sailer 2013.
4 Distributed under the Boost Software License, Version 1.0.
5 (See accompanying file LICENSE_1_0.txt or copy at
6 http://www.boost.org/LICENSE_1_0.txt)
9 /*************************************************************************************
10 * --------------------------------------------------------------------------------- *
11 * | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | *
12 * --------------------------------------------------------------------------------- *
13 * | 0h | 04h | 08h | 0ch | 010h | 014h | 018h | 01ch | *
14 * --------------------------------------------------------------------------------- *
15 * | fc_mxcsr|fc_x87_cw| fc_strg |fc_deallo| limit | base | fc_seh | EDI | *
16 * --------------------------------------------------------------------------------- *
17 * --------------------------------------------------------------------------------- *
18 * | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | *
19 * --------------------------------------------------------------------------------- *
20 * | 020h | 024h | 028h | 02ch | 030h | 034h | 038h | 03ch | *
21 * --------------------------------------------------------------------------------- *
22 * | ESI | EBX | EBP | EIP | to | data | EH NXT |SEH HNDLR| *
23 * --------------------------------------------------------------------------------- *
24 **************************************************************************************/
26 .file "ontop_i386_ms_pe_gas.asm"
29 .globl _ontop_fcontext
30 .def _ontop_fcontext; .scl 2; .type 32; .endef
33 leal -0x2c(%esp), %esp
35 #if !defined(BOOST_USE_TSX)
36 /* save MMX control- and status-word */
38 /* save x87 control-word */
44 /* load fiber local storage */
47 /* load current dealloction stack */
48 movl 0xe0c(%edx), %eax
50 /* load current stack limit */
53 /* load current stack base */
56 /* load current SEH exception list */
60 movl %edi, 0x1c(%esp) /* save EDI */
61 movl %esi, 0x20(%esp) /* save ESI */
62 movl %ebx, 0x24(%esp) /* save EBX */
63 movl %ebp, 0x28(%esp) /* save EBP */
65 /* store ESP (pointing to context-data) in ECX */
68 /* first arg of ontop_fcontext() == fcontext to jump to */
71 /* pass parent fcontext_t */
74 /* second arg of ontop_fcontext() == data to be transferred */
80 /* third arg of ontop_fcontext() == ontop-function */
83 /* restore ESP (pointing to context-data) from EDX */
86 #if !defined(BOOST_USE_TSX)
87 /* restore MMX control- and status-word */
89 /* restore x87 control-word */
93 /* restore NT_TIB into EDX */
95 /* restore fiber local storage */
98 /* restore current deallocation stack */
100 movl %eax, 0xe0c(%edx)
101 /* restore current stack limit */
102 movl 0x10(%esp), %eax
103 movl %eax, 0x08(%edx)
104 /* restore current stack base */
105 movl 0x14(%esp), %eax
106 movl %eax, 0x04(%edx)
107 /* restore current SEH exception list */
108 movl 0x18(%esp), %eax
111 movl 0x1c(%esp), %edi /* restore EDI */
112 movl 0x20(%esp), %esi /* restore ESI */
113 movl 0x24(%esp), %ebx /* restore EBX */
114 movl 0x28(%esp), %ebp /* restore EBP */
117 leal 0x2c(%esp), %esp
119 /* keep return-address on stack */
121 /* jump to context */
125 .ascii " -export:\"ontop_fcontext\""