annotate packages/hal/i386/arch/current/src/context.S @ 2:443894e2e912 ecos-v1_2_1-release

Block commit of eCos version 1.2.1
author jlarmour
date Tue, 11 May 1999 12:24:34 +0000
parents
children c38311975d4f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
1 ##=============================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
2 ##
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
3 ## context.S
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
4 ##
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
5 ## i386 context switch code
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
6 ##
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
7 ##=============================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
8 #####COPYRIGHTBEGIN####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
9 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
10 # -------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
11 # The contents of this file are subject to the Cygnus eCos Public License
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
12 # Version 1.0 (the "License"); you may not use this file except in
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
13 # compliance with the License. You may obtain a copy of the License at
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
14 # http://sourceware.cygnus.com/ecos
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
15 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
16 # Software distributed under the License is distributed on an "AS IS"
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
17 # basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
18 # License for the specific language governing rights and limitations under
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
19 # the License.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
20 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
21 # The Original Code is eCos - Embedded Cygnus Operating System, released
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
22 # September 30, 1998.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
23 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
24 # The Initial Developer of the Original Code is Cygnus. Portions created
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
25 # by Cygnus are Copyright (C) 1998,1999 Cygnus Solutions. All Rights Reserved.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
26 # -------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
27 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
28 #####COPYRIGHTEND####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
29 ##=============================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
30 #######DESCRIPTIONBEGIN####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
31 ##
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
32 ## Author(s): jskov
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
33 ## Contributors:jskov
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
34 ## Date: 1999-01-20
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
35 ## Purpose: i386 context switch code
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
36 ## Description: This file contains implementations of the thread context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
37 ## switch routines. It also contains the longjmp() and setjmp()
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
38 ## routines.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
39 ## Based on PowerPC context.S, using data from SYSV ABI4, i386
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
40 ## supplement (page 37-38)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
41 ## http://www.sco.com/products/layered/develop/devspecs/abi386-4.pdf
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
42 ##
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
43 ######DESCRIPTIONEND####
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
44 ##
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
45 ##=============================================================================
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
46
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
47 #include <pkgconf/hal.h>
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
48
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
49 #include "cyg/hal/i386.inc"
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
50
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
51 #------------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
52 # function declaration macro
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
53
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
54 #define FUNC_START(name) \
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
55 .globl name; \
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
56 name:
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
57
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
58 #------------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
59 # hal_thread_switch_context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
60 # Switch thread contexts
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
61 # : 0(%esp) : return address
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
62 # : 4(%esp) : address of sp of next thread to execute
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
63 # : 8(%esp) : address of sp save location of current thread
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
64 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
65 # %eax, %ecx, and %edx are ours to abuse.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
66
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
67 FUNC_START(hal_thread_switch_context)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
68 movl 4(%esp),%eax # next context ptr
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
69 movl 8(%esp),%edx # this context ptr
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
70
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
71 # Make room on the stack for the context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
72 movl %esp,%ecx # keep original SP
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
73 sub $i386reg_context_size,%esp
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
74
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
75 # Save next context ptr in this context. Necessary because
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
76 # hal_thread_load_context expects to find the ptr on the stack,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
77 # not in a register as on PPC.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
78 movl %eax,i386reg_next_context(%esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
79
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
80 # Save registers
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
81 movl %ecx,i386reg_esp(%esp) # original esp
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
82 movl %ebp,i386reg_ebp(%esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
83 movl %ebx,i386reg_ebx(%esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
84 movl %esi,i386reg_esi(%esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
85 movl %edi,i386reg_edi(%esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
86
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
87 # Store the context ptr
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
88 movl %esp,(%edx)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
89
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
90 # Now fall through to hal_thread_load_context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
91
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
92
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
93 #------------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
94 # hal_thread_load_context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
95 # Load thread context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
96 # : 4(%esp) = i386reg_next_context(%esp) = address of sp of thread to execute
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
97 # Note that this function is also the second half of hal_thread_switch_context
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
98 # and is simply dropped into from it.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
99 #
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
100 # %eax, %ecx, and %edx are ours to abuse.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
101
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
102 FUNC_START(hal_thread_load_context)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
103 movl i386reg_next_context(%esp),%eax # get new context ptr
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
104 movl (%eax),%eax
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
105
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
106 # Restore registers
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
107 movl i386reg_ebp(%eax),%ebp
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
108 movl i386reg_ebx(%eax),%ebx
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
109 movl i386reg_esi(%eax),%esi
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
110 movl i386reg_edi(%eax),%edi
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
111 movl i386reg_esp(%eax),%esp
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
112
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
113 ret
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
114
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
115
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
116 #------------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
117 # HAL longjmp, setjmp implementations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
118 # hal_setjmp saves only to callee save registers ebp, ebx, esi, edi and
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
119 # and esp+pc into buffer supplied in 4(esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
120 # Note: These definitions are repeated in hal_arch.h. If changes are required
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
121 # remember to update both sets.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
122
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
123 #define CYGARC_JMP_BUF_SP 0
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
124 #define CYGARC_JMP_BUF_EBP 1
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
125 #define CYGARC_JMP_BUF_EBX 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
126 #define CYGARC_JMP_BUF_ESI 3
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
127 #define CYGARC_JMP_BUF_EDI 4
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
128 #define CYGARC_JMP_BUF_PC 5
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
129
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
130 #define CYGARC_JMP_BUF_SIZE 6
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
131
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
132 FUNC_START(hal_setjmp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
133 # Get jmpbuf pointer
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
134 movl 4(%esp),%eax
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
135
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
136 # Save regular registers
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
137 movl %ebp,CYGARC_JMP_BUF_EBP*4(%eax)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
138 movl %ebx,CYGARC_JMP_BUF_EBX*4(%eax)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
139 movl %esi,CYGARC_JMP_BUF_ESI*4(%eax)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
140 movl %edi,CYGARC_JMP_BUF_EDI*4(%eax)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
141
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
142 # Stack and PC
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
143 movl %esp,CYGARC_JMP_BUF_SP*4(%eax)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
144 movl 0(%esp),%ebx
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
145 movl %ebx,CYGARC_JMP_BUF_PC*4(%eax)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
146
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
147 # Return 0
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
148 xor %eax,%eax
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
149 ret
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
150
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
151
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
152 # hal_longjmp loads state from 4(esp) and returns to PC stored in state
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
153
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
154 FUNC_START(hal_longjmp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
155 # Get return value
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
156 movl 8(%esp),%eax
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
157
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
158 # Get jmpbuf pointer
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
159 movl 4(%esp),%ecx
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
160
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
161 # Restore regular registers
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
162 movl CYGARC_JMP_BUF_EBP*4(%ecx),%ebp
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
163 movl CYGARC_JMP_BUF_EBX*4(%ecx),%ebx
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
164 movl CYGARC_JMP_BUF_ESI*4(%ecx),%esi
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
165 movl CYGARC_JMP_BUF_EDI*4(%ecx),%edi
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
166
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
167 # Restore stack pointer
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
168 movl CYGARC_JMP_BUF_SP*4(%ecx),%esp
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
169
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
170 # Put return address on stack
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
171 movl CYGARC_JMP_BUF_PC*4(%ecx),%edx
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
172 movl %edx,0(%esp)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
173
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
174 ret
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
175
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
176 #-----------------------------------------------------------------------------
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents:
diff changeset
177 # End of context.S